Question

【VB代码】监控桌面的文件变化，比如桌面增加了一个文件，马上复制这个文件到D盘备份

监控桌面的文件变化，比如桌面增加了一个文件，马上复制这个文件到D盘备份

Answer 1

给你个思路 首先你添加一个timer控件 在form_load事件中 先获取桌面所有文件的文件名和文件数量 放入一个数组中和一个整形变量中然后在用timer控件实时监控 如果发现文件数量增加了 那么再判断文件名 把相同的排除掉 把不同的选出来 然后再复制进D盘即可 代码你自己写 第一因为你没给分 第二有点晚了 如果要写的话可能要个把小时 我给你提供一个方向如果你觉得我说的对你有帮助就选我吧 如果你觉得实在想要代码那不选我也没关系希望能帮助到你

Answer 2

OK了 文件我已经写出来了，楼上这个思路不错，但我想补充一下 应该是有两个变量 一个是文件夹的数量以及名字，另外一个应该是文件的数量及名字，也就是4个变量，其中两个定义为字符串数组，另两个定义为整型。在监控的时候就刷新一下dirlist和filelist，然后循环判断文件以及文件夹的数量有否增加（减少的情况就不需要考虑），如果增加了，就选择出那个增加的文件或文件夹，再用filesystemobject系统去copy文件或文件夹，这里就又出现了新问题，那就是如果文件或文件夹是只读的话，就会发生一个无权限的错误，所以在copy之前就必须用setattr改变其文件的属性后再进行copy，copy之后呢，就再应该使得原始的那4个变量再改变，比如redim数组，两个整型变量的值增加等等，然后继续等待刷新即可。timer的时间可以不用设置得太短，，频繁的刷新的话可能就出新当机等问题。还有强烈说一下楼上的人，没分就不写代码，这是很不负责的说法的，难道说老师给你写代码就得让学生另外给钱？代码我已经全部弄好，调试好了，问题提出者请上线联系我。两个版本，一个是直接复制U盘全部内容到D盘该时间的一个文件夹下面，另一个是复制桌面上新增文件到D盘这一文件夹下，而且两者都是设置了开机自启动和隐藏运行的。这个代码并不麻烦的。。。。。。。。