Ver Mensaje Individual
  #27 (permalink)  
Antiguo 25/04/2008, 05:27
Avatar de plantala
plantala
 
Fecha de Ingreso: abril-2008
Ubicación: Jamaica
Mensajes: 176
Antigüedad: 16 años, 1 mes
Puntos: 1
Re: ayuda con permisos en asp

Cita:
Iniciado por MiguelSB Ver Mensaje
A ver usa éste código que todo está almacenado en la misma carpeta, entonces debe funcionar con ésto:
<table width="300" border="1" cellspacing="0" cellpadding="0">

<% Dim TotalF, i
i=o
Recordset1.CursorType=1

TotalF=Recordset1.RecordCount
while NOT Recordset1.EOF %>
<tr><td><%= Recordset1.fields("Nombre") %></td><td><img src="<%=Recordset1.fields("Imagen")%>" width="329" height="315" /></td>
<%RS.MoveNext
i=i+1
%>
<td><%= Recordset1.fields("Nombre") %></td><td><img src="<%=Recordset1.fields("Imagen")%>" width="329" height="315" /></td></tr>
<%i=i+1
If i<>TotalF then
Recordset1.MoveNext
End If

Wend
%>
</table>

No Olvides que debes de cerrar tu recordset y tu base de datos al final
mira yo lo probé y me funciona sin problemas.

OJO: lo valores del tamaño de tabal y de la las imagen nos referenciales

Saludos es epro te ayude
Buenas!
Mira, te voy a enseñar como me ha quedado el codigo:

-------------------------------------------------------------------------------------------
<table width="300" border="1" cellspacing="0" cellpadding="0" align="center">

<%i=0

TotalF=Recordset1.RecordCount
While NOT Recordset1.EOF %>
<tr><td><img src="<%= Recordset1.Fields("Imagen").Value%>"/></td>
<td><%=Recordset1.Fields("Nombre").Value%></td>
<%Recordset1.MoveNext
i=i+1
%>
<td><img src="<%= Recordset1.Fields("Imagen").Value%>"/></td>
<td><%=Recordset1.Fields("Nombre").Value%></td></tr>
<%i=i+1
If i<>TotalF Then
Recordset1.MoveNext
End If
WEnd %>
</table>
-------------------------------------------------------------------------------------------
Lo de Dim TotalF, i y Recordset1.CursorType=1 esta al principio del codigo, pero lo he puesto.Pues bien, nose porque, pero me da un error que no consigo averiguar que puede ser.He estado toda la mañana intentando arreglarlo, pero no lo he conseguido.Te enseño el error que me da:

-------------------------------------------------------------------------------------------
ADODB.Field (0x800A0BCD)
El valor de BOF o EOF es True, o el actual registro se eliminó; la operación solicitada requiere un registro actual.
/Mikel/Sitio sin nombre 1/Connections/familias.asp, line 37

-------------------------------------------------------------------------------------------
La line 37 la tienes marcada en rojo para que sepas cual es.

En los Recordset1.("Nombre") o ("Imagen"), si no le pongo el ".Value"(como esta en el codigo que me has pasado), me da el mismo error, pero sin marcarme la linea, y si le pongo el value, me da el error que te he enseñado.

Si sabes a que se debe, esperare tu respuesta.

Saludos y GRACIAS!!!