ho fatto così, ma mi rimanda sempre alla pagina d'errore, sia che il record esiste sia se il record non esiste
che posso fare?
codice:
<%
' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect="sponsor_errato.asp"
MM_rsKeyConnection=MM_Connessione_Anagrafiche_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("Cod_Sponsor"))
MM_dupKeySQL="SELECT Sponsor FROM Anagrafiche WHERE Sponsor='" & Replace(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
MM_rsKey.Close
End If
' 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
%>