Monday, January 30, 2017

Koding Login di VB.NET Access

Koding Login di VB.NET Access

Private Sub Blogin_Click(sender As Object, e As EventArgs) Handles Blogin.Click
        Call koneksi()
        cmd = New OleDbCommand("select * from admin where username ='" & Tusername.Text & "' and pass ='" & Tpassword.Text & "'", conn)
        dr = cmd.ExecuteReader
        dr.Read()
        If dr.HasRows Then
            Me.Visible = False
            MenuUtama.Show()
        Else
            MsgBox("login salah, periksan kembali username dan password")
            Tusername.Focus()
        End If
    End Sub

2 comments:

Tutorial Membuat LEVEL ADMIN dengan status strip lengkap dengan koding

Tutorial Membuat LEVEL ADMIN dengan status strip lengkap dengan koding. ------------------- PERHATIKAN LANGKAH-LANGKAH BERIKUT!!! (urut) ...