Hallo Fuerchau!
Um Missverständnisse zu vermeiden, sende ich hier mal den kompletten Code:
Wenn ich das richtig sehe, verwende ich den .NET-Treiber V2.0.50727Code:Dim myDataReader As OdbcDataReader Dim myOdbcDbConnection As OdbcConnection Dim myOdbcDbCommand As OdbcCommand Dim user, cmdnbr AsString myOdbcDbConnection = New OdbcConnection("DSN=UDS") myOdbcDbCommand = New OdbcCommand("SELECT * FROM UDSSOFC WHERE USER = 'TEST' ORDER BY USER, CMDNBR", myOdbcDbConnection) myOdbcDbConnection.Open() myDataReader = myOdbcDbCommand.ExecuteReader() DoWhile (myDataReader.Read()) user = myDataReader.GetValue(0) cmdnbr = myDataReader.GetValue(1) Loop myDataReader.Close() myOdbcDbConnection.Close()
Gruß, Ttitus
![[NEWSboard IBMi Forum]](images/duke/nblogo.gif)



Mit Zitat antworten
Bookmarks