<% dim conn1 dim Strconn Set conn1 = Server.CreateObject("ADODB.Connection") Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; " Strconn=Strconn & "DBQ=" & Server.MapPath("/cn/database/##%^%^##df%^$^$%^$%^#$^%E^#^dfgdfg^NwebCn_Site.mdb") conn1.Open Strconn %>