文件 ＝ 寻找文件 (复制目录 ＋ “*.*”, #子目录).判断循环首 (文件 ≠ “”).如果真 (文件 ≠ “.” 且 文件 ≠ “..”)复制文件夹 (复制目录 ＋ 文件, 粘贴目录 ＋ 文件).如果真结束 文件 ＝ 寻找文件 (, #子目录).判断循环尾 ().子程序 __启动窗口_创建完毕 复制文件夹 (...
(移动运行程序下的文件夹123到D盘)
最佳答案复制文件 (, )调用格式: 〈逻辑型〉 复制文件 (文本型 被复制的文件名,文本型 复制到的文件名) - 系统核心支持库->磁盘操作 英文名称:FileCopy 成功返回真,失败返回假。本命令为初级命令。 参数<1>的名称为“被复制的文件名”,类型为“文本型(text)”。 参数<2>的名称为“复制到的文件名”,类型...
.如果真 (取文本左边 (文件名, 1) ≠ “.”)递归寻找 (目录 ＋ 文件名)创建多级目录 (_启动窗口.编辑框1.内容 ＋ “\” ＋ 到文本 (取日期 (取现行时间 ())) ＋ 取文本右边 (目录 ＋ 文件名, 取文本长度 (目录 ＋ 文件名) － 2)).如果真结束 文件名 ＝ 寻找文件 (, #子目录)...