Problem Opening Database With Code

[Anne]

Here's the code:

Dim dbsTemp As Database
DoCmd.Hourglass True
Set dbsTemp = OpenDatabase"\\wroroch3UpdatePersonal\
PersonalUpdateRoch.MDB", True)


Every time it hits the "Set dbsTemp" line, Access (97)
freezes (not responding in task manager). This has worked
quite well before. I've tried creating an entirely new
module in a new database, with the same results. The only
change in the environment was the windows updates of the
past few months, I've removed them all and still get the
same results.

Dim dbsTemp As Database
DoCmd.Hourglass True
Set dbsTemp = OpenDatabase"\\wroroch3UpdatePersonal\
PersonalUpdateRoch.MDB", True)

Can anyone tell me what might be wrong? Thanks for any
help you can offer, I'm really stuck here.

 

[Michael Hopwood]

Set dbsTemp = OpenDatabase"\\wroroch3UpdatePersonal\

PersonalUpdateRoch.MDB", True)

Spot the missing bracket? <g>

 

[Guest]

The bracket is in the original code.

Set dbsTemp = OpenDatabase("\\wroroch3
\UpdatePersonal\PersonalUpdateRoch.MDB", True)

Must have typed the e-mail in a hurry.

Any other ideas?

 

[Michael Hopwood]

Have you verified the path is correct (it seems to have changed).

 

[Michael Hopwood]

Also, you are trying to open the db in exclusive mode, does anyone have the
db open already?

 

[TC]

Possibly not the problem, but: methods of the dbengine object should always
be given the dbengine prefix explicitly: DBENGINE.opendatabase. Otherwise,
strange DAO licencing & other errors can occur.

HTH,
TC