
CODE: [Copy to clipboard]Set WshShell=CreateObject("Wscript.Shell")
Intnum=Inputbox("Please enter a number: ")
If Intnum=>6 Then
WshShell.Run "cmd.exe"
Wscript.Sleep 6000
Elseif Intnum=>1 and Intnum<6 Then
WshShell.Run "iexplorer.exe"
End if
CODE: [Copy to clipboard]没有Wscript.End的用法。Set WshShell=CreateObject("Wscript.Shell")
Intnum=Inputbox("Please enter a number: ")
If Intnum=>6 Then
WshShell.Run "cmd.exe"
Wscript.Sleep 6000
Elseif Intnum=>1 and Intnum<6 Then
WshShell.Run "iexplorer.exe"
Wscript.Quit(0)
End if
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |