
19/07/2005, 12:44
|
 | | | Fecha de Ingreso: noviembre-2003 Ubicación: Lima
Mensajes: 102
Antigüedad: 21 años, 5 meses Puntos: 0 | |
Visualizar Imagenes Binarios DB - Codigo raro Ave si me dan una ayudadita
Quiero visualizar una tabla de productos cada unos con sus respectivos datos los datos del producto estan en una tabla y la imagen binaria esta en otra tabla asi ke quiero enlazar estos 2 . el enlaze esta listo y bien,pero al kerer visualizar la imagen en la misma imprecion me sale un codigo llenos de datos raro.
Que puede ser ?
Gracais
Les dejo mi CODIGO
rsProdInfo("productImg") pertecene a un recorset de otra tabla donde tiene el ID
<% dim ID
ID = rsProdInfo("productImg")If Len(ID) < 1 Then
ID = 7
End If
%>
<% dim rsimagen
Set rsimagen = Server.CreateObject("ADODB.Recordset")
' opening connection
rsimagen.Open "select * from Files where ID = " & _
ID, conn, 2, 4
If Not rsimagen.EOF Then
While Not rsimagen.EOF Response.ContentType = rsimagen("Content Type")
Response.BinaryWrite rsimagen("File Data")
rsimagen.MoveNext
Wend
Else
Response "No Record Found"
End If
%> |