imagen en access y asp

07/09/2006 - 22:55 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 FJTL
07/09/2006 - 23:59 | Informe spam
Deberías preguntar en microsoft.public.es.access y en
microsoft.public.es.asp.
Saludos.
Fran.


"Eduardo Ponce" escribió en el mensaje
news:uFN8l%
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