Ver Mensaje Individual
  #4 (permalink)  
Antiguo 30/11/2005, 09:40
Avatar de richardinj
richardinj
 
Fecha de Ingreso: enero-2005
Ubicación: Ciber Espacio
Mensajes: 2.180
Antigüedad: 13 años, 4 meses
Puntos: 11
cone seto te conectas a la BD en ACCESS
Cita:
<%
Set Cnn = Server.CreateObject("ADODB.Connection")
Cnn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:\Inetpub\wwwroot\resultados.mdb"
%>
aca muestra un registro

Cita:

<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="conexion.asp" -->
<%
'CONEXION CON TABLAS
codfacu=Request.QueryString("facul")
Dim strSQL, objRSfacultad, ingreso
strSQL="SELECT * FROM Total WHERE Total.CodigoC='"&cod&"' ORDER BY Nota DESC"
Set objRSfacultad = Cnn.Execute(strSQL)
%>

<%
while (NOT objRSfacultad.EOF)
%>
.........
...........html.........
.........
Cita:
<%
objRSfacultad.MoveNext
wend
%>
<%
'cierra la conexion
Cnn.Close
set objRSfacultad = nothing
set Cnn = nothing
%>