这段脚本是循环搜索E盘第一层目录的一个文件,直到文件找到后删除而终止,但是它执行后为什么不会自动终止呢?我知道在sub f()中加入WSCRIPT.QUIT可以退出脚本,但我不想退出脚本,而是继续执行脚本其他命令,请问要如何修改呢?- set ws=createobject("wscript.shell")
- set fso=createobject("scripting.filesystemobject")
-
- wc="aa.exe"
- pth="e:\"
-
- while true
- d pth
- wscript.sleep 1000
- wend
- sub d(x)
- for each i in fso.getfolder(x).subfolders
- f i
- next
- end sub
-
- sub f(x)
- for each c in fso.getfolder(x).files
- if instr(1,c,wc,1)>0 then
- fso.deleteFile c
- msgbox "ok"
- end if
- next
- end sub
复制代码
|