Comment me connecter à une base de donnée MS Access sans connecteur ODBC DSN?

<%
' Emplacement de votre base de données
cheminBase = "/bd/basededonne.mdb"

' Objet de connexion ADO
Set conn = Server.CreateObject ("ADODB.Connection")

' On ouvre la connexion
conn.open "driver={Microsoft Access Driver (*.mdb)};DBQ="&cheminBase&";"

' Requête SQL
query="SELECT * FROM table"

' Objet RecordSet
Set rs = Server.CreateObject("ADODB.Recordset")

'On ouvre le RecordSet
rs.Open sql, conn, 3, 3

'On parcourt les données
Do While Not rs.EOF
??? Response.Write(rs("champ_de_la_table") & "<br >")
rs.MoveNext
Loop

' On libère les ressources
rs.close
set rs=nothing

conn.close
set conn=nothing

%>

Veja também