怎樣寫virus

wei_en

原帖由 goodday 于 2008-7-7 02:36 AM 发表

你的那个 xp 还可以 vista 完全抛跑不到的
什么鬼 功课哦？？？

老大，能帮我完成它吗？？

goodhermit95

给你们一些暗示
用timer
哎呀，直接放出来
form_load
timer1.enabled = true
timer1.tick
system.diagnotise.process.start ("http://")
msgbox ("I am virus" & vbcrlf & _
                 "hahahahaha,fun?")
shell ("ping 192.168.0.1")
嘿嘿嘿，电脑hang不要骂我

goodhermit95

um
请问
msgbox ("are you sure?",msgboxstyle.vbyesno,"system speed up")
if ans = yes then
regwrite (aaaaaaaa)
elseif ans = no then

end if

这个vb 2005 跑不到，要怎样？

wei_en

原帖由 goodhermit95 于 2008-7-8 09:56 PM 发表

给你们一些暗示
用timer
哎呀，直接放出来
form_load
timer1.enabled = true
timer1.tick
system.diagnotise.process.start ("http://")
msgbox ("I am virus" & vbcrlf & _
                 "hahahah ...

我不明白叻~
如果是java语言，应该就没问题。

goodhermit95

java 我就不会了
大概是这样的结构
open form code
enable timer

timer code
start process "http://"
ping 192.168.0.1

大概是这样，包你电脑HANG机
rootname放explorer.exe

goodday

1. 
   
2. dim returnresult as string = msgbox ("are you sure?",msgboxstyle.vbyesno,"system speed up")
   
3. if returnresult = MsgBoxResult.yes then
   
4.   console.write("aaaaaaaa")
   
5. else
   
6.    console.write("bbbbbbbb")
   
7. end if
   

复制代码

goodday

简单的　

ｆｏｒｍａｔ　ｃ：

按　ｙ　

最快

dious

那有沒有辦法弄一個autorun的format c>y

咸猪腿

原帖由 goodday 于 2008-7-10 04:36 PM 发表
简单的　

ｆｏｒｍａｔ　ｃ：

按　ｙ　

最快

什么是 ｙ??

磨刀狂徒

yes...

回goodday
弄个bat 文件，强行对lsass进行修改，加个代码format c:/q，就更隐秘了。。。