Get the DateModified property of a form in another DB 1

[jkirkland]

I am trying to read the DateModified property of a form in another db (to compare it to a form in the current db that has the same name)

I know how to get this property in the currentdb using:

Dim Obj as Object

For each Obj in CurrentProject.AllForms
Debug.Print Obj.DateModified
Next Obj

I don't know how to reference another db as the "CurrentProject" though.

Any suggestions?

 

[PWise]

Dim mydb As Access.Application
Set mydb = CreateObject("Access.Application")
mydb.OpenCurrentDatabase "c:\xxxx.mdb"
Debug.Print mydb.Application.CurrentProject.AllForms("formname").DateModified

 

[jkirkland]

Awesome! That worked perfectly.
Thanks for the help