% Set conn = Server.CreateObject("ADODB.Connection") strDbPathAndName = "C:\Inetpub\vhosts\voyance-immediate.fr\private\database.mdb" connstring = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & strDbPathAndName conn.Open connstring %>