dim connstr
dim db
titre flou
title="::Méthode de connexion à la base de données ::"
db="mdb/#oplan_pic.mdb" 'L'emplacement du fichier de base de données
Définir conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Ouvrir connstr
%