Privet vsem,

Mne nujno sdelat' connect k Informix-DataBase. K soshaleniu nepoluchaetsja :(
Err.Description pishet, chto slishkom dlinnoe imja u 'myDSN'.

Moshet li kto nibud' pomotch??

Private Sub myConn()
On Error GoTo Fl

Dim conn As New ADODB.Connection
Dim rs1 As New ADODB.Recordset

Dim qr
Dim myDSN As String

myDSN = "C:\...\ODBC\Data Sources\dbconn.dsn"
conn.Open myDSN, User, Pass

qr= "select ..."
rs1.Open qr, conn, adOpenKeyset, adLockReadOnly
.................................

rs1.Close
conn.Close

Fl:
Debug.Print Err.Number
Debug.Print Err.Description
Debug.Print Err.Source
End Sub

zaranee spasibo

Tak???

conn.ConnectionString = "Driver={INFORMIX 3.30 32 BIT};" & _
"database=xxx;" & _
"server=xxx;" & _
"host=xxx;" & _
"uid=xxx;" & _
"password=xxx;" & _
"protocol=xxx;" & _
"service=xxx"


k soshaleniu toshe ne rabotaet