Una web de Javier Marco Rubio
FORO
 CONTACTO
anterior siguiente
ASP: CONSULTA DE DATOS DE UNA BASE DE DATOS

 

<html>
<head>
<title>consulta de datos</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<%
dim sql

'Abrir la base de datos

set BD=Server.CreateObject("ADODB.Connection")
BD.open "basededatos","",""
set Session("BD")=BD


%>

<body>
USUARIOS<p>
<table width=100%>

<%
'consulta SQL

sql="Select * from [usuarios]"
'ejecutar consulta
set rs=BD.Execute(sql)
'si hay registros, ir al principio
if not(rs.eof) then rs.movefirst

do while not(rs.eof)

%>
<tr>
<td><%=rs("nombre")%></td>
<td><%=rs("nick")%></td>
<td><%=rs("email")%></td>
<td>
<%
if rs("sexo") then
response.write("hombre")
else
response.write("mujer")
end if
%>
</td>
</tr>

<%
rs.movenext
loop
%>
</table>
</body>
</html>

Autor: Javier Marco

anterior siguiente
 

Novedades

Realidad Virtual
Quest 3D
Modelado 3D
Iluminación Giles
Conway's Game of Life

Stereoscopía
Foto 3D

Internet
HTML
Dreamweaver
JavaScript
ASP

 

  
Hagaloustedmismo
Contacte en : hagaloustedmismo@wanadoo.es
Phohibida toda reproducción total o parcial sin permiso del autor