Re: moving to 2003 from 2k



If the user community doesn't stand up to MS, they'll next be telling us when we can go to the bathroom. "MS...MS...I need to do a #2!!!!" as we dance around clutching our groin area.

Wow... you've been eatin' offa dat lemon tree ain't ya!!! Although I do
agree. My own biggist gripe with MS is the complete drop of VB/ VBA
developer recogition in favour of .NET ...little off the topic of the
OP but it really gets my back up that there's no kind of certification
or official recognition of devlopers from older MS languages. it's the
lack of respect... anywho,

Back to the topic:
That's a great link you gave. Very useful thanks! Think I'll use that
code to work around the problem by having a login app that pulls the
latest version off the network if necessary and logs user in with low
security. I'm not comfortable setting the security low all the time on
all the PCs in the office...

To answer your questions about exclusive opening, here's some code I
nicked from somewhere that you can use as a check before you open to
ensure exclusivity:

Function DatabaseOpen(strDBName As String) As Boolean
'checks if database is already running
On Error GoTo errHandle

DatabaseOpen = True
Dim db As Database
Set db = DBEngine(0).OpenDatabase(strDBName, True) 'Try to open
exclusive
DatabaseOpen = False

exitFunction:
On Error Resume Next
db.Close
Set db = Nothing
Exit Function

errHandle:
Select Case Err.Number
Case 3356
' Database already opened
Case Else
MsgBox Err.Description & "Contact System Administrator",
vbOKOnly + vbCritical
End Select
Resume exitFunction
End Function


works great. I've never used the accessObject.OpenCurrentDatabase
command though - so I can say if it takes a switch or not.

.