Hallo,
ich glaube ja ich stehe ein wenig auf dem schlauch, auf jeden Fall komme ich nicht weiter.
Ich lese eine Access Tabelle aus und bekomme 3 Spalten in einer Zeile zurück Diese 3 einzelnen Werte möchte ich nun gern irgendwie per return zurückschicken. Wie kann ich das realisieren?
Kann auch alles als String zurückschicken, doch wie zerlege ich den String in der aufrufenden klasse?
Besten Dank
Markus
Der gepostete Code funktioniert natürlich nicht, hatte als Rückgabe wert erst String, aber das klappt nicht....
ich glaube ja ich stehe ein wenig auf dem schlauch, auf jeden Fall komme ich nicht weiter.
Ich lese eine Access Tabelle aus und bekomme 3 Spalten in einer Zeile zurück Diese 3 einzelnen Werte möchte ich nun gern irgendwie per return zurückschicken. Wie kann ich das realisieren?
Kann auch alles als String zurückschicken, doch wie zerlege ich den String in der aufrufenden klasse?
Besten Dank
Markus
Code:
Public Shared Function Request3(ByVal mySelectQuery As String) As Array
'== Connect to DB ==
Dim myConnString As String
Dim myReturnArray(3) As String
myConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb"
Dim myConnection As New OleDbConnection(myConnString)
Dim myCommand As New OleDbCommand(mySelectQuery, myConnection)
myConnection.Open()
Dim myReader As OleDbDataReader
myReader = myCommand.ExecuteReader()
' Always call Read before accessing data.
If myReader.HasRows Then
Do While myReader.Read()
'very dirty - temporary solution
'Console.WriteLine(vbTab & "{0}", myReader.GetString(0))
myReturnArray(0) = myReader.GetString(0)
myReturnArray(1) = myReader.GetString(1)
myReturnArray(2) = myReader.GetString(2)
Loop
Else
Console.WriteLine("No rows returned.")
End If
' always call Close when done reading.
myReader.Close()
' Close the connection when done with it.
myConnection.Close()
Return myReturnArray(3)
End Function
Der gepostete Code funktioniert natürlich nicht, hatte als Rückgabe wert erst String, aber das klappt nicht....
Zuletzt bearbeitet: