🔒 Closed Vb6.0 no duplicate entry

[kerlx24]

Mga paps. Patulong po kung sino may alam ng coding ng no duplicate entry sa vb6.0. Need lang sa project.TIA

 

[wally05]

Sa database?

 

[aprjhe143]

IF ELSE COMMAND PO YAN TS..

 

[kerlx24]

Sa database?

Oo paps. Alam mo po ba code?

 

[stultusrex]

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

 

[kerlx24]

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.

 

[stultusrex]

Welcome, pero tama ba yung sagot ko sa tanong mo? hehe
Di ko kasi maxado naintindihan tanong eh. Pero sana nakatulong kahit papano.

 

[kerlx24]

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

 

[stultusrex]

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.

 

[aprjhe143]

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..