Verbindung zu einem SQL-Server und Datenabfrage

  • VB.NET

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von Rootbob91.

    Verbindung zu einem SQL-Server und Datenabfrage

    Hallo,

    ich hab ein Problem:
    Ich möchte eine banale Verbindung zu einem SQL-Sever und aus diesem Daten auslesen... Hier ist mal der VB-Code den ich habe:

    Quellcode

    1. Imports System.Data.SqlClient
    2. Imports System.Data
    4. Public Class Form1
    6. Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    7. ' 1.) Verbindung zur Datenbank erstellen
    8. Dim connstr = "Server=192.1.5.138;Database=PIM;Trusted_Connection=True;"
    9. Dim conn = New SqlClient.SqlConnection(connstr)
    10. Dim cmd As SqlCommand = New SqlCommand("Auslesen von MatID und Material von Test", conn)
    11. conn.Open()
    13. Dim dr As SqlDataReader = cmd.ExecuteReader()
    14. If dr.HasRows Then
    15. Do While dr.Read()
    16. Console.WriteLine(dr.GetInt32(0) & vbTab & dr.GetString(1))
    17. Loop
    18. Else
    19. MessageBox.Show("Keine Daten.")
    20. End If
    22. dr.Close()
    23. Me.Close() 'Anwendung wird geschlossen
    24. End Sub
    26. End Class


    Und hier die Test-Tabelle aus der ich auslesen möchte:
    MatID (Schlüssel)
    		Material
    1
    		Eisen
    2
    		Alu
    3
    		Quarz
    4
    		Kupfer

    Immer wenn ich das Programm starte kommt der Fehler: "Falsche Syntax in der Nähe von 'MatID'"...

    Ich weiß nicht ob es daran liegt, aber auf der Datenbank sind mehere Tabllen gespeichert. Ich gebe aber in meinem Code nirgends an, auf welche Tabelle ich zugreife?

    Vielleicht könnt ihr mir ja weiterhelfen....

    Danke schon mal im voraus!

    Lycoor

    VB.NET-Quellcode

    1. Dim cmd As SqlCommand = New SqlCommand("Auslesen von MatID und Material von Test", conn)


    Hier ist auf jedenfall schonmal definitiv ein Fehler...

    "Auslesen von MatID und Material von Test" ist kein SQL ...

    SQL sieht so aus:

    SQL-Abfrage

    1. SELECT MatID, Material
    2. FROM Test


    HIER hatts auch beispiele ;)

    VB.NET-Quellcode

    1. Public Class Form1
    3. Private dt_Ergebnisse As New DataTable
    5. Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    7. Dim conString = "Server=192.1.5.138;Database=PIM;Trusted_Connection=True;"
    8. Using con As New SqlClient.SqlConnection(conString)
    9. con.Open()
    10. Using cmd As New SqlClient.SqlCommand("SELECT MatID, Material FROM Test", con)
    11. Dim reader = cmd.ExecuteReader()
    13. ' direkt in Datatable & DataGridView laden
    14. 'dt_Ergebnisse.Load(reader)
    15. 'DataGridView1.DataSource = dt_Ergebnisse
    17. ' oder einzelnd
    18. While reader.Read()
    19. MessageBox.Show(reader(0).ToString() & ", " & reader("Material").ToString()) ' via index, oder Bezeichnung zugreifen
    20. End While
    21. End Using
    22. End Using
    24. End Sub
    26. End Class

    Polling is trolling!

    Achtung: Ich habe die komische Angewohnheit, simple Dinge zu verkomplizieren..