vbs脚本恶搞

vbs脚本恶搞
2009年08月07日
　　=   今儿怪累了，心情也不咋地，那么黑色流星给大家看几个vbs脚本，呵呵，这次不是bat了啊，不过都一样，脚本语言嘛……估计写完了我的系统也应该装好了。
　　代码：
　　hero.vbs
　　'――――――――――――――――――――――――――――――
　　set ws=createobject("Wscript.shell")    
　　for i=1 to 50
　　wscript.sleep 50
　　ws.sendkeys "I'am hero !"
　　ws.sendkeys "%(s)"
　　next
　　ws.sendkeys "%(s)"'――――――――――――――――――――――――――――――――――
　　保存为hero.vbs  ,在winxp下测试通过。（双击它然后迅速点击QQ聊天窗口）
　　唉，更郁闷了现在……有些事情的确是很无奈的，有些痛是无法抹去的……
　　哦？我说什么啦？我什么也没说 啊！接着讲；
　　第一句：set ws=createobject("Wscript.shell")   ，set 是定义由createobject函数返回的变量值。Wscript.shell是系统定义的几个对象中的一个。
　　第二句：这是个for 循环，for与next之间的是循环体，wscript.sleep 50 是说休眠50毫秒。所以它每50毫秒就会发送一串键盘字符“I am hero ！ ALT+S”
　　好了，现在利用sendkeys关机：很简单，只需知道怎么关机就好了，不就是点击“开始--关机--关闭”嘛。
　　'――――――――――――――――――――――――――――――――――――――
　　set ws=createobject("Wscript.shell")    
　　ws.sendkeys "^{esc}"
　　ws.sendkeys "uu"'――――――――――――――――――――――――――――――――――――――
　　这就是模仿上面操作的代码。保存为hello.vbs  然后运行，就关机了。
　　哦，下雨了，但愿明天顺利。