
易语言 复制文件夹内前30个文件到桌面 如何实现?
2个回答
展开全部
.版本 2
.支持库 shell
.子程序 __启动窗口_创建完毕
.局部变量 文件夹, 文本型
.局部变量 文件名, 文本型
文件夹 = 浏览文件夹 (“请选择要复制文件的文件夹!”, )
.如果真 (文件夹 = “”)
文件夹 = 取运行目录 ()
.如果真结束
文件夹 = 文件夹 + “\”
文件名 = 寻找文件 (文件夹 + “*.*”, )
.计次循环首 (30, )
复制文件 (文件夹 + 文件名, 取特定目录 (3) + 文件名))
文件名 = 寻找文件 (, )
.计次循环尾 ()
.支持库 shell
.子程序 __启动窗口_创建完毕
.局部变量 文件夹, 文本型
.局部变量 文件名, 文本型
文件夹 = 浏览文件夹 (“请选择要复制文件的文件夹!”, )
.如果真 (文件夹 = “”)
文件夹 = 取运行目录 ()
.如果真结束
文件夹 = 文件夹 + “\”
文件名 = 寻找文件 (文件夹 + “*.*”, )
.计次循环首 (30, )
复制文件 (文件夹 + 文件名, 取特定目录 (3) + 文件名))
文件名 = 寻找文件 (, )
.计次循环尾 ()
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询