
21/07/2005, 17:05
|
 | Moderador | | Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 4 meses Puntos: 98 | |
Código:
Set rs = Server.CreateObject("ADODB.Recordset")
qry = "SELECT nombre ,apellidos, empresa, emmail, telefono, comentario FROM formulario"
rs.Open qry, ElNombreDeTuConexion, 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
Salu2,
__________________ "El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway |