imagen en access y asp

07/09/2006 - 22:54 por Eduardo Ponce | Informe spam
Buenos dias

Tengo una tabla en access que tiene un campo OLE en donde le debo grabar un
archivo de imagen. Mi problema radica en que he logrado grabar el archivo de
imagen en la base de datos, PERO NO lo puedo visualizar l aimagen por access
direntamente ni por codigo en asp. he estado chequeando y hay un unico
ejemplo en internet donde un debehacer un RESPONSE.BYNARYWRITE rs("Nombre
del campo") pero no me funciona. POR FAVOR QUE ME FALTA.
este es el codigo que uso

' mostrar la imagen
Set Conn23 = Server.CreateObject("ADODB.Connection")
Conn23.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
("e:\mibasededatos.mdb"))
set rsSolRancho= CreateObject("ADODB.Recordset")
sqltxt="Select * from AutorizacionesRanchoAlegre where Cedula='" &
session("Cedula") & "' "

rsSolRancho.LockType =3
rsSolRancho.Open sqltxt, Conn23

Response.ContentType = rsSolRancho("FotoContentType")
Response.Write rsSolRancho("FotoReciente")
rsSolRancho.Close
Set rsSolRancho= Nothing
 

Leer las respuestas

#1 Jordi Maycas
13/09/2006 - 10:53 | Informe spam
Ostras yo visualizo las imagenes asi:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Frameset//EN"
"http://www.w3.org/TR/html4/frameset.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Documento sin t&iacute;tulo</title>
</head>
<% Dim ID
ID=Request("ID") %>
<frameset rows="*" cols="366,613">
<frame src="foto.asp?ID=<%=ID%>">
<frameset rows="96,299" cols="*">
<frame src="prueba5.asp?ID=<%=ID%>">
<frame src="perfil.asp?ID=<%=ID%>">
</frameset>
</frameset>
<noframes><body>
</body></noframes>
</html>

La pagina es: http://buscamigos.sytes.net

"Eduardo Ponce" escribió en el mensaje
news:uy7dK%
Buenos dias

Tengo una tabla en access que tiene un campo OLE en donde le debo grabar
un archivo de imagen. Mi problema radica en que he logrado grabar el
archivo de imagen en la base de datos, PERO NO lo puedo visualizar l
aimagen por access direntamente ni por codigo en asp. he estado chequeando
y hay un unico ejemplo en internet donde un debehacer un
RESPONSE.BYNARYWRITE rs("Nombre del campo") pero no me funciona. POR FAVOR
QUE ME FALTA.
este es el codigo que uso

' mostrar la imagen
Set Conn23 = Server.CreateObject("ADODB.Connection")
Conn23.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
("e:\mibasededatos.mdb"))
set rsSolRancho= CreateObject("ADODB.Recordset")
sqltxt="Select * from AutorizacionesRanchoAlegre where Cedula='" &
session("Cedula") & "' "

rsSolRancho.LockType =3
rsSolRancho.Open sqltxt, Conn23

Response.ContentType = rsSolRancho("FotoContentType")
Response.Write rsSolRancho("FotoReciente")
rsSolRancho.Close
Set rsSolRancho= Nothing


Preguntas similares