I am running a Windows 95 computer.  I have a 16-bit application written
for Windows and I have a 16-bit DDE client that connects to it.  This
client also connects to a SQL server database via RDO to write data to
the database that it retrieves from the DDE server.

The ODBC driver is set up to point at the SQL Server, and the DSN is
"DNO_Databases".  I experienced a problem earlier when I had a space in
the DSN, which explains the underscore.

The problem is, the RDO piece is not working.  When I first wrote this
code, I was working with VB 4.0 32-bit version.  I moved the code into a
16-bit application and copied the files msrdo32.dll, msrdc32.ocx, and
msrdc32.oca files into my \\Windows\system directory.

When the application gets to this code, I get the error "Run-time error
429    OLE Automation server can't create object"

Here's the code.  I am glad to provide any further information.

_______________________________________________
szPddialogdsn = "DNO_Databases"

szUid = "user1"
szPwd = "fubar"

szConnectString = ""

rdoEnvironments(0).UserName = szUid
rdoEnvironments(0).Password = szPwd

'This is the line where it goes berserk
Set Cn = rdoEnvironments(0).OpenConnection(dsName:=szPddialogdsn, _
                               Prompt:=rdDriverNoPrompt, _
                               ReadOnly:=False, _
                               Connect:=szConnectString)
________________________________________________

Thanks for any help.

Hey, can RDO even be used in a 16-bit application?

Nope!!!
------------------
Dag Sunde
Softwarer Engineer
Orion Systems As
Oslo, Norway