繁體中文当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > emule自动关机脚本
VBScript 中的 emule自动关机脚本
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-11 浏览: 170 ::
收藏到网摘: n/a
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
评论 (0) All
