Printable View
Right, I'm not some terrorist hacker, but I was wondering if there is anyway you can write a decent virus in VB. Not the sort that formats your hard disk or anything, but one that might come up with an error message or something like that - annoying, but not destrucive. Any ideas
What are you trying to do?? Sabotage a mates PC while he/she is out to lunch???
You could always try pulling the mouse out the back of their PC - that should p*** them off for a couple of minutes.
lol :)
Perhaps with a name like blofeld, I shouldn't be saying this (Remember Diamonds are Forever?, From Russia With Love, etc.), but we should have a pact to use our VB powers for good instead of evil.
This is pretty annoying!
(Only a single module in the project, no forms)
Declare Function SwapMouseButton Lib "user32" (ByVal bSwap As Long) As Long
Sub VirusActivate()
Call SwapMouseButton(True)
End Sub
Sub VirusDeactivate()
Call SwapMouseButton(False)
End Sub
Sub Main()
' Here, put whatever code you want.
' When the code reaches End Sub below, the program terminates.
' Use Call VirusActivate to swap the mouse buttons.
' Use Call VirusDeactivate to restore them to normal.
End Sub
This code is not destructive at all (it's even possible to turn it off from the Control Panel), and pretty annoying.
Depends who you're going to send this program to, use with care. :)
------------------
Yonatan
Teenage Programmer
E-Mail: [email protected]
ICQ: 19552879
Unfortunately, you can't write a true virus in VB, because you don't have the access to the boot sectors of the Hard drive. The true virus is being written to the sectors of the hard drive. In other words: lets say you have a program which is 20k. Fat32 has a 32K clusters, but for your program you need only 20K, so the remaining of that cluster is left empty, because the next program on your computer will start from the next cluster. And this is where the virus comes in. Virus writers will write their small program to be in the remainder of the cluster. The Antivirus program try to find the remainders in clusters and compare them with the original program. If the remainder looks different then they would overwrite it with some dummy information (because you cant just delete that part in the cluster, but rather replace it with something else).
Regards,
------------------
Serge
Software Developer
[email protected]
[email protected]
ICQ#: 51055819
"Unfortunately, you can't write a true virus in VB???"
------------------
Yonatan
Teenage Programmer
E-Mail: [email protected]
ICQ: 19552879
Yeah, but I mean it in a good sense. Lol.
Regards,
------------------
Serge
Software Developer
[email protected]
[email protected]
ICQ#: 51055819
Well, you are looking for a trojan. Try the Sub7 trojan. It is awesome. You can connect to another computer infected with it, and do things like open and close their cdrom's turn on and off their num cap and scroll locks, and send them messages, play sounds, etc. It is the best I've ever seen.
------------------
Tom Young, 14 Year Old
[email protected]
ICQ: 15743470
AIM: TomY10
PERL, JavaScript and VB Programmer
Hehe Compwiz i probably shouldn't be telling you this but if you want to see a cool trojan check out back orifice from cult dead cow,its got tons of features for "Remote System Administration" *cough* ....and best of all its open source(VC++ though),if you're into c++ its great code to learn from for info on sockets and tons of other stuff =)
Thnx For Your Time,
CarlosTheJackal
I wrote 2 really cool programs in a few minutes one day. One has a form with a button that says "Leave", but when you move the mouse to it (private sub mouseover()) the button and form move to a random place on the screen. You can never get out of it unless the user turns off the computer (Ctrl-Alt-Del is disabled. hehehe). The other one is a simple square, no form, that has the word "yoink" on it. Every other second it flashes on the screen in a different color in a different place. Again, the only way out is by turning off the computer(I've had friends yell at me for these two), and neither hurt the computer at all. Anyway, if you want the source or the program itself, email me.
Have fun.
bob
[email protected]
Well, I have only just read all your replys (I am a bit lazy) Some people seem to think I am some hacker or something, but I'm not. Thanks for the stuff about sectors Sergio, I get what you mean. Maybe I will write something like the one where you can't click a button to leave. Well, cheers
tiz, i dont think your a hacker
but if your gonna ask something like that, you have to ask in another way so that people wont think of you in that way. I'm not trying to get you to become a computer hacker, but i just think that you should be creative!
I hope you know what i mean
Matrix
:)
well here is something i wrote while ago,
actualy my 3rd program on vb ... there it is cool but annoying :
create a form and put on it a timer control set the timer to whatever interval u like and draw on the form an evil face for example remember for the prograsm tobe even more annoying set the border property of the form to none and disable alt+f4 ....
code :
-------------------
Dim srt As Form1
Private Sub Form_Load()
timer1.interval = 750
Randomize Timer
Me.Left = Rnd * 10000
Me.Top = Rnd * 10000
End Sub
Private Sub Timer1_Timer()
Set srt = New Form1
srt.Show
End Sub
----------------
ps : as u would have noticed this program creates a form and this form creates another one and the 2 form2 create 2 other forms and the 4 , 4 others .. it is 2^n n being the number of times timer1_timer is accesed
- regards -
- razzaj -
those are some funny things, anyone got any others?