i have a problem with generating a userID, can anyone please help me, or give me some pointer.
VB.NET:
If b = "add" Then
Dim cmd2 As New Odbc.OdbcCommand("select user_id from user_tbl", Conn) 'For Primary Key Alpha Numeric ID
Dim dr2 As Odbc.OdbcDataReader
Dim strID As String = "USR-00"
Dim recId As New ArrayList
Dim i As Integer = 1
Conn.Open()
dr2 = cmd2.ExecuteReader
If dr2.HasRows Then
While dr2.Read
If dr2.Item("user_id") = strID & i Then
i += 1
Else
userAcc(1) = strID & i
Exit While
End If
End While
dr2.Close()
End If
Else
userAcc(1) = "USR-001"
End If
Conn.Close()