emule自動關(guān)機腳本
更新時間:2008年11月03日 11:34:05 作者:
emule自動關(guān)機腳本,它的功能就是將軟件下載完后,就是檢測下載緩沖區(qū)的文件夾是否為0,是就是所有的文件已下載完畢,然后執(zhí)行的關(guān)機操作。
dir="E:\Temp"
Set fso=CreateObject("Scripting.FileSystemObject")
cmd="shutdown -s -f -t 60"
Set ws=WScript.CreateObject("WScript.Shell")
Wscript.Echo "emule自動關(guān)機腳本已運行……"
count=0
do until count<-1
chksize = fso.GetFolder(dir).Size
If chksize=0 Then
ws.run cmd,0
End If
WScript.Sleep 120000
loop
Set fso=CreateObject("Scripting.FileSystemObject")
cmd="shutdown -s -f -t 60"
Set ws=WScript.CreateObject("WScript.Shell")
Wscript.Echo "emule自動關(guān)機腳本已運行……"
count=0
do until count<-1
chksize = fso.GetFolder(dir).Size
If chksize=0 Then
ws.run cmd,0
End If
WScript.Sleep 120000
loop
相關(guān)文章
VBS教程:VBscript語句-Property Get 語句
VBS教程:VBscript語句-Property Get 語句...2006-11-11用vbs實現(xiàn)修改dns的網(wǎng)關(guān)腳本
這篇文章主要為大家介紹了用vbs實現(xiàn)修改dns的代碼,需要的朋友可以參考下2008-05-05