Visualizzazione immagine separata dal database access

[wolverain]

scusate ragazzi un ifformazione ho un db che ha varie immagini io visualizzo tutto il db con le immagini poi provo ad estrarre solo un immagine con la descrizione ma mi da sempre errore :
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query 'id='.

/visualizza_novita_ita.asp, riga 23
e questo è il codice:
<%

Dim idPar
set idPar = request("id")

Dim RS, Conn
Set Conn = Server.CreateObject ("ADODB.Connection")
Conn.ConnectionString="driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/mdb-database/articoli.mdb") & ";"
Conn.open

Set RS = Server.CreateObject ("ADODB.Recordset")

sql = "SELECT immagine FROM articoli WHERE id=" & idPar

set objRs = Conn.execute(sql)

Do while NOT objRs.EOF
Response.write "<table border=0 cellpadding=5 >"
response.write "<tr><td>[img]/public/images/" & objRs("Immagine") & "[/img]</td></tr>"
Response.write "</table><table border=0 cellpadding=5 >"
response.write "<tr><td><font color='#bd6d48'>[b]Descrizione:</b</td><td><font color='#bd6d48'>" & objRs("Descrizione_ita") & "</td></tr>"

objRs.Movenext
Loop
Response.write "</table>"

Conn.Close
Set Conn = Nothing

%>
grazie a tutti

[cavicchiandrea]

Togli il set dalla variabile idPar.
Id è un valore numerico? Come è settato nel tabella articoli?
Poi non estrai nella select il campo Descrizione_ita

[wolverain]

l'id è il contatore quindi penso sia numerico grazie ora provo e ti farò sapere

[wolverain]

niente mi da sempre lo stesso errore pure togliendo sia il set che la descrizione

[cavicchiandrea]

Prova cosi:
sql = "SELECT immagine, id FROM articoli WHERE id=" & idPar
sei sicuro che id che passi sia presente nel database?

[vic53]

Originariamente inviato da wolverain
scusate ragazzi un ifformazione ho un db che ha varie immagini io visualizzo tutto il db con le immagini poi provo ad estrarre solo un immagine con la descrizione ma mi da sempre errore :
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query 'id='.

/visualizza_novita_ita.asp, riga 23
e questo è il codice:
<%

Dim idPar
set idPar = request("id")

Dim RS, Conn
Set Conn = Server.CreateObject ("ADODB.Connection")
Conn.ConnectionString="driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/mdb-database/articoli.mdb") & ";"
Conn.open

Set RS = Server.CreateObject ("ADODB.Recordset")

sql = "SELECT immagine FROM articoli WHERE id=" & idPar

set objRs = Conn.execute(sql)

Do while NOT objRs.EOF
Response.write "<table border=0 cellpadding=5 >"
response.write "<tr><td>[img]/public/images/" & objRs("Immagine") & "[/img]</td></tr>"
Response.write "</table><table border=0 cellpadding=5 >"
response.write "<tr><td><font color='#bd6d48'>[b]Descrizione:</b</td><td><font color='#bd6d48'>" & objRs("Descrizione_ita") & "</td></tr>"

objRs.Movenext
Loop
Response.write "</table>"

Conn.Close
Set Conn = Nothing

%>
grazie a tutti

Hai creato un oggetto RS e non lo hai usato, invece hai musato objRS che non hai creato...ma che il sistema crea automaticamente perchè lo hai chiamato in una function
poi quando leggi il recordset devi usare "select * from articoli ..." se vuoi leggerew gli altri campi della tabella e poi in ultimo devi usare nella tabella Access un campo chiave e se
string devi mettere gli apici mentrre se numerico no!...
poi alla chiusura non devi subito chiudere la connessione ma invece il recordset con l'istruzione RS.close se usavi RS.... oppure objRS.close poi devi usare Set objkRS=nothing solo se non usi piu nel programma il recordser e alla fine del programma puoi chiudere la connessione con conn.close e set conn=nothing....

Spero di essere stato chiaro..
Ciao Vic53