...U盘里是否有某个文件,如1.VBS,如果没有就关机 哪位高手能帮...
发布网友
发布时间：2024-10-24 18:58
共2个回答
热心网友
时间：1天前
'*******************************代码开始************************************
dim ex
ex=0 '设定一个变量，如果文件不存在的话该变量值为0
set fso=wscript.createobject("scripting.filesystemobject")
set wshshell=createobject("wscript.shell")
'判断是否有U盘，可以用do-loop循环来实现实时监控
for each a in fso.drives
set a=fso.getdrive(a)
if a.drivetype=1 then '如果该盘是可移动磁盘
b=a.rootfolder
call pdwj(b)
wscript.sleep 3000
exit for
end if
next
if ex=0 then '如果ex=0，即没有找到1.vbs，则关机
wshshell.run "cmd /c shutdown -s"
end if
wscript.quit
sub pdwj(mb) '判断文件
'下面是目录中的文件
set mb=fso.getfolder(mb)
for each c in mb.files
if fso.getfilename(c)="1.vbs" then '如果找到1.vbs的话，就关机
ex=1 '如果文件存在的话，ex=1
end if
next
'下面是目录中的文件夹
for each d in mb.subfolders
call pdwj(d) '重新判断该目录是否有1.vbs这个文件
end if
next
end sub
'*******************************代码结束************************************
如果想实现实时监控是否有U盘的插入的话，就用do——loop循环执行代码中 “判断是否有U盘” 这个过程，只是会消耗CPU，楼主自己决定吧。
热心网友
时间：1天前
