MS Access on Terminal Server

  • Thread starter Thread starter Dan
  • Start date Start date
D

Dan

I have a problem that I cannot seem to fix.

We are using an MS Access 2003 database (converted from Access XP) on a
Windows 2000 Terminal Server set up as a domain, using Active Directory. All
Access and Windows updates applied to date.

the database worked fine on a Windows 2000 server set up as a workgroup but
NOT on the domain.

The Specific Problem is as follows:

I have a main mdb file with references many mde using the following code:

Function RunSelection(strPath As String, strModule As String, strFunction As
String)
Dim ref As References
Dim strCmd As String
On Error GoTo SelectionError

References.AddFromFile (strPath)
strModule = "[" & Left(strModule, Len(strModule) - 4) & "]."
Application.Run strFunction
Exit Function

SelectionError:
Select Case Err.Number
Case 32813
Resume Next
Case 35021
MsgBox "Error Number : " & Err.Number & vbCrLf & vbCrLf & "Description
: " & Err.Description, , "Error Message"
MsgBox "Path: " & strPath & _
vbCrLf & "Module: " & strModule & _
vbCrLf & "Function: " & strFunction
Resume Next
Case Else
MsgBox "Error Number : " & Err.Number & vbCrLf & vbCrLf & "Description
: " & Err.Description, , "Error Message"
Resume Next
End Select
End Function

The above code has worked flawlessly on the work group server, but NOT the
domain server.

Anybody have ANY ideas on how to correct this?
 
Open a code module then;
Tools|Options|General|Break on All Errors;
then what error is generated and on what line.

--
Regards,

Dave Patrick ....Please no email replies - reply in newsgroup.
Microsoft Certified Professional
Microsoft MVP [Windows]
http://www.microsoft.com/protect

:
|I have a problem that I cannot seem to fix.
|
| We are using an MS Access 2003 database (converted from Access XP) on a
| Windows 2000 Terminal Server set up as a domain, using Active Directory.
All
| Access and Windows updates applied to date.
|
| the database worked fine on a Windows 2000 server set up as a workgroup
but
| NOT on the domain.
|
| The Specific Problem is as follows:
|
| I have a main mdb file with references many mde using the following code:
|
| Function RunSelection(strPath As String, strModule As String, strFunction
As
| String)
| Dim ref As References
| Dim strCmd As String
| On Error GoTo SelectionError
|
| References.AddFromFile (strPath)
| strModule = "[" & Left(strModule, Len(strModule) - 4) & "]."
| Application.Run strFunction
| Exit Function
|
| SelectionError:
| Select Case Err.Number
| Case 32813
| Resume Next
| Case 35021
| MsgBox "Error Number : " & Err.Number & vbCrLf & vbCrLf &
"Description
| : " & Err.Description, , "Error Message"
| MsgBox "Path: " & strPath & _
| vbCrLf & "Module: " & strModule & _
| vbCrLf & "Function: " & strFunction
| Resume Next
| Case Else
| MsgBox "Error Number : " & Err.Number & vbCrLf & vbCrLf &
"Description
| : " & Err.Description, , "Error Message"
| Resume Next
| End Select
| End Function
|
| The above code has worked flawlessly on the work group server, but NOT the
| domain server.
|
| Anybody have ANY ideas on how to correct this?
|
|
 
Back
Top