Problema connessione database :S

[Nik]

Salve!
Sono di nuovo io =___=
Ho un problema con la connessione a un database.. o meglio: Ho creato una pagina con un form e lo indirizzo a un'altra pagina dove c'è la connessione al database.
Vi riporto questo codice. Il file si chiama risp.asp e c'è solo codice asp:

<%
on error resume next
img = request.form("img")
codice = request.form("codice")
anteprima = request.form("anteprima")
categoria = request.form("categoria")
notex = request.form("notex")


Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\inetpub\webs\nichiwebcom\mdb-database\archivio.mdb;"


set rs = Server.CreateObject("ADODB.Recordset")
SQL = "INSERT INTO work (img, codice, anteprima, categoria, notex) "
SQL = SQL & "VALUES ('" & img & "', '" & codice & "', '" & anteprima & "', '" & categoria & "', '" & notex & "')"
rs.Open SQL, conn
%>

<%
response.redirect "grazie.htm"
%>

Effettivamente mi arriva alla pagina grazie.htm, però non mi inserisce nulla nel database!

Spero di essere stata chiara

 

[dena]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
'definizione della variabile
dim img
img = request.form("img")
dim codice
codice = request.form("codice")
dim anteprima
anteprima = request.form("anteprima")
dim categoria
categoria = request.form("categoria")
dim notex
notex = request.form("notex")
'Connessione al database
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & "dbq=" & Server.MapPath("mdb-database/archivio.mdb")
strConn=strConn & ";pwd="
Conn.Open strConn

'stringa di interrogazione tabella
sql = "SELECT * FROM work"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
if (rs.eof) then
rs.addnew
'PENSO CHE I CAMPI DELLA TABELLA WORK SIANO QUESTI TRA LE VIRGOLETTE....
rs.fields("img")=(img)
rs.fields("codice") = (codice)
rs.fields("anteprima") = (anteprima)
rs.fields("categoria") = (categoria)
rs.fields("notex") = (notex)
rs.update
response.redirect "grazie.htm"
ELSE
'MESSAGGIO CHE I DATI NON SONO STATI INSERITI
END IF

'chiusura database
rs.close
set rs = nothing
conn.close
set conn = nothing
%>

Prova così, dovrebbe funzionare altrimenti, fammi sapere.

 

[Nik]

Allora ho sostituito al mio codice quello che mi hai dato tu, e mi da questo errore:

Tipo di errore:
ADODB.Recordset (0x800A0CC1)
Impossibile trovare l'oggetto nell'insieme corrispondente al nome o al numero richiesto.
/NEW/risp.asp, line 28

 

[Nik]

Problema risolto!
Alla fine era una cavolata.. mi sento tanto una scema =___=
L'errore era il nome alla tabella, appena ho sostituito Work con Inserimento ha funzionato tutto. Grazie mille dena per il tuo aiuto, mi spiace d averti fatto perdere tempo :S

 

[dena]

Ma di niente, siamo qua per aiutarci a vicenda, mi sembrava di aver letto dal tuo codice che la tabella si chiamasse WORK....vabbè e scusa....
Buon ferragosto!!