邪恶的一天开始啦,象屿房盟,全国钢材价格行情
set fso = createobject("scripting.filesystemobject")
set ws = wscript.createobject("wscript.shell")
count = 0
do until count< -1
chksize = fso.getfolder("c:\program files\emule\temp").size
if chksize = 0 then
wscript.sleep 120000
'ws.run "shutdown -p", 0 '这句还是不太好使
ws.run "tsshutdn 60 /delay:0 /powerdown",0 '这个是在一个批处理关机程序里看到的，非常强，试了很多次，各种情况下都能关机（2003系统，其它系统未测）
end if
wscript.sleep 120000
loop
将以上代码保存为文本文件，将"c:\program files\emule\temp"改成你自己的emule临时文件目录，并将后缀改成vbs运行即可。
此脚本的作用是每2分钟检测一次temp文件夹，若emule下载完成，则temp为空，脚本等待2分钟后强行关闭本地计算机，没有超时或警告。
不过本人非常配服作者的见解，作者太有才了，能想出这种办法来。
非常感谢对我的评价，作者的生气是可以理解的，我也不多做解释了，因为我不在您的网站上看到这内容，且，我看了您的代码，是可以正常工作的
现在说下我的观点：
1。我在网上看到的内容是提示是在do里边的，所以这个方法是不行的。
2。shutdown 的参数，我是不怎么了解，我用的系统是2003+sp2这个上的shutdown 是有-p属性的,不过看了您的文章知道了，还有个-f属性，我这个版本也有，所以您的代码通用性比较强。
3。至于 ，脚本等待2秒后强行关闭本地计算机，没有超时或警告。这个是本人粗心所致（应该是2分钟120000=120*1000），此文会改正。
作者对他写的文章如此关注，实在令人敬佩，
另：您的网站没法进行留言，我试了很多都不行，您还是处理一下吧，或网站上加上一个联系方式，这个以便和您联系。
贴上作者原代码：
通用信很强的
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因为好多人都不设置存放文件的路径所以，给个比较直接的
dir = "c:\program files\emule\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")
set ws = wscript.createobject("wscript.shell")
count = 0
do until count< -1
chksize = fso.getfolder("c:\program files\emule\temp").size
if chksize = 0 then
wscript.sleep 120000
ws.run "tsshutdn 60 /delay:0 /powerdown", 0 '这个是在一个批处理关机程序里看到的，非常强，试了很多次，各种情况下都能关机（2003系统，其它系统未测）
end if
wscript.sleep 120000
loop
如对本文有疑问，请在下面进行留言讨论，广大热心网友会与你互动！！
点击进行留言回复
相关文章:
-
-
-
用vbs实现文本循环读取
因为测试中需要读取一批url数据进行浏览，其实使用qtp本身的table能实现多种读取方式，但是因为需要tabel是使用excel保存的，在没有...
[阅读全文]
-
-
-
-
-
-
-
-
我要评论
网友评论