I don't have a server to test this on, but what happens when you do this:[VBA]Dim oCnct As ADODB.Connection
Set oCnct = New ADODB.Connection
Set oCnct = VBA.CreateObject("ADODB.Connection", "YourServerName")
[/VBA]