Variable in SQL Command eingeben

  • VB.NET

Es gibt 8 Antworten in diesem Thema. Der letzte Beitrag () ist von raist10.

    Variable in SQL Command eingeben

    Guten Abend liebe Gemeinde,
    ich bin gerade bei der Pogrammierung eines Sync Tools für unsere Arbeit.

    Kurze Infos zum Programm.
    Das Programm dient als kleines Sync Tools bestimmter Dateien.

    Es verbindet sich zunächst auf unseren FTP Server und MySQL Server. [Funktioniert!]
    Danach liest es aus einer config.txt eine ID aus (bsp. sa65d4as5d65sad465sad45sd6) aus, dieser wird in einer Variable gespeichert.[Funktioniert]
    Nun kommt mein eigentliches Problem.

    Ich möchte nun die Datenbank durchsuchen!

    SQL-Abfrage

    1. Datenbank Name: sync
    2. Tabellenname: identifikation
    4. Inhalt:
    6. id Text(50)
    7. speicherort Text(50)
    8. Name Text(10)


    Wenn die ID in der Variable einer ID in der Datenbank übereinstimmt, soll er den Speicherort und den Namen auch in einer Variable speichern!
    Dann soll er den Namen in einer CheckedListBox speichern und wenn ich auf einen Button Sync drücke, dann eben aus dem Speicherort(FTP) die Dateien runterladen!

    Ich scheitere im Moment daran, dass ich es nicht schaffe einen ID aus einer Variablen in einem SQL Command verwenden kann um eben zu prüfen ob die ID die gleiche ist wie in der DB!
    Wie mache ich sowas? Hat da jemand Erfahrung mit?

    Vielen Dank schon Vorab!
    angenehmen Sonntag noch allen!

    Edit by der_Kurt:
    * Topic verschoben *

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „der_Kurt“ ()

    Das hier ist nun meine Sub der MySQL Verbidnung und Abfrage.
    Ich habe es allerdings leider nun nicht weiter gebracht die Ergenisse des Selects auch Irgendwo anzeigen zu lassen. Weiterhin möchte ich noch erwähnen, dass das "select * from identifikation" natürlich nur ein test darstellt, da hier ja eine Anweisung rein soll wo ich das ausgelesene Key der Textdatei(wie oben beschrieben) mit einer id der Datenbank vergleichen möchte.

    Vielleicht kann mir jemand helfen!

    Spoiler anzeigen

    SQL-Abfrage

    1. Private Sub mysqlconnection()
    3. Dim conn As New MySql.Data.MySqlClient.MySqlConnection
    4. Dim myConnectionString As String
    5. Dim myCommand As New MySqlCommand
    9. 'Server Anmeldungsdaten
    10. myConnectionString = "server=xxxxx;" _
    11. & "uid=xxxxxx;" _
    12. & "pwd=xxxxxxxx;" _
    13. & "database=xxxxx;"
    15. Try
    16. 'Connection aufbauen
    17. conn.ConnectionString = myConnectionString
    18. conn.Open()
    19. myCommand.CommandText = "SELECT * FROM identifikation;"
    22. MessageBox.Show("Verbindung zur Datenbank: " & myConnectionString.ToString & " erfolgreich")
    24. Catch ex As MySql.Data.MySqlClient.MySqlException
    25. MessageBox.Show("Verbindung gescheitert!")
    26. End Try
    28. End Sub

    nun nochmals ein neuer Code des Verbindungsteils von MySQL. Ich habe es nun bisher so weit geschafft, dass ich mir eben auch Ergebnisse in einem DataGridView anzeigen lassen kann. Zwar brauche ich das nicht, aber die verbindung zur DB klappt nun. Nun stellt sich jedoch noch die Frage wie ich es schaffe, dass ich eine Abfrage mache ob die ID in der Config die Gleiche ist wie die in der DB. Wenn ja soll er noch den Namen, den Speicherort und das Passwort in eine Variable schreiben!

    Ich mache nun mal eine If Abfrage, so wie ich mir das Vorstelle. Natürlich stimmt dies nicht, aber so sollte das ganze dann funktionierren

    VB.NET-Quellcode

    1. if idaustextfile = idausdb then
    2. vname = dbname
    3. vspeicherort = dbspeicherort
    4. vpasswort = dbpasswort
    6. else
    8. messagebox.show("es wurden keine übereinstimmenden key´s gefunden")
    10. endif


    nun brauche ich quasi hilfe beim durchsuchen der datenbank und bei übereinstimmung schreiben der daten aus der db in eine Variable!

    Hier nun der Code meiner Datenbankverbidnung!


    Spoiler anzeigen

    SQL-Abfrage

    1. Private Sub mysqlconnection()
    3. 'Server Anmeldungsdaten
    4. myConnectionString = "server=xxxxxxxxx;" _
    5. & "uid=xxxxxx;" _
    6. & "pwd=xxxxxxx;" _
    7. & "database=xxxx;"
    9. Try
    10. 'Connection aufbauen
    11. conn.ConnectionString = myConnectionString
    12. conn.Open()
    13. bolVerbindung = True
    16. 'Abfrage ob Verbindung steht
    17. If bolVerbindung = True Then
    18. ds = New DataSet
    20. Else
    21. MessageBox.Show("Keine Verbindung")
    22. End If
    24. 'SQL-Abfrage erstellen und in einen String schreiben und an DataAdapter übergeben
    25. Dim sqlString As String = "Select * from identifikation"
    26. adapt = New MySqlDataAdapter(sqlString, conn)
    28. 'Übernimmt die SQL-Befehle zum einfügen etc.
    29. Dim commandbuilder As New MySqlCommandBuilder(adapt)
    31. 'Adapter übernimmt das befüllen
    32. adapt.MissingSchemaAction = MissingSchemaAction.AddWithKey
    33. adapt.Fill(ds, "identifikation")
    35. 'Verbindung wieder schließen
    36. conn.Close()
    37. bolVerbindung = False
    39. 'Das BindingSource nimmt die Prueflingstabelle aus dem Dataset
    40. 'BindingSource als Verbindung zur Form, bindet Daten an Textboxen und Labels etc...
    41. bs = New BindingSource(ds, "identifikation")
    43. MessageBox.Show("Verbindung zur Datenbank erfolgreich")
    45. Catch ex As MySql.Data.MySqlClient.MySqlException
    46. ex.ToString()
    47. End Try
    49. End Sub


    Edit by der_Kurt:
    bitte keine Doppelposts
    * Beitäge zusammengefügt *
    * Expander für den Endlos-Code eingefügt *

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „der_Kurt“ ()

    Zunächst mal: VB-Tag richtig benutzen


    Dann siehts schomal so aus:

    VB.NET-Quellcode

    1. Private Sub mysqlconnection()
    3. 'Server Anmeldungsdaten
    4. myConnectionString = "server=xxxxxxxxx;" _
    5. & "uid=xxxxxx;" _
    6. & "pwd=xxxxxxx;" _
    7. & "database=xxxx;"
    9. Try
    10. 'Connection aufbauen
    11. conn.ConnectionString = myConnectionString
    12. conn.Open()
    13. bolVerbindung = True
    16. 'Abfrage ob Verbindung steht
    17. If bolVerbindung = True Then
    18. ds = New DataSet
    20. Else
    21. MessageBox.Show("Keine Verbindung")
    22. End If
    24. 'SQL-Abfrage erstellen und in einen String schreiben und an DataAdapter übergeben
    25. Dim sqlString As String = "Select * from identifikation"
    26. adapt = New MySqlDataAdapter(sqlString, conn)
    28. 'Übernimmt die SQL-Befehle zum einfügen etc.
    29. Dim commandbuilder As New MySqlCommandBuilder(adapt)
    31. 'Adapter übernimmt das befüllen
    32. adapt.MissingSchemaAction = MissingSchemaAction.AddWithKey
    33. adapt.Fill(ds, "identifikation")
    35. 'Verbindung wieder schließen
    36. conn.Close()
    37. bolVerbindung = False
    39. 'Das BindingSource nimmt die Prueflingstabelle aus dem Dataset
    40. 'BindingSource als Verbindung zur Form, bindet Daten an Textboxen und Labels etc...
    41. bs = New BindingSource(ds, "identifikation")
    43. MessageBox.Show("Verbindung zur Datenbank erfolgreich")
    45. Catch ex As MySql.Data.MySqlClient.MySqlException
    46. ex.ToString()
    47. End Try
    49. End Sub

    Inhaltlich: Was soll diese Methode tun? eine Connection initialisieren? - Aber warum führt sie dann außerdem eine Abfrage aus.
    Das passt ühaupt nicht zusammen, denn eine Connection musste nur einmal initialisieren, eine Abfrage jedoch öfter.
    Oder du verwirfst nach jeder Abfrage die initialisierte Connection, und initialisierst bei der nächsten wieder neu.
    Auch initialisierst du ein Dataset und eine BindingSource - jedes mal neu.

    Sinnvoll wäre, Initialisierung und Abfrage zu trennen. Dann initialisierst du - ach - ist einfach vermurkst, wegen untypisiertes Dataset. Das kann man ja nicht ohne Abfrage initialisieren, jdfs nicht ohne erheblichen Aufwand.

    Nun stellt sich jedoch noch die Frage wie ich es schaffe, dass ich eine Abfrage mache ob die ID in der Config die Gleiche ist wie die in der DB.
    Du mußt halt deinen CommandString um eine Where - Klausel verlängern.

    VB.NET-Quellcode

    1. sqlString &= " Where ID = " & deineConfigID

    Habs jetzt folgendermaßen von einander getrennt. Stimmt das nun so, und ist auch der eingefügte SELECT OK?

    VB.NET-Quellcode

    1. Private Sub keypruefung()
    3. 'SQL-Abfrage erstellen und in einen String schreiben und an DataAdapter übergeben
    4. Dim sqlString As String = "Select * from identifikation where id = '" & key & "';"
    5. adapt = New MySqlDataAdapter(sqlString, conn)
    7. 'Übernimmt die SQL-Befehle zum einfügen etc.
    8. Dim commandbuilder As New MySqlCommandBuilder(adapt)
    10. 'Adapter übernimmt das befüllen
    11. adapt.MissingSchemaAction = MissingSchemaAction.AddWithKey
    12. adapt.Fill(ds, "identifikation")
    14. 'Verbindung wieder schließen
    15. conn.Close()
    16. bolVerbindung = False
    18. 'Das BindingSource nimmt die Prueflingstabelle aus dem Dataset
    19. 'BindingSource als Verbindung zur Form, bindet Daten an Textboxen und Labels etc...
    20. bs = New BindingSource(ds, "identifikation")
    22. End Sub


    VB.NET-Quellcode

    1. Private Sub mysqlconnection()
    3. 'Server Anmeldungsdaten
    4. myConnectionString = "xxxxxx;" _
    5. & "uid=xxxxx;" _
    6. & "pwd=xxxxxxx;" _
    7. & "database=xxxxx;"
    9. Try
    10. 'Connection aufbauen
    11. conn.ConnectionString = myConnectionString
    12. conn.Open()
    13. bolVerbindung = True
    16. 'Abfrage ob Verbindung steht
    17. If bolVerbindung = True Then
    18. ds = New DataSet
    20. Else
    21. MessageBox.Show("Keine Verbindung")
    22. End If
    24. Catch ex As MySql.Data.MySqlClient.MySqlException
    25. ex.ToString()
    26. End Try
    28. End Sub

    Leider bin ich gaanz neu in der Materie und weiß nicht was schön ist oder nicht. Nein, da sind wir ja wieder bei meinem eigentlichen problem. WIe kann ich denn nun per einfache if else rausfinden ob die beiden key´s gleich sind?
    Ich weiß nicht wie ich den db key ansprechen kann?
    Und wie ich dann falls gleicheit besteht die anderen db daten(name, speicherort, passwort) in variablen schreiben kann!

    Wenns geklappt hat, dann sind die Werte bereits in Variablen geschrieben, nämlich ins Dataset gefüllt. (das ist die tiefere Bedeutung von adapt.Fill(ds, "identifikation"))
    Du kannst etwa bs.Count überprüfen, um zu gucken, ob ein Datensatz gefunden wurde.
    Du kannst auch ein DatagridView aufs Form tun, und dessen DataSource auf die BindingSource setzen.

    cnwund schrieb:

    Leider bin ich gaanz neu in der Materie und weiß nicht was schön ist oder nicht. Nein, da sind wir ja wieder bei meinem eigentlichen problem. WIe kann ich denn nun per einfache if else rausfinden ob die beiden key´s gleich sind?


    Das brauchst Du nicht mehr, da die SELECT-Abfragen mit WHERE ID = '<MeinKey>' Dir nur die Datensätze zurück liefert in denen die ID's übereinstimmen.


    Ich weiß nicht wie ich den db key ansprechen kann?


    Hast Du doch bereits im WHERE-Teil des Statements ... oder verstehe ich Dich da gerade falsch?


    Und wie ich dann falls gleicheit besteht die anderen db daten(name, speicherort, passwort) in variablen schreiben kann!


    Die Frage verstehe ich zwar, aber den Sinn dahinter nicht ... durch die Zuweisung als BindingSource hast Du doch alle Werte bereits an ein Formular gebunden, richtig? Wenn ja kannst Du die Werte doch da direkt auslesen.

    Gruß

    Rainer