K
Kenny Louden
Greetings... I am hoping that someone can help me.
Where I am having a problem is the fact I have two (2) different servers -
server1 and server2 - and five (5) different databases db1 thru db5 - each
one representing a site / location / region. My users only have access to one
server and one database based on their site / location / region - so what I
am looking for is when a user selects a server / database that they do not
have access to - that on Error Handle indicate to the user that they do not
have access to server#/db# - please select another server / db.
I guess I am looking for the number that I could do something like this:
Err_Handler:
If Err = nnnn Then
Else
MsgBox "Error " & Err.Number & " " & Err.Description
End If
Resume Exit_Sub
OR
Err_Handler:
If Err = nnnn Then
Else
MsgBox "Error " & Err.Number & "You lack the authority to access
server " &myserver &" / database " &mydatabase &". Please choose another
server / database to continue."
End If
Resume Exit_Sub
Thank you,
Kenny
Where I am having a problem is the fact I have two (2) different servers -
server1 and server2 - and five (5) different databases db1 thru db5 - each
one representing a site / location / region. My users only have access to one
server and one database based on their site / location / region - so what I
am looking for is when a user selects a server / database that they do not
have access to - that on Error Handle indicate to the user that they do not
have access to server#/db# - please select another server / db.
I guess I am looking for the number that I could do something like this:
Err_Handler:
If Err = nnnn Then
Else
MsgBox "Error " & Err.Number & " " & Err.Description
End If
Resume Exit_Sub
OR
Err_Handler:
If Err = nnnn Then
Else
MsgBox "Error " & Err.Number & "You lack the authority to access
server " &myserver &" / database " &mydatabase &". Please choose another
server / database to continue."
End If
Resume Exit_Sub
Thank you,
Kenny