vbs實(shí)現(xiàn)壓縮文件夾的腳本
更新時(shí)間：2008年06月16日 19:44:14 作者：
用vbs實(shí)現(xiàn)壓縮文件夾的代碼，可以壓縮文件夾，減少文件占用體積
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colFolders = objWMIService.ExecQuery _
("Select * from Win32_Directory where ")
For Each objFolder in colFolders
errResults = objFolder.Compress
Wscript.Echo errResults
Next
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colFolders = objWMIService.ExecQuery _
("Select * from Win32_Directory where ")
For Each objFolder in colFolders
errResults = objFolder.Compress
Wscript.Echo errResults
Next
相關(guān)文章
VBS教程：屬性-DriveType 屬性...2006-11-11
最早學(xué)會(huì)用而且喜歡的一門編程語(yǔ)言應(yīng)該是 VBS，雖然 C 比較早學(xué)，但學(xué)了后很長(zhǎng)時(shí)間里沒(méi)辦法使用 C 來(lái)寫程序，因?yàn)楫?dāng)時(shí)自己沒(méi)錢買電腦，所以沒(méi)有 C 編譯器。2008-06-06
vbscript，jscript腳本編程教學(xué)（1）
vbscript，jscript腳本編程教學(xué)（1）...2007-03-03
黑客必須要知道的幾個(gè)vbs文件代碼...2007-03-03
VBS教程：運(yùn)算符-比較運(yùn)算符...2006-11-11
VBS Runas 自動(dòng)輸入密碼 提權(quán)腳本等功能2009-06-06
簡(jiǎn)單用VBS調(diào)用企業(yè)微信機(jī)器人發(fā)定時(shí)消息的方法
這篇文章主要介紹了簡(jiǎn)單用VBS調(diào)用企業(yè)微信機(jī)器人發(fā)定時(shí)消息的方法，文中通過(guò)示例代碼介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來(lái)一起學(xué)習(xí)學(xué)習(xí)吧2020-07-07
利用VBS腳本修改聯(lián)想筆記本BIOS密碼的代碼分享
這篇文章主要介紹了利用VBS腳本修改聯(lián)想筆記本BIOS密碼的實(shí)現(xiàn)代碼，感覺(jué)這不科學(xué)！無(wú)意中找到的一些資料，喜歡的朋友可以試試2013-07-07
vbs中關(guān)于計(jì)算機(jī)名的相關(guān)討論
vbs中關(guān)于計(jì)算機(jī)名的相關(guān)討論...2007-03-03
VBS教程：方法-Raise 方法...2006-11-11