Visualizzazione dei risultati da 1 a 5 su 5
  1. #1

    Inserimento con verifica

    Salve a tutti!
    Vorei creare un pagina asp che inserisca dati nel database e controlli se l'inserimento è corretto. Ovvero se inserisco un valore in un campo che non corrisponde al suo tipo di dato, mi dia errore.
    Ho fatto un file che però mi dà sempre: I dati non sono stati inseriti, pur lavorando perfettamente,inserendo o non inserendo nel database, a seconda dei casi.

    il codice è il seguente
    codice:
    <%
    A = Request.Form("Nome")
    B = Request.Form("Cognome")
    C = Request.Form("Email")
    
    DIM ConnessioneDB,modificati
    
    SET ConnessioneDB = Server.CreateObject("ADODB.Connection")
    
    ConnessioneDB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mapPath("\rubrica\rubrica.mdb")
    
    sql = "INSERT INTO anagrafica (Nome,Cognome,Email) Values ('" & A & "','" & B & "','" & C & "')"
    modificadati=0
    On error Resume Next
    ConnessioneDB.Execute sql,modificati
    ConnessioneDB.Close
    SET ConnessioneDB = Nothing
    
    if modificadati=1 then
       Response.write("Grazie!Inserimento Corretto")
       Else
       Response.Write("I dati non sono stati inseriti")
       end if
    
    
    Session.Abbandon
    %>
    come posso sistemarlo?
    Grazie

  2. #2
    modificati o modificadati. deciditi

  3. #3
    modificadati.
    Purtroppo non influiva in quanto era solo diverso nella dichiarazione variabili

  4. #4
    Funge.
    modificadati, come avevi detto
    Grazie!

    codice:
    <%
    A = Request.Form("Nome")
    B = Request.Form("Cognome")
    C = Request.Form("Email")
    
    DIM ConnessioneDB,modificadati
    
    SET ConnessioneDB = Server.CreateObject("ADODB.Connection")
    
    ConnessioneDB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mapPath("\rubrica\rubrica.mdb")
    
    sql = "INSERT INTO anagrafica (Nome,Cognome,Email) Values ('" & A & "','" & B & "','" & C & "')"
    modificadati=0
    On error Resume Next
    ConnessioneDB.Execute sql,modificadati 
    ConnessioneDB.Close
    SET ConnessioneDB = Nothing
    
    if modificadati=1 then
       Response.write("Grazie!Inserimento Corretto")
       Else
       Response.Write("I dati non sono stati inseriti")
       end if
    
    
    Session.Abbandon
    %>

  5. #5

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.