[size=2] PLS HELP ME OUT.. im a novice in vb (still studying) , i want to create a database with a login | register page , i figured out using adodc but i cant manage to run this idea of mine.. pls help me out ??!!! especially those well experienced coders!!! i will apreciate your help...

Details...? what kind of database (oracle, access, sql, etc..?)

We need to see the code you're written in an attempt to solve this problem, here at </dream.in.code> we have a policy of not doing peoples homework, and it is strictly enforced. Post the code you've tried, let us know what database system you are using and someone will be more than happy to help

oh im sorry sir.. i have posted it as a new topic here is my idea-

i wana create a database in vb6 that is password protected and has a register form

Welcome------
| |
Registration |----Registered Users
| |
Login-----------
|
Database

　
kinda like this = )

here is the code for the registration its kinda hard to figure out whats wrong with this--

/ code
The codes are as follow:


Private Sub cmdcancel_Click( )
End
End Sub

Private Sub cmdClear_Click( )
txtName.Text = ""
txtpassword.Text = ""

End Sub

Private Sub cmdConfirm_Click()

adoUserInfo.Recordset.Fields("username") = txtName.Text--(errors occur here)
adoUserInfo.Recordset.Fields("password") = txtpassword.Text
adoUserInfo.Recordset.Update

frmRegister.Hide

frmlogin.Show

End Sub


Private Sub Frmregister_Load()
adoUserInfo.Recordset.AddNew
End Sub


"and here is the codes for the login page i cant run the register form and i cant either connect the adouserinfo with this another form "

Private Sub cmdLogin_Click()

Dim usrname As String
Dim psword As String
Dim usernam As String
Dim pssword As String
Dim Msg As String


Register.adoUserInfo.Refresh
usrname = txtName.Text
psword = txtpassword.Text


Do Until Register.adoUserInfo.Recordset.EOF
If Register.adoUserInfo.Recordset.Fields("username").Value = usrname And Register.adoUserInfo.Recordset.Fields("password").Value = psword Then
frmlogin.Hide
frmLibrary.Show
Exit Sub

Else
Register.adoUserInfo.Recordset.MoveNext
End If

Loop

Msg = MsgBox("Invalid password, try again!", vbOKCancel)
If (Msg = 1) Then
frmlogin.Show
txtName.Text = ""
txtpassword = ""

Else
End
End If


End Sub
　


can you pro's analyze this one pls ..thanks for replying..