Ver Mensaje Individual
  #4 (permalink)  
Antiguo 10/11/2002, 19:32
Avatar de Gurrutello
Gurrutello
 
Fecha de Ingreso: enero-2002
Ubicación: Ontario,Toronto [Canada]
Mensajes: 2.017
Antigüedad: 23 años, 3 meses
Puntos: 6
hola
no se si es esto a lo que te refires


<% dim oConn, RS
'Creamos los objectos a usar.
Set oConn = Server.CreateObject ("ADODB.Connection")
Set RS = Server.CreateObject ("ADODB.RecordSet")
oConn.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("Noticias.mdb")
'Conectamos a la conexion a la base de datos.
sql = "SELECT * FROM Noticias"
'Abrimos la tabla pidiendo todos sus registros.
RS.Open sql, oConn
Do While not RS.EOF
'Ahora el path de la imagen.
'Y la siguiente linea muestra la imagen. %>
<table width="75%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="7%"><img src="<%=RS("imagen")%>"></td>
<td width="93%"><%=rs("noticia")%> </td>
</tr>
</table>
<%
RS.MoveNext
Loop
'Cerramos y eliminamos todo.
RS.Close
oConn.Close
Set RS = Nothing
Set oConn = Nothing
%>
espero que te sirva
__________________
Un Saludo
www.tutores.org
Asp | Php | Javascript | Perl | Coldfusion | Flash | +- 2000 codigos