宜信同城网交流论坛

 找回密码
 立即注册
开启左侧

教你一招插入U盘就可以自动复制U盘文件的技巧

[复制链接]
发表于 2023-2-10 06:47:41 | 显示全部楼层 |阅读模式 来自 LAN

  有的时候我们经常因为工作需求会复制拷贝文件,但是如果文件量过于多还要一一复制,实属麻烦,今天小编就教大家一招如何插入U盘就可以自动复制的技巧,感兴趣的小伙伴快来学学吧。

  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即可

  好了,以上就是小编为大家介绍的win7为什么自动复制U盘文件的技巧,相信大家通过小编为大家介绍的自动复制U盘文件的方法对U盘的使用都有一定的了解了吧,好了,如果大家还想了解更多的资讯那赶紧点击当客官网吧,其实U盘的作用很大,可以用来装系统,下一篇就是小编为大家介绍的怎么用u盘重装系统教程。大家可以学习起来。

宜信网交流论坛 - 版权声明 1、在发表言论时,请遵守当地法律法规。主题所有言论纯属个人意见,与本站立场无关。
2、本站所有主题由作者发表,作者享有帖子相关版权,其他单位或个人使用、转载或引用本文时必须征得作者同意并注明来源于宜信网
3、如本帖侵犯到任何版权问题,请立即告知本站,本站将及时予与删除并致以最深的歉意。
4、帖子不遵守当地法律法规、广告、人身攻击等情况时,宜信网管理人员有权不事先通知发贴者而删除本文。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|宜信同城网交流论坛 ( 闽ICP备19021048号 )|站点地图

GMT+8, 2026-3-30 11:20 , Processed in 0.229569 second(s), 14 queries , Redis On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表