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.![]()

Rispondi quotando