本帖最后由 pcl_test 于 2015-4-16 16:49 编辑
vbs- arr = array("LibraryText.txt","messagetext.txt")
- For i=0 To UBound(arr)-LBound(arr)
- wscript.createobject("wscript.shell").run "cmd.exe /C stool.exe -m Resource.wpk "+arr(i)
- WScript.Sleep 1000
- wscript.createobject("wscript.shell").run "cmd.exe /C del /f q "+arr(i)
- WScript.Sleep 1000
- Next
复制代码
|