I am going to remove all the RDO code and use ADO. That seems to
work.

Thanks.

"Sam Wilson" wrote in message
...
Go to tools/references and add "Microsoft Remote Objects 2.0" or similar

"dman" wrote:

Hi.

Perhaps someone can help me determine what I'm missing here. This little
bit of VBA code works on machines that have VB6 installed on them. When
I take the spreadsheet to another machine is when it fails.

When I debug and mouse over rdoEngine.rdoEnvironments(0)...it says Object
var
or with block var no set. Does early binding(selecting references) not
work?

Private Function OpenDataBase(ByVal Userid As String, ByVal Password As
String) As Boolean
On Error GoTo err_routine
Set gcnXXXEnv = rdoEngine.rdoEnvironments(0)
<more removed
err_routine:
OpenDataBase = False
End Function

Thanks!