Hallo,
ich habe eine Abfrage einer Datenbank die soweit Funtioniert.
Die Funktion die ich schreiben möchte, soll mit einem SqlDataReader die abgefragten Daten in ein zweidimensionales Array(nZeilen, 1) speichern.
Dies sollte im Optimalfall so Aussehen:
array(0,0) = Sortennummer
array(0,1) = true
Danach die nächste Sortennummer und wieder "true"(ture bleibt immer).
Hierzu habe ich folgende Code:
Leider ist das Array immer leer...
Erkennt jemand meinen Fehler?
Danke schon mal im voraus!!!
ich habe eine Abfrage einer Datenbank die soweit Funtioniert.
Die Funktion die ich schreiben möchte, soll mit einem SqlDataReader die abgefragten Daten in ein zweidimensionales Array(nZeilen, 1) speichern.
Dies sollte im Optimalfall so Aussehen:
array(0,0) = Sortennummer
array(0,1) = true
Danach die nächste Sortennummer und wieder "true"(ture bleibt immer).
Hierzu habe ich folgende Code:
Quellcode
- Dim conn = New SqlClient.SqlConnection(connstr)
- Dim sqlcmd As SqlCommand = New SqlCommand("select top 10 * from [pim].[dbo].[YC40]", conn)
- Dim reader As SqlDataReader = sqlcmd.ExecuteReader()
- Dim iarray As Integer = 0
- Dim array(iarray, 1)
- If reader.HasRows Then
- Do While reader.Read()
- Dim sorte = reader.Item("SORTE")
- array(iarray, 0) = sorte
- array(iarray, 1) = True
- iarray = iarray + 1
- ReDim array(iarray, 1)
- Loop
- End If
Leider ist das Array immer leer...
Erkennt jemand meinen Fehler?
Danke schon mal im voraus!!!