Punya Account Blogger?
Form Login dengan Data1
Posted by Sofyan SOX on Selasa, 11 Mei 2010 in

Download | klik nu ieu



Private Sub Command1_Click()
  Data1.Recordset.FindFirst "username = '" & tuser.Text & "' and password = '" & tpass.Text & "'  "
  If Data1.Recordset.NoMatch Then
     MsgBox "kamu salah masukin username atau password"
     tuser.Text = ""
     tpass.Text = ""
     tuser.SetFocus
  Else
     Me.Hide
     user.Show
  End If
End Sub





0 Responses to “Form Login dengan Data1”:

Posting Komentar