Datenbank - Datenauslesen

  • VB.NET

Es gibt 3 Antworten in diesem Thema. Der letzte Beitrag () ist von icemanns.

    Datenbank - Datenauslesen

    Schönen Guten Tag Zusammen,

    ich habe mal eine Frage, ich arbeite mit Xampp und hab dort eine MySQL Datenbank angelegt und jetzt versuche ich mich Visual Studio drauf zuzugreifen ...
    Das funktioniert auch soweit, kann eine Abfrage machen und die Daten in einem DateGriedView Anzeigen lassen ...
    Nun möchte ich aber ohne DataGriedView arbeiten und alle Einträge von einer Spalte in einer String List speichern, aber ich weiß nicht so recht wie das geht ...


    VB.NET-Quellcode

    1. Option Explicit On
    3. Imports MySql
    4. Imports MySql.Data
    5. Imports MySql.Data.MySqlClient
    7. Public Class frm_airport
    8. Dim conn As New MySqlConnection("server=localhost;user id=root;password=;database=test")
    9. Dim myCommand As New MySqlCommand
    10. Dim myAdapter As New MySqlDataAdapter
    11. Dim myData As New DataTable
    12. Dim vSQL As New String(Nothing)
    14. Private Sub btn_start_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_start.Click
    15. If btn_start.Text = "Start" Then
    16. btn_start.Text = "Stop"
    18. Try
    19. myData.Reset()
    20. vSQL = "SELECT * FROM tbl_website"
    21. conn.Open()
    22. myCommand.Connection = conn
    23. myCommand.CommandText = vSQL
    24. myAdapter.SelectCommand = myCommand
    25. myAdapter.Fill(myData)
    26. 'Bestimmte Spalte auslesen aber wie?
    27. conn.Close()
    28. Catch mysqlex As MySqlException
    29. MsgBox(mysqlex.ToString, MsgBoxStyle.Exclamation)
    30. End Try
    31. Else
    32. btn_start.Text = "Start"
    33. End If
    34. End Sub
    35. End Class


    Wenn ich jetzt z.B. in meiner Datenbank 3 Spalten habe
    ID Vorname Nachname
    0 Test_vor Test_nach

    Möchte ich in einer StringList z.B. nur die Vorname speichern...


    Mit freundlichen Grüßen - Wirbeli

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „wirbelis_hund“ ()

    Auch eine Möglichkeit:

    VB.NET-Quellcode

    1. dim strList as new List(Of String)
    3. Using rSQL as MySQLDataReader = command.executeReader
    4. while rSQL.Read
    5. If not isDBNull(rSQL("Vorname")) Then strList.add(Cstr(rSQL("Vorname")))
    6. End While
    7. End Using