Hola scrach2005, no se porque falla, tal vez te equivocaste al teclear los pasos,, mira, lo que tienes que hacer es copiar estos datos, luego los pegas en un archivo txt, y los vuelves a copiar y pegar en un archivo que se llame conn.asp okis????, ya tienes la llamada a la base de datos de mocosoft
<%
Dim ConnectString, conn
ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("basededatos.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnectString
%>
Y en tu pagina (en formato asp), en la que trabajes y quieras hacer una consulta a la bd, haces la llamada al archivo conn.asp, y a trabajar, es muy facil
%>
<!--#include file="conn.asp"-->
<%
sql = "SELECT * from users WHERE username = '" & username & "'"
Set rsPag = Server.CreateObject("ADODB.Recordset")
rsPag.Open sql, conn, 3, 3
Un saludo