VB MULTIPLE LOGIN

VB multiple login using dtabase

Page 1 of 1

3 Replies - 10984 Views - Last Post: 04 April 2010 - 02:56 AM Rate Topic: -----

#1 lukaluray  Icon User is offline

  • New D.I.C Head

Reputation: 0
  • View blog
  • Posts: 2
  • Joined: 03-April 10

VB MULTIPLE LOGIN

Posted 03 April 2010 - 06:12 AM

Private Sub cmdlogin_Click()


If txtuname.Text = "" And txtpword.Text = "" Then
MsgBox "No Username/ Password Entered!", vbOKOnly + vbCritical, "LOGIN ERROR"
FRMLOGIN.Show

ElseIf txtuname.Text = dtasign_in.Recordset.Fields("login_name") And txtpword.Text = dtasign_in.Recordset.Fields("login_pass") Then
MsgBox "Welcome!!!", vbOKOnly + vbInformation, "LOGIN SUCCESSFUL"
frmmain.Show
FRMLOGIN.Hide

Else
MsgBox "Try again! Username/ Password is Incorrect!", vbOKOnly + vbCritical, "LOGIN ERROR"
FRMLOGIN.Show
End If

End Sub






GOT STUCK WITH MULTIPLE LOGIN.. HUHUHUHUHU HELP PO...

i am confused with DATA and ADODC

This post has been edited by lukaluray: 03 April 2010 - 10:37 AM
Reason for edit:: Added code tags. PLEASE!!!! [code]...PUT YOUR CODE IN HERE...[/code]


Is This A Good Question/Topic? 0
  • +

Replies To: VB MULTIPLE LOGIN

#2 JackOfAllTrades  Icon User is offline

  • Saucy!
  • member icon

Reputation: 6246
  • View blog
  • Posts: 24,014
  • Joined: 23-August 08

Re: VB MULTIPLE LOGIN

Posted 03 April 2010 - 07:09 AM

Moved from VB Tutorials
Was This Post Helpful? 0
  • +
  • -

#3 AkselJ  Icon User is offline

  • New D.I.C Head
  • member icon

Reputation: 2
  • View blog
  • Posts: 20
  • Joined: 07-March 10

Re: VB MULTIPLE LOGIN

Posted 03 April 2010 - 11:23 AM

I'm sorry, I do not understand what your problem is. Would you care to explain closer?
Was This Post Helpful? 0
  • +
  • -

#4 Kinwang2009  Icon User is offline

  • D.I.C Head

Reputation: 3
  • View blog
  • Posts: 76
  • Joined: 07-February 10

Re: VB MULTIPLE LOGIN

Posted 04 April 2010 - 02:56 AM

View Postlukaluray, on 03 April 2010 - 05:12 AM, said:

Private Sub cmdlogin_Click()


If txtuname.Text = "" And txtpword.Text = "" Then
MsgBox "No Username/ Password Entered!", vbOKOnly + vbCritical, "LOGIN ERROR"
FRMLOGIN.Show

ElseIf txtuname.Text = dtasign_in.Recordset.Fields("login_name") And txtpword.Text = dtasign_in.Recordset.Fields("login_pass") Then
MsgBox "Welcome!!!", vbOKOnly + vbInformation, "LOGIN SUCCESSFUL"
frmmain.Show
FRMLOGIN.Hide

Else
MsgBox "Try again! Username/ Password is Incorrect!", vbOKOnly + vbCritical, "LOGIN ERROR"
FRMLOGIN.Show
End If

End Sub






GOT STUCK WITH MULTIPLE LOGIN.. HUHUHUHUHU HELP PO...

i am confused with DATA and ADODC


Hi,
See my attached help.
Thanks

Attached File(s)


Was This Post Helpful? 0
  • +
  • -

Page 1 of 1