VB-Tec.de Visual Basic - Technik, FAQ, Tricks, BeispieleBilder zurückliefern |
<img src="showpic.asp?ID=555">Hier soll also das Bild mit der internen Nummer 555 dargestellt werden. Dazu muss die aufgerufene ASP-Datei
<%
'ID des gewünschten Bildes bestimmen:
ID = Request.QueryString("ID")
'Rückgabetyp setzen:
Response.ContentType = "image/jpg"
'Bild aus DB lesen:
Connect = "...Connect-String..."
SQL = "select Bild from tBilder where ID=" & ID
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open SQL, Connect
'Bild ausgeben:
Response.BinaryWrite rs(0)
'Aufräumen:
rs.Close
Set rs = Nothing
%>
© Jost Schwider, 21.06.2000-05.10.2000 - http://vb-tec.de/bilder.htm