no se muestran las imagenes

[palomahayes]

hoooola de nuevo...

tengo un problem...

tengo una pagina asp

llamada RECONOCIMIENTOS.ASP, esa pagina tiene una imagen, que al darle click, me va abrir una pagina con los empleados reconocidos, pero estas fotos estan en una base de datos

<a onClick="on_Click('Galeria.asp')"><img src="../imagenes/Primer_Semestre.gif" width="130" height="120" border="0">
</a>

Abre la pagina de GALERIA.asp, en esa tengo este codigo..

<%id=1 %>
<img border="0" src="imagenes.asp?id=<%=id%>">

Esa supuestamente me abre la pagina de imagenes.asp donde le mando el parametro de la id de la imagen

y este es el codigo de la pagina de IMAGENES.ASP que es la que me imprime las imagenes que estan adentro de la pagina de internet

Código PHP:

      <%
    Response.Buffer = True
    Request.querystring("id")
    If Len(ID) < 1 Then
    ID = 7
    End If
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "IntraDEOP","IntraDEO", "deop"
    Set rs = Server.CreateObject("ADODB.Recordset") 
    rs.Open "Select img_data, img_contenttype from IO_Imagenes where img_pk ="& _
    ID Conn, 2, 4
    if not rs.eof then
    Response.ContentType= rs("img_contenttype") 
    Response.BinaryWrite rs("img_data") 
    end if                
    rs.Close
    Set rs = Nothing
    %> 
   

EL PROBLEMA ES QUE NO LAS PUEDO VER... PORQUE?
QUE ME FALTA?
O QUE PUDIERA ESTAR HACIENDO MAL?

[JuanRAPerez]

porque no mandas el id

Tienes

onClick="on_Click('Galeria.asp')"

tiene que ser

onClick="on_Click('Galeria.asp?id=TuVariableID')"

en donde TuVariableID puede ser un RS o una variable o como tu lo quieras manejar

suerte

[palomahayes]

estoy haciendo el ejemplo y le doy valor a 1

empleados.asp

Código PHP:

  <%id=1%>
<a onClick="on_Click('Galeria.asp?id=<%=id%>'"> 
   

galeria.asp

Código PHP:

  <%
id=Request.QueryString("id")
%>
<img border="0" src="imagenes.asp?id=<%=id%>" alt="<%=id%>"> 
   

imagenes.asp

Código PHP:

  <%
    Response.Buffer = True
    Request.querystring("id")
    If Len(ID) < 1 Then
    ID = 7
    End If
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "IntraDEOP","IntraDEO", "deop"
    Set rs = Server.CreateObject("ADODB.Recordset") 
    rs.Open "Select img_data, img_contenttype from IO_Imagenes where img_pk ="& _
    ID, Conn
    if not rs.eof then
    Response.ContentType= rs("img_contenttype") 
    Response.BinaryWrite rs("img_data") 
    end if                
    rs.Close
    Set rs = Nothing
    %> 
   

SIGUE SIN MOSTRARME NADA... NO APARECE NINGUN ERROR Y EL LINK DE LA IMAGEN ME SALE ASI

http://15.10.6.161/intradeo/nueva/DEO/imagenes.asp?id=2

[JuanRAPerez]

ummm

Código PHP:

  response.Expires = 0
response.Buffer  = True
response.Clear 
   

abres tu base de datos
creas tu record set
verificas que traiga informacion
si trae haz esto

Código PHP:

  response.ContentType ="image/jpeg"
response.BinaryWrite(rspic("FOTOGRAFIA")) 
   

suerte

[palomahayes]

hola buen dia

ya hice todo lo posible por intentar veeeeeeeeer las imagenes de mi base de datos pero no puedo


y ya no se que hacer!!!

tengo mi base de datos en sql server
pero donde guardo la imagen, no se si tiene que ser en un campo Image o en binary o que???

o depende de como lo halla guardado?

por favor ayuda!!!

Código PHP:

    <%
   ' Clear out the existing HTTP header information
   Response.Expires = 0
   Response.Buffer = TRUE
   Response.Clear
 
     'Change the HTTP header to reflect that an image is being passed.
       Response.ContentType = "image/gif"
 
   ' Change the HTTP header to reflect that an image is being passed.
    Set Conn = Server.CreateObject("ADODB.Connection")
    Set rs = Server.CreateObject("ADODB.Recordset") 
    Conn.Open "IntraDEOP","IntraDEO", "deop"
   ' The following open line assumes you have set up a System DataSource
   ' by the name of myDSN.
   Set rs = Conn.Execute("SELECT img_data,img_contenttype,img_pk FROM IO_Imagenes WHERE img_pk='2'")
    'Response.ContentType = rs("img_contenttype")
    Response.BinaryWrite rs("img_data")
    Response.End
    
    rs.Close
    Set rs = Nothing
    Conn.Close
    Set Conn = Nothing
  
   %> 
   

como tengo que tener la imagen en que tipo de campo??

ahi solo me muestra el recuardo de la imagen con la x osea no se ve...
en otras anteriores me salia puro codigo basura


please heeeeeeelp!! >_<