Hallo an alle,

ich habe zwar schon ähnliche Themen hier gefunden, aber diese waren mir immer etwas zu unausführlich, daher nochmal diese Frage.

Ich möchte mittels eines eigenen Programms (in meinem Fall mit VB) einen Connect zur AS/400 über den iSeries Access ODBC Treiber realisieren und ein paar Daten auslesen.

Nun gibt es ja mehrere Ansätze.
- ODBC.Connection
- ADODB. Connection

Bis jetzt habe ich ein DSN eingerichtet und schon ein paar Codeschnipsel geschrieben, aber ich bekomme einfach kein Connect hin.

ODBC:
Code:
 Dim odbcCon As Odbc.OdbcConnection
 Dim reader As Odbc.OdbcDataReader
 Dim cmd As Odbc.OdbcCommand
    
 strSQL = "SELECT ORDNO FROM MOMAST"

 odbcCon = New Odbc.OdbcConnection("DSN=DSNname")
odbcCon.Open()
cmd = New Odbc.OdbcCommand(strSQL,odbcCon)
    reader = cmd.ExecuteReader()
    Do While reader.Read()
        tmp1 = reader["ORDNO"]
        Debug.print (tmp1)
    Loop

    reader.Close
    odbcCon.close
Dann sagt er mir Benutzer ungültig und Password length = 0, muss ich die bei der ODBC.Variante noch irgendwo angeben?

Hat jemand eine ADODB Varinate parat?



Viele Grüße
Andreas