Salve ragazzi.
Ho un piccolo problema che da solo non stò riuscendo a superare.
Vi spiego.
Ho due pagine asp.
1 Iscrizioni.asp
2 inserisci_iscrrizioni.asp (quella che elabora i dati inseriti nel form..almeno in toria)
Bene!
Sembra che faccia tutto correttamente ma i miei dati non vengono inseriti nel DB. ma mi appare una volta premuto invia dalla pagina iscrizioni.asp la pagina inserisci_iscrizioni.asp con su la scritta "Inserisci tutti i dati" (utilizzata nel caso l'utente non riempie tutti i campi) sia che io inserisca i dati che io non li inserisca.
Spero di aver spiegato il problema..comunque posto il codice inserisci_iscrizione.asp in modo che qualcuno di voi più esperto veda l'intoppo dove stà.Dove è che sbaglio?codice:<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <title>INSERIMENTO DATI</title> </head> <body> <% ' CONTROLLO CHE I CAMPI SIANO STATI COMPILATI CORRETTAMENTE IF Len(Request("Cognome")) = 0 or Len(Request("Nome")) = 0 or Len(Request("DataNascita")) = 0 or Len(Request("Citta")) = 0 or Len(Request("Provincia")) = 0 or Len(Request("ResidenzaVia")) = 0 or Len(Request("ResidenzaCivico")) = 0 or Len(Request("ResidenzaCitta")) = 0 or Len(Request("ProvinciaResidenza")) = 0 or Len(Request("CodiceFiscale")) = 0 or Len(Request("CittaResidenza")) = 0 or Len(Request("Telefono")) = 0 or Len(Request("Cellulare")) = 0 or Len(Request("Email")) = 0 or Instr(Email, "@") = 0 or Instr(Email, ".") = 0 then ' UNO DEI CAMPI E' VUOTO %> <p align="center"><font face="Verdana" size="3">Torna indietro e compila tutti i campi correttamente![/b]</font></p> <% ' ALTRIMENTI AGGIUNGE IL MESSAGGIO else ' PERCORSO DEL DATABASE url_DB = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("++) Set Conn = Server.CreateObject("ADODB.Connection") conn.Open url_DB ' APRE LA CONNESSIONE AL DATABASE Set RecSet = Server.CreateObject("ADODB.Recordset") SQL = "SELECT * FROM ****" RecSet.Open SQL, Conn, adOpenStatic, adLockOptimistic ' AGGIUNGE IL MESSAGGIO NEL DATABASE Recset.Addnew RecSet("Cognome") = Cognome RecSet("Nome") = Nome RecSet("DataNascita") = DataNascita RecSet("Citta") = LuogoNascita RecSet("Provincia") = Provincia RecSet("ResidenzaVia") = Residenza RecSet("ResidenzaCivico") = Numero RecSet("ResidenzaCitta") = Domicilio RecSet("ProvinciaResidenza") = Provincia2 RecSet("CodiceFiscale") = CodiceFiscale RecSet("Telefono") = Telefono RecSet("Cellulare") = Cellulare RecSet("Email") = Email ' AGGIORNA IL DATABASE, CHIUDE LA CONNESSIONE RecSet.Update RecSet.Close Conn.Close end if %> </body>
Grazie in anticipo
Ciao Giorgio.
Rispondi quotando
