Hi icemanmt78

Try replacing the following

Set Mark = OpenDatabase("C:\windows\desktop\mark.mdb", , False, "mufc")

With

Set Mark = OpenDatabase("C:\windows\desktop\mark.mdb", , False, "PWD=mufc")

I think this will sort out your problem but I haven't used DAO for quite some time.

Ian