How do I compact a Database with a database password using ADO?

There is an example in this site, but is uses DAO, and the database does not have a database password set.