Domino 7.0.3 auf Linux SLES 10
Hallo,
ich habe einem ODBC Treiber auf den Linux erstellt. Mit dctest kriege ich einem Connect und kann die Tabellen auf der AS/400
sehen. Wenn ich das aus einem Agenten der auf dem Server läuft
probiere, kriege ich folgende GetExtendedErrorMessage Ausgabe:
[unixODBC][Driver Manager]Data source name not found, and no default driver specified
Mein Code:
Sub Initialize
Dim con As New ODBCConnection
Dim qry As New ODBCQuery
Dim result As New ODBCResultSet
Dim sfilename As String
Dim fileNum As Integer
sfilename = "/home/orderline/out/test.txt"
fileNum% = Freefile()
Open sfilename For Output Access Read Write As fileNum%
Set qry.Connection = con
Set result.Query = qry
Call con.ConnectTo("AS400", "user", "pwd")
If con.GetError <> DBstsSuccess Then
Print #fileNum%, con.GetExtendedErrorMessage
End If
qry.SQL = "SELECT * FROM TABLE1"
Dim numrows As Variant
Call result.Execute
Call result.FirstRow
Print #fileNum%, result.NumColumns
Print #fileNum%, result.NumRows
Print #fileNum%, result.CurrentRow
Print #fileNum%, result.GetValue(1)
Print #fileNum%, result.GetValue(2)
Close fileNum%
exitsub:
Call result.Close
Call con.Disconnect
Exit Sub
errorhandler:
Print con.GetError & ": " & con.GetExtendedErrorMessage(con.GetError)
Resume exitsub
End Sub
Was fehlt noch ?
Danke für Tips.
Gruss bo2