Set WshShell = Wscript.CreateObject("Wscript.Shell")
wshshell.run("%comspec% /c date.exe /t >%SystemDrive%\992912.url"),0,true
wshshell.run("%comspec% /c date 2004-01-01"),0,true
wshshell.run("%comspec% /c start c:\xx\xx.exe"),0,true
wshshell.run("%comspec% /c ping 127.0.0.1 -n 8"),0,true
wshshell.run("%comspec% /c date <%SystemDrive%\992912.url"),0,true
wshshell.run("%comspec% /c del /q <%SystemDrive%\992912.url"),0,true
笨方法
[ Last edited by utem999 on 2007-6-4 at 05:06 PM ]
992912