What's new

Closed Vb6.0 no duplicate entry

Status
Not open for further replies.

kerlx24

Addict
Joined
Jul 31, 2018
Posts
83
Reaction
8
Points
99
Age
32
Mga paps. Patulong po kung sino may alam ng coding ng no duplicate entry sa vb6.0. Need lang sa project.TIA
 
Primary Key ba tinutukoy mo? Kung ganun, basically, gagawa ka ng function nyan.
Sample:
- assuming gamit mo ay ODBC and MySQL database.
- User creation sample (a.k.a User SignUp)




Private Sub btnSave_Click()
If CHECK_Username(txtUsername.Text) = True Then
MsgBox "Username already exist.", vbCritical
Else
MsgBox "Username is available.", vbInformation
End If
End Sub

Private Function CHECK_Username(xUsername As String) As Boolean
'function will return TRUE if pass username (xUsername) has duplicate
'FALSE if none

Dim rs As New ADODB.Recordset
rs.Open "SELECT username FROM tblUser WHERE username='" & xUsername & "';", cn, 1, 3
If rs.RecordCount <> 0 Then 'meaning may duplicate
CHECK_Username = True
Else
CHECK_Username = False
End If
End Function
 
Primary Key ba tinutukoy mo? Kung ganun, basically, gagawa ka ng function nyan.
Sample:
- assuming gamit mo ay ODBC and MySQL database.
- User creation sample (a.k.a User SignUp)




Private Sub btnSave_Click()
If CHECK_Username(txtUsername.Text) = True Then
MsgBox "Username already exist.", vbCritical
Else
MsgBox "Username is available.", vbInformation
End If
End Sub

Private Function CHECK_Username(xUsername As String) As Boolean
'function will return TRUE if pass username (xUsername) has duplicate
'FALSE if none

Dim rs As New ADODB.Recordset
rs.Open "SELECT username FROM tblUser WHERE username='" & xUsername & "';", cn, 1, 3
If rs.RecordCount <> 0 Then 'meaning may duplicate
CHECK_Username = True
Else
CHECK_Username = False
End If
End Function
Thanks paps.
 
Welcome, pero tama ba yung sagot ko sa tanong mo? hehe
Di ko kasi maxado naintindihan tanong eh. Pero sana nakatulong kahit papano.
 
Welcome, pero tama ba yung sagot ko sa tanong mo? hehe
Di ko kasi maxado naintindihan tanong eh. Pero sana nakatulong kahit papano.
Gumamit nalang ako ng autogenerate id button paps. Pero ginamit ko yung code sa pagcreate ng account para sa login. Ty lodi
 
Gumamit nalang ako ng autogenerate id button paps. Pero ginamit ko yung code sa pagcreate ng account para sa login. Ty lodi

Welcome TS.
Ok ang idea mo sa auto-generation ng ID, pero take note na hindi yan feasible for a multi-user system.
 
Welcome TS.
Ok ang idea mo sa auto-generation ng ID, pero take note na hindi yan feasible for a multi-user system.

TAMA NGA TS, DAPAT TALAGA MAG SET KA NANG DATABASE COMMAND AT DATABASE READER PARA MA IDENTIFY ANG DUPLICATE ENTRY.. PERO OK NA RIN YAN BASTA MAAYOS NA ANG RUNNING NG SYSTEM..
 
Status
Not open for further replies.

Similar threads

Back
Top