Riprendo il post perchè ho trovato lo script in ASP e ho provveduto a svilupparlo.
Adesso ho un piccolo problema.
Quando vado a visualizzare le immagini purtroppo ho un'errore.
Elenco gli script:
1) Visualizzo i veicoli in tabella
<%
Dim Conn
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("FileDB.mdb")

SQL="SELECT * FROM files order by marca, modello "
Set rec = Server.CreateObject("ADODB.Recordset")
Set Rec=Conn.Execute(SQL)
While Not rec.EOF
%>


<tr>
<td width="44" height="30"><a href="filebis.asp?ID<%=rec("ID")%>">
<img border="0" src="../../icons/foto.gif" alt="visualizza la vettura"></a> </td>

<td width="156" height="30"><font size="2" face="Microsoft Sans Serif" color="#003399"><%=rec("marca")%></font></td>
<td width="170" height="30"><font size="2" face="Microsoft Sans Serif" color="#003399"><%=rec("modello")%></font></td>
<td width="270" height="30"><font size="2" face="Microsoft Sans Serif" color="#003399"><%=rec("optionals")%></font></td>

</tr>
<%
rec.MoveNext
wend
rec.close
set rec = Nothing
Conn.close
Set Conn = Nothing
%>


2) Visualizzo l'immagine collegata ad ogni veicolo
Response.Buffer = True


Dim ID
ID = Request.Querystring("ID")



Dim Conn
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("FileDB.mdb")

Dim rec
Set rec = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT [Content Type], [File Data] FROM files where ID ="&ID
rec.Open sql, conn, 1, 3


If Not rec.EOF Then
Response.ContentType = rec("Content Type")
Response.BinaryWrite rec("File Data")
End If


rec.Close
Set rec = Nothing
Conn.close
Set Conn = Nothing

Errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query 'ID ='.

Un consiglio?
Grazie a tutti.

Ciao.
Ros

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.