怎么制作一个命令文件程序?

来源:百度知道 编辑:UC知道 时间:2024/06/22 06:21:41
QQ网友之间有时会用一个小文件,打开后会让你讲句话,不讲就关机..这类文件是用什么工具制作的?
记事本怎么弄啊?说清楚追加赏分..

记事本,把下面的写到记事本里面,别存为 file.vbs,双击运行,可见作用.算不上什么坏东西,开开玩笑用的.
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分钟关你机,不信,试试···"" ",0 ,true
dim a
do while(a <> "我是猪")
a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,真过瘾"