让u盘插入Win7旗舰版系统电脑后自动复制文件的设置攻略
更新日期:2015-12-18 10:38:01
来源:互联网
很多用户使用u盘来存储拷贝文件,当需要复制别人电脑上面的文件的时候,想要轻轻拿过来的话,如果一一复制就太麻烦了。其实此问题,只要用户巧妙设置下,就会让电脑插入u盘后自动复制的,现小编介绍让u盘插入Win7旗舰版系统电脑后自动复制文件的设置攻略,感兴趣的用户赶快来学学吧。
1、在桌面空白处右键选择“新建——文本文档”选项。
2、将下面的代码内容复制粘贴到刚创建的记事本文档中:
set fso=createobject("scripting.filesystemobject")
set ws=createobject("wscript.shell")
dim USB, file, folder, files
USB=inputbox("请输入U盘的盘符"&Chr(10)&"如插入的U盘为F盘,则输入F","插入的U盘盘符","F")
folder=inputbox("请输入复制到的文件夹"&Chr(10)&"如想复制到D盘,请输入D:","请输入复制到的文件夹","C:USB")
files=inputbox("请输入要复制的文件类型"&Chr(10)&"如要复制EXCEL文件,输入xls;默认为全部类型","请输入要复制的文件类型","ALL")
USB=USB & ":"
folder=folder & ""
if files="ALL"then
file=USB & "*"
else
file=USB & "*." & files
end if
if FSO.FolderExists(folder) then
else
FSO.CreateFolder(folder)
end if
on error resume next
do
wscript.sleep 1000
if fso.driveexists(USB) then
fso.copyfile file,folder
fso.copyfolder file,folder
wscript.sleep 20000
end if
loop
3、,其重命名为XX.VBS即可
通过以上设置后,只需要将u盘插入电脑就可以实现轻松自动复制文件了,操作方法非常简单、有效。
猜你喜欢
-
网页字体在win7中打印 不能一页纸都显示怎么办 14-11-19
-
win7 64位纯净版系统怎样去备份网络设置 14-12-11
-
解决win7 64位纯净版系统蓝屏现象的一些有效措施 15-02-02
-
系统之家Win7纯净版系统设置任务计划的最佳方案 15-05-16
-
安装新萝卜家园win7就用一键口袋Ghost去实现吧 15-05-16
-
IE8登陆网上银行失败时win7风林火山怎么解决 15-05-26
-
如何实现win7深度技术系统中让文件井然有序的 15-06-18
-
雨林木风win7系统中如何一招搞定播放网页视频无声问题 15-06-19
-
番茄花园win7系统解决电脑无法启动时应对的10种办法 15-06-01
-
新萝卜家园win7系统电脑驱动器进行加密保护的方法 15-07-24
Win7系统安装教程
Win7 系统专题