Ho un form semplice:
<html>
<head></head>
<body>
<form method="POST" action="scrivi.asp">
Nome utente:
<input type="text" name="NOME">
Cognome utente:
<input type="text" name="COGNOME">
MATRICOLA:
<input type="text" name="MATRICOLA">
CORSO:
<input type="text" name="CORSO">
E-mail utente:
<input type="text" name="E_MAIL">
<input type="submit" value="INVIA">
</form>
</body>
</html>
ed una pagina ASP chiamata scrivi.asp
<%
Dim Conn, RS
' Recuperiamo i dati dal form
dim strNome
strNome = request.form("NOME")
dim strCognome
strCognome = request.form("COGNOME")
dim strMatricola
strMatricola = request.form("MATRICOLA")
dim strCorso
strCorso = request.form("CORSO")
dim strEmail
strEmail = request.form("E_MAIL")
' Verifichiamo che i campi non siano vuoti...
If strNome <> "" and strCognome <> "" and strEmail <> "" Then
' Se i campi NON sono vuoti procediamo...
' Connessione al DB
Set RS = Server.CreateObject("ADODB.RecordSet")
DSNName = "DRIVER=Microsoft Access Driver (*.mdb);DBQ="
DSNName = DSNName & Server.MapPath("/CORSODISEGNO/DATI.mdb")
Conn.Open DSNName
' Lavoriamo sul Recordset
RS.Open "DATI", conn, 3, 3
RS.addnew
RS("NOME") = strNome
RS("COGNOME") = strCognome
RS("MATRICOLA") = strMatricola
RS("CORSO") = strCorso
RS("E_MAIL") = strEmail
RS.update
' Chiusura del database
RS.Close
set RS = Nothing
Conn.Close
set Conn = Nothing
' Risposta a video di conferma
response.write "Scrittura avvenuta correttamente!"
' Se i campi SONO vuoti...
Else
response.write "Errore! Nessun campo può essere vuoto!"
' Chiudiamo la condizione IF
End If
%>
quando non riempio i campi e premo invio mi appare giustamente la schermata: errore!nessun campo può essere vuoto. e fin qui ok...
ma se li compilo tutti e premo invio mi da la schermata: impossibile visualizzare la pagina.
il mio database si chiama DATI e contiene una sola tabella chiamata tabella.....dove sbaglio?
Rispondi quotando
VVoVe: 
