谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你,不说我爱你就15秒关你机,不信

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/21 11:08:52
谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject(
xTKO@+= CTNԞcN1)4ʫ@!6mG(&Fo7%*ġ+{vff[9`yF;XHssMDs!""vձ_VQ ݯ4 (*H4UCgR2R1HCL>e|Q]i#(ihj,|. epP($!=1Q@>+!YusӜv?=dw/~^ `G ~iU1-t}u{n5 {0FX#22v%rKEDRw3WJ:c, \FrjKZ‚[3yq? \)}cZ rݹ#jote tVUWD$%-nV:Y4 Ӆ6{U48JDo9'Cl|;`yRcGi]⮎. xN4F9OMMys-VV̞AR"ȎD,] r92?C"Duv؟6 ZVB|YˢJm9z<0)~ОcԖ 3Jn;?Jѐgf

谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你,不说我爱你就15秒关你机,不信
谁知道 这是什么 怎么写 帮下忙 我没分了 .
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你,不说我爱你就15秒关你机,不信,试试···"" ",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) + "哈哈哈哈,爱就是爱嘛!"

谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你,不说我爱你就15秒关你机,不信
这是一个VBS脚本
想要它起作用的话
新建一个文本文档(txt)
把这段话粘贴进去
再保存退出
然后把这个文本文档的后缀名改为vbs
回车两次
就ok了
如果还有问题的话可以问我
希望对你有帮助,chun1721提供答案