risolto nel seguente modo:

codice:
BD_Original = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & PathDBName & ";Jet OLEDB:" & "Database Password=" & pwd & ";"
Dest_DB = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DB_Dest & ";Jet OLEDB:" & "Database Password=" & pwd & ";"

m_Jro.CompactDatabase BD_Original, Dest_DB