★我要吧★

 找回密码
 注册[Register]
搜索
qq空间相册密码查看为什么登陆后需要激活无法注册?

关于电脑启动程序的一点点小花样。泡妞必备。绝对经典。

[复制链接]
发表于 2012-4-16 10:26:55 | 显示全部楼层 |阅读模式
呵呵
这个不难。。
把下面的复制进记事本,保存为.VBS类型的就可以了。有时候不懂的可以再问我
超级好玩。忽悠女孩子们简直就是利器。
下面是我自己用的代码。你自己也可以更改的。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.EⅩE /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.EⅩE /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,一切皆有可能~"
各位可以去试试。嘿嘿。
发表于 2012-4-20 09:42:01 | 显示全部楼层
说到泡妞我喜欢
回复 支持 反对

使用道具 举报

发表于 2012-7-23 18:50:26 | 显示全部楼层
学习了 感谢分享 支持支持
回复 支持 反对

使用道具 举报

头像被屏蔽
发表于 2012-7-23 19:53:54 | 显示全部楼层
好文章 学习到了 多谢楼主
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则

QQ|手机版|小黑屋|☆我要吧☆ ( 豫ICP备13016831号-1 )

GMT+8, 2024-11-24 02:08 , Processed in 0.056719 second(s), 18 queries .

Powered by abc369 X3.4

© 2001-2023 abc369.

快速回复 返回顶部 返回列表