62,614
社区成员
发帖
与我相关
我的任务
分享
option explicit
dim objFolder,objFso
set objFso=createObject("Scripting.filesystemobject")
do while true
on error resume next
set objFolder=objFso.getFolder("\\老爸\文档")
if err.number=0 then exit do
err.clear
loop
call createObject("wscript.shell").run("shutdown -s -t 30")