易语言文件复制问题

kingstonvssdnow

我做了一个U盘静默备份软件，程序可以正常运行，但是不知道为什么插入U盘后却复制不出任何东西，如图所示，希望大家能帮我看看问题出在哪里了
我的思路是创建一个以拷贝时间的文件夹，并静默复制*.xls *.xlsx *.doc *.docx *.rtf *.pdf *.txt这些类型文件
代码已经以附件附上，有部分注释
最后谢谢大家帮助

Cplusplus

  

子程序名	返回值类型	公开	备 注
复制所有文件
参数名	类 型	参考	可空	数组	备 注
盘符	文本型

变量名	类 型	静态	数组	备 注
fn	文本型
txt	文本型
文件类型	文本型
i	整数型

文件类型 ＝ { “:\*.txt”, “:\*.rtf”, “:\*.pdf”, “:\*.xls”, “:\*.doc” }
fn ＝ “”
计次循环首 (取数组成员数 (文件类型), i)
txt ＝ 寻找文件 (盘符 ＋ 文件类型 [i], )
判断循环首 (txt ≠ “”)
fn ＝ fn ＋ txt
' 复制文件 (, ) ' 自己填充下
txt ＝ 寻找文件 (, )
判断循环尾 ()
计次循环尾 ()

.版本 2<br /> <br /> .子程序 复制所有文件<br /> .参数 盘符, 文本型<br /> .局部变量 fn, 文本型<br /> .局部变量 txt, 文本型<br /> .局部变量 文件类型, 文本型<br /> .局部变量 i, 整数型<br /> <br /> 文件类型 ＝ { “:\*.txt”, “:\*.rtf”, “:\*.pdf”, “:\*.xls”, “:\*.doc” }<br /> fn ＝ “”<br /> .计次循环首 (取数组成员数 (文件类型), i)<br />     txt ＝ 寻找文件 (盘符 ＋ 文件类型 <i>, )<br />     .判断循环首 (txt ≠ “”)<br />         fn ＝ fn ＋ txt<br />         ' 复制文件 (, ) ' 自己填充下<br />         txt ＝ 寻找文件 (, )<br />     .判断循环尾 ()<br /> .计次循环尾 ()

Bszk

复制指定类型文件至指定文件夹.e (3.59 KB, 下载次数: 5)

2020-1-29 17:11 上传

点击文件名下载附件
我看你的代码脑壳痛，乱七八糟的，但应该是枚举文件复制那里出错了，寻找文件()的用法有问题，所以写了一个枚举文件+复制文件的例子给你

Cplusplus

第一次调用 寻找文件 和 后面调用连着的。简单的办法是你把每种文件类型分别寻找，不要混在一起试试。

球大懒

分开写它不香吗

kingstonvssdnow

球大懒 发表于 2020-1-29 20:03
分开写它不香吗

分开写的话，建议也是一个程序做到这些，因为开太多对电脑性能影响较大