03. april 2004 - 22:37Der er
3 kommentarer og 1 løsning
Hente billede fra Access til ASP side
Jeg er begyndt at kikke lidt på ASP da jeg nu har fået brug for at hente billeder fra en database ind på en asp-side. Jeg har fået nedenstående kode sat sammen, idet billedet ikke vises på siden:
<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("fpdb/A2000.mdb") SQL = "SELECT * FROM Kobenhavn ORDER BY ID desc;" Set rs = conn.Execute(SQL)
DO WHILE NOT rs.EOF %> <%= rs("Titel") %><br> <%= rs("Navn") %><br> <img scr="<%=rs("Billede")%>">
<% rs.MoveNext LOOP RS.Close conn.Close Set conn = nothing Set SQL = nothing %>
Kolonnen i databasen hedder "Billede" og filen ligger med filnavn som link - f.eks. "intet_billede".
Jeg kan ikke rigtigt finde problemet - er det noget med stiangivelse eller er det noget forkert i koden?
<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("fpdb/A2000.mdb") SQL = "SELECT * FROM Kobenhavn ORDER BY ID desc;" Set rs = conn.Execute(SQL)
DO WHILE NOT rs.EOF %> <%= rs("Titel") %><br> <%= rs("Navn") %><br> <img scr="<%=rs("Billede")%>">
<% rs.MoveNext LOOP RS.Close conn.Close Set conn = nothing 'Set SQL = nothing <--- du skal ikke sætte din SQL til Nothing, fordi det er ikke et objekt. %>
Det hele skal nok se sådan her du. <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("fpdb/A2000.mdb") SQL = "SELECT * FROM Kobenhavn ORDER BY ID desc;" Set rs = conn.Execute(SQL)
DO WHILE NOT rs.EOF %> <%= rs("Titel") %><br> <%= rs("Navn") %><br> <img src="<%=rs("Billede")%>">
<% rs.MoveNext LOOP RS.Close conn.Close Set conn = nothing %>
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.