controllare i campi di una form

[spila]

vorrei controllare i campi di una form e finchè si tratta di farlo sul form steso me la cavo con java (del tipo controlla se e vuoto o inserisci solo testo ecc...)

per andare a controllare l'inserimento di dati ad un db la cosa mi risulta più difficile nel senso che il mio controllo dovrebbe esser :

controllare il dato se è presente nel db non inserirlo e dammi un'ALERT tipo java che dice dato già presente .

vorrei un estenzione di dreamweaver se fosse possibile ....

altra cosa un estensione lo fa ma mi da poi la redirect ad una nuova pagina io invece l'errore lo vorrei in un MsgBox .....


questo è il codice che fa la redirect :

' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect = Errore.asp
MM_rsKeyConnection=MM_Apparecchiature_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("Certificato"))
MM_dupKeySQL="SELECT SocietaTaratura FROM SocietaTaratura WHERE SocietaTaratura='" & 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
' 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

questo mi visualizza la pagina errore.asp allora ho pensato che se metto :

MM_dupKeyRedirect = MsgBox("Vuoi cancellare il record ???")

al posto di errore.asp
mi dovrebbe dare il messagbox invece nada
dove sbaglio ?


grazie mille

[bboynike]

Prova cosi e dimmi se funziona.

MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect = Errore.asp
MM_rsKeyConnection=MM_Apparecchiature_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("Certificato"))
MM_dupKeySQL="SELECT SocietaTaratura FROM SocietaTaratura WHERE SocietaTaratura='" & 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
' the username was found - can not add the requested username
MM_qsChar = "?"
If (InStr(1,MM_dupKeyRedirect,"?") >= 1) Then MM_qsChar = "&"
MM_dupKeyRedirect = MsgBox("Vuoi cancellare il record ???") 
End If
MM_rsKey.Close
End If

Nicolò

[spila]

non fa nulla !!!

non mi da errore ma inseriisce sempre senza blocaare i doppioni .