Ver Mensaje Individual
  #15 (permalink)  
Antiguo 22/07/2005, 13:25
Avatar de mrjhon
mrjhon
 
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
%>