emule自动关机脚本
更新时间:2008年11月03日 11:34:05 作者:
emule自动关机脚本,它的功能就是将软件下载完后,就是检测下载缓冲区的文件夹是否为0,是就是所有的文件已下载完毕,然后执行的关机操作。
dir="E:\Temp"
Set fso=CreateObject("Scripting.FileSystemObject")
cmd="shutdown -s -f -t 60"
Set ws=WScript.CreateObject("WScript.Shell")
Wscript.Echo "emule自动关机脚本已运行……"
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自动关机脚本已运行……"
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
相关文章
VBS教程:VBscript语句-Property Get 语句
VBS教程:VBscript语句-Property Get 语句...2006-11-11
最新评论