كد ثبت ركورد غير تكراري

[Ali_Alizadeh]

سلام
مي خوام چك كنم اگه يه نفر با كد ملي 12 اطلاهات ثبت كرده دوباره با همون كد 12 نتونه چيزي ثبت كنه؟
هركاري ميكنم كدي كه مينويسم جواب نميده
با تشكر

[shahkaar]

ساده ترين راهش اينه كه با sql ركوردهاي با كدملي x رو فيلتر كني


SELECT * from mydatabase WHERE userCode = '0091232456'

اگر Recordset هيچ ركوردي برنگردوند يعني همEOF و هم BOF مساوي True بودند معلوم ميشه كه چنين شخصي ثبت نام نكرده و اطلاعاتش توي اين بانك وارد نشده.
ضمنا اگر فيلد كد ملي هم Unique بگيري چه بهتر كه باعث ميشه يك فيلد اطلاعات تكراري نداشته باشه.

[Web Matrix Pro]

<%
' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect="error.asp"
MM_rsKeyConnection=MM_Connect_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("Name"))
MM_dupKeySQL="SELECT name FROM Pishnahad WHERE name='" & MM_dupKeyUsernameValue & "'"
MM_adodbRecordset="ADODB.Recordset"
set MM_rsKey=Server.CreateObject(MM_adodbRecordset)
MM_rsKey.ActiveConnection=MM_rsKeyConnection
MM_rsKey.Source=MM_dupKeySQL
MM_rsKey.CursorType=0
MM_rsKey.CursorLocation=2
MM_rsKey.LockType=3
MM_rsKey.Open
If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
' the username was found - can not add the requested username
MM_qsChar = "?"
If (InStr(1,MM_dupKeyRedirect,"?") >= 1) Then MM_qsChar = "&"
MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue
Response.Redirect(MM_dupKeyRedirect)
End If
MM_rsKey.Close
End If
%>