Automatic Login System in VB.NET and source code

[bc-vnt]

Download : Automatic Login System.exe download - 2shared

Public Class Form1
    Public Declare Sub SetCursorPos Lib "user32" (ByVal X As Integer)
    Public Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Integer, ByVal dx As Integer, ByVal dy As Integer)
    Public Const MOUSEEVENTF_LEFTDOWN = &H2
    Public Const MOUSEEVENTF_LEFTUP = &H4
    Public Const MOUSEEVENTF_RIGHTDOWN = &H8
    Public Const MOUSEEVENTF_RIGHTUP = &H10

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        TextBox1.Text = Cursor.Position.X
        TextBox1.Text = Cursor.Position.Y
    End Sub

    Private Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim first As Integer = TextBox3.Text
        Dim second As Integer = TextBox4.Text
        SetCursorPos(first, second)
        mouse_event(MOSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
        mouse_event(MOSEEVENTF_LEFTUP, 0, 0, 0, 0)
        Timer2.Enabled = True
    End Sub

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        SendKeys.Send("bc_vnt")
        SendKeys.Send("(TAB)")
        SendKeys.Send("(PASSWORD)")
        SendKeys.Send("(ENTER)")
        Timer2.Enabled = False
    End Sub

    Private Sub SetCursorPos(ByVal first As Integer, ByVal second As Integer)
        Throw New NotImplementedException
    End Sub

    Private Function MOSEEVENTF_LEFTDOWN() As Integer
        Throw New NotImplementedException
    End Function

    Private Sub mouse_event(ByVal p1 As Integer, ByVal p2 As Integer, ByVal p3 As Integer, ByVal p4 As Integer, ByVal p5 As Integer)
        Throw New NotImplementedException
    End Sub

    Private Function MOSEEVENTF_LEFTUP() As Integer
        Throw New NotImplementedException
    End Function

End Class

[.Slacker]

Si ce cauta asta la programe hack?

[GraphLog]

Si ce cauta asta la programe hack?

E linkul de download la inceputul postului,dar tu esti chior.

Daca ti-a dat codul sursa iti era greu sa ti-l faci singur chiar si fara download?

[.Slacker]

E linkul de download la inceputul postului,dar tu esti chior.

Daca ti-a dat codul sursa iti era greu sa ti-l faci singur chiar si fara download?

La tine daca nu e .exe nu e program. A dracu tehnologie"

Bravo ma bine ca ai editat

Nu e vorba de asta omule de download sau ceva..E vorba ca nu e hack. E fix pielea pulii

[bc-vnt]

Si ce cauta asta la programe hack?

Sorry daca nu este ok categoria la care am postat , rog un moderator sa il mute

10x !