Ver Mensaje Individual
  #17 (permalink)  
Antiguo 01/06/2009, 10:06
jazz75
 
Fecha de Ingreso: mayo-2009
Mensajes: 3
Antigüedad: 15 años, 10 meses
Puntos: 0
Respuesta: Cargar y recuperar imagen en ASP, ayuda por favor!...

HOla amigos, muchas gracias por la ayuda, ya pude resolver el problema de mostrar imagenes cargadas en una BD access a traves de ASP, aki os dejo la solucion. Pero se me plantea otro problema, me gustaria saber si es posible poder cargar las imagenes desde el entorno grafico de asp como por ejemplo en el tuento o facebook q pulsas un boton de "Examinar" buscas la imagen y asi la indexa a la Base de datos, seria mucho mas comodo que tener que estar abriendo la base de datos continuamente cada vez que kiera indexar una imagen nueva. Muchas gracias por todo. Un AMIGOS ;)
Aqui os dejo mi solucion a mi problema anterior:

<%Option Explicit%>
<!--#include file="adovbs.inc"-->
<!--#include file="conexion.asp"-->


<html >
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Documento sin t&iacute;tulo</title>
</head>

<body>





<%
dim RS
'Creamos los objectos a usar.
Set RS = Server.CreateObject ("ADODB.RecordSet")
RS.ActiveConnection=conexion
'Conectamos a la conexion a la base de datos.

RS.Source = "SELECT * FROM IMAGENES"
'Abrimos la tabla pidiendo todos sus registros.
RS.Open
Do While not RS.EOF
'Mostramos el nombre del articulo.
Response.Write RS("articulo") & " - "
'Ahora el path de la imagen.
Response.Write RS("imagen") & " - "
'Y la siguiente linea muestra la imagen.
Response.Write "<IMG SRC="""&RS("imagen")&""">"
Response.Write "<BR>"
RS.MoveNext
Loop
'Cerramos y eliminamos todo.
RS.Close
Conexion.Close
Set RS = Nothing
Set Conexion = Nothing
%>




</body>
</html>