Mmmm probaste con reinstalar Access? (Mas bien el Office)
Sino utiliza esta linea de conexion:
Dim adoCon
Set adoCon = Server.CreateObject ("ADODB.Connection")
adoCon.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("base.mdb")
Saludos!