Set MM_sumer_con_STRING = Server.CreateObject("ADODB.Connection") MM_sumer_con_STRING.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("sumer.mdb"))