
22/07/2005, 13:25
|
 | | | Fecha de Ingreso: junio-2005
Mensajes: 155
Antigüedad: 19 años, 10 meses Puntos: 0 | |
HOLA DE NUEVO TENGO ESTE CODIGO Y NO ME MUESTRA NADA POR KE
<%
Set rs = Server.CreateObject("ADODB.Recordset")
qry = "SELECT nombre ,apellidos, empresa, mail, telefono, comentario FROM formulario"
rs.Open qry, Libro, 3, 3
if not rs.EOF then
while not rs.EOF
response.write rs(0) & " | " & rs(1) & " | " & rs(2) & " | " & rs(3) & " | " & rs(4) & " | " & rs(5) & "<br>"
rs.MoveNext
wend
else
response.write "No se encontraron registros"
end if
rs.Close
Set rs = Nothing
ObjConn.Close
Set ObjConn = Nothing
%> |