
15/05/2003, 12:10
|
 | | | Fecha de Ingreso: diciembre-2001
Mensajes: 449
Antigüedad: 23 años, 5 meses Puntos: 2 | |
Coneccion ado y asp error en que estoy mal parese que en la coneccion con la base de dadtos es na de acces que se llama Personas que tine una tabla que sellama Personas con sus respectivos campos id, nombre, apellido
en que estoy mal en contre este codigo pero parese que no se puede ilar con la bases de datos en que estare mal??
estoy tratando de hacer una lista de calificaciones
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Pagina nueva 1</title>
</head>
<body>
<%
'Abre la conexión con la base de datos a través de una conexión ODBC
Set Con = Server.CreateObject("ADODB.Connection")
Con.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("afiliados.mdb"))
'Ejecuta un sentencia SQL de consulta
sql = "SELECT * FROM Personas ORDER BY id"
Set result = con.Execute(sql)
'Recorre todas las filas del resultado
Do While Not result.EOF
if colorfila = 0 then
color= "#DEDEBE"
colorfila=1
else
color="#F0F0F0"
colorfila=0
end if
'Imprimimos el registro con el bgcolor
response.write "<tr><td width='50' bgcolor='"&color&"'><font face='Arial' size='2'>"&result("id")&"</font></td><td width='100' bgcolor='"&color&"'><font face='Arial' size='2'>"&result("nombre")&"</font></td><td width='100' bgcolor='"&color&"'<font face='Arial' size="2">"&result("apellido")&"</font></td></tr>"
'Pasa a la siguiente fila
result.MoveNext
Loop
'Cerramos las conexiones y el recordset
result.Close
Set result = Nothing
con.Close
Set con = Nothing
%>
</body>
</html>
Gracias. |