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

    Campo non salvato in db

    Ciao a tutti. Ho creato una ASP da mettere sul mio sito che registra in un database Access ogni utente che si registra dai miei programmi in VB.NET. Tutti i campi vengono salvati correttamente tranne un campo di testo che risulta essere sempre vuoto.
    Ho provato a cambiare il nome del campo in ogni modo ma niente.
    Questo è il mio codice:

    <%
    Option Explicit
    Const adLockPessimistic = 3
    Const adOpenkeyset = 3
    Const adPeRSistXML = 1
    Const adStateOpen = 1
    Const adVarChar = 200
    Const adInteger = 3
    Const NOMEDB = "Registrazioni.mdb"
    Dim CONN
    Dim RS
    Dim XMLStream
    Dim Query
    dim campo1 = request.QueryString("campo1")
    dim campo2 = request.QueryString("campo2")
    dim campo3 = request.QueryString("campo3")
    dim campo4 = request.QueryString("campo4")
    On Error Resume Next
    Set RS = Server.CreateObject("ADODB.Recordset")
    Set CONN = Server.CreateObject("ADODB.Connection")
    CONN.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(NOMEDB)
    CONN.Open
    RS.Open "INSERT INTO tabella (nome, cognome, mail, città) VALUES ('" & campo1 & "', '" & campo2 & "', '" & campo3 & "', '" & campo4 & "')" , CONN, adOpenkeyset, adLockPessimistic
    RS.close
    Set RS = Nothing
    %>

    Tutti i campi vengono salvati tranne il campo4. Sono tutti campi di testo. Non penso sia un problema di VB dato che ho verificato che il valore viene inviato all'asp.
    Grazie a tutti.

  2. #2
    ----------------------------------------------------
    impariamo a fare un po' di debug

    ...
    CONN.Open
    Dim SQL
    SQL="INSERT INTO tabella (nome, cognome, mail, città) VALUES ('" & campo1 & "', '" & campo2 & "', '" & campo3 & "', '" & campo4 & "')"
    Response.Write "maGGica SQL...: " & sql
    Response.Flush
    RS.Open SQL , CONN, adOpenkeyset, adLockPessimistic
    RS.close
    ...

    poi posta quello che viene a video
    ----------------------------------------------------

    p.s. quel "città" come nome di campo è un po'.... "irregolare"

  3. #3
    Sono riuscito così:
    <%
    response.write "<script language="+chr(34)+"VBscript"+chr(34)+" > msgbox "+chr(34)+SQL+chr(34)+"</script>"
    %>

    E mi è uscita la query giusta quando l'ho aperta da IE (perchè con VB mi dà errore) quindi ho controllato e ho visto che ha aggiunto tutti i campi.
    Allora ho trovato un errore quasi invisibile in VB e adesso funziona tutto!!! Grazie mille

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 © 2025 vBulletin Solutions, Inc. All rights reserved.