errore inserimento record

**diego2000** · 15-11-2005, 21:37

premetto che non conosco bene ASP, che quanto segue l'ho scopiazzato a destra e a manca, qualcuno sa dirmi cosa non va nel seguente codice???
<html>
<head>
</head>
<body>

<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:/Inetpub/wwwroot/DB/test.mdb")

Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.Open "dati", objConn , 0, 3, 2
objRs.AddNew
strsql = "INSERT INTO dati (nome, email, telefono) Values('Pippo', 'pippo@hgh.it', '0000454');"
objConn.Execute strsql
objRs.Update
objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing
%>

</body>
<html>

ecco il messaggio di errore:Tipo di errore:
ADODB.Recordset (0x800A0CB3)
Il set di record corrente non supporta l'aggiornamento. Potrebbe trattarsi di una limitazione del provider o del tipo di blocco selezionato.
/dbase3.asp, line 18

per testare 'sta roba, mi connetto a localhost
nel caso i campi da inserire nel database provengano da un form, come si modifica l'istruzione

"INSERT INTO dati (nome, email, telefono) Values('Pippo', 'pippo@hgh.it', '0000454');"

**cavicchiandrea** · 15-11-2005, 22:31

prova cosi:

codice:

<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:/Inetpub/wwwroot/DB/test.mdb")

Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.Open objConn
strsql = "INSERT INTO dati (nome, email, telefono) Values('"&Request.Form("nome")&"', '"&Request.Form("email")&"', '"&Request.Form("telefono")&"')"
objConn.Execute strsql

objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing
%>

**diego2000** · 16-11-2005, 12:11

ciao andrea, grazie per la risposta ma purtroppo non ci siamo...
ho provato 1000 script e modofiche diverse e sempre errori
l'ultimo script cher ho usato è:

<html>
<head></head>
<body>

<%
Dim nome, email, cellulare
nome=Request("nome")
email=Request("email")
cellulare=Request("cellulare")
response.write("Dati inseriti: ")
response.write("
")
response.write("Nome: "+nome)
response.write("
")
response.write("Email: "+email)
response.write("
")
response.write("Cell: "+cellulare)

Set objConn= Server.CreateObject("ADODB.Connection")
objConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\DB\test.mdb"
Set objRs = Server.CreateObject("ADODB.Recordset")
objRS.Open "dati", objConn, 1, 3, 2
objRS.AddNew
strsql = "INSERT INTO dati (nome, email, cellulare) Values('pippo', 'bella@io.it', '44444444')"
objConn.Execute strsql
objRS.Update
objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing

%>

</body>
</html>

ma ecco il messaggio di errore:

Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Driver ODBC Microsoft Access] Per l'operazione è necessaria una query aggiornabile.
/gb.asp, line 24

sono sempre su localhost. dipende da questo???

**deus81** · 16-11-2005, 13:34

Nei permessi del file (database), aggiungi l'utente "IUSR_GUEST" oppure "IUSR_[utente]", e dagli i permessi di scrittura.

IUSR = Internet User.

Ciao.

**maximum** · 16-11-2005, 13:39

codice:

Set objRs = Server.CreateObject("ADODB.Recordset") 
objRS.Open "dati", objConn, 1, 3, 2 
objRS.AddNew     
strsql = "INSERT INTO dati (nome, email, cellulare) Values('pippo', 'bella@io.it', '44444444')" 
objConn.Execute strsql 
objRS.Update 
objRs.Close 
Set objRs = Nothing

Non ti servono!!!

Fai così:

codice:

strsql = "INSERT INTO dati (nome, email, cellulare) Values('pippo', 'bella@io.it', '44444444')" 
objConn.Execute strsql

P.S.:Ovviamente fai opportune REPLACE sui valori che vai ad inserire.

Discussione: errore inserimento record

Strumenti discussione

Ricerca discussione

Visualizza

errore inserimento record

Permessi di invio