por que no sacas el Conn de sub...aunque lo mades llamar desde Cargadb() puede que haya problemas.. intentalo aver que pasa!!
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("../DataBase/DataBase.mdb"))
saludos