% dim conn,connstr connstr="DBQ="+server.mappath("pd/ironman.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" set conn=server.CreateObject("adodb.connection") conn.open connstr %>