#1 20. April 2016 Zuletzt von einem Moderator bearbeitet: 14. April 2017 Hallo, ich bekomme es leider nicht hin einen einfachen SELECT ("SELECT user_name FROM user") aus einer mySQL DB zu entnehmen und die Variable an die Combobox1 per Buttonclick zu übergeben. PHP: Imports MySql . Data . MySqlClient .... .... .... Private Sub sql_button2_Click ( sender As Object , e As EventArgs ) Handles sql_button2 . Click Dim conn As New MySqlConnection Dim DatabaseName As String = "xxx" Dim server As String = "localhost" Dim userName As String = "xxx" Dim password As String = "xxx" If Not conn Is Nothing Then conn . Close () conn . ConnectionString = String . Format ( "server={0}; user id={1}; password={2}; database={3}; pooling=false" , server , userName , password , DatabaseName ) Try conn . Open () ############################## ´ hier müsste etwas geschen Catch ex As Exception MsgBox ( ex . Message ) End Try conn . Close () End Sub Dachte ich dann an so etwas wie Code: If reader.HasRows = True Then While reader.Read() ComboBox1.Items.Add(reader("user_name")) End While End If Aber irgendwie komme ich noch auf SQLCommand und SQLDatareader (bzw. Generell auf VB .NET) nicht klar. Ich bin dumm .In dem geposteten Code ist genanntes nicht definiert, hab jetzt nur den validen Teil des Codes gepostet, was ja nun nicht extrem viel ist. Auch wenn ich bspw. aus solchen Tutorial (Rheinwerk - openbook - 8.3.6 Auswahlabfrage) versuche abzuwandeln, hagelt es nur error's. Verfüge noch keine Vertsändnis der VB Logik und Syntax. So hätte ich das m.M.n. implementiert. PHP: Private Sub sql_button2_Click ( sender As Object , e As EventArgs ) Handles sql_button2 . Click Dim conn As New MySqlConnection Dim DatabaseName As String = "xxs" Dim server As String = "localhost" Dim userName As String = "xxx" Dim password As String = "xxx" If Not conn Is Nothing Then conn . Close () conn . ConnectionString = String . Format ( "server={0}; user id={1}; password={2}; database={3}; pooling=false" , server , userName , password , DatabaseName ) Try conn . Open () Dim cmd As New SqlClient . SqlCommand Dim reader As SqlClient . SqlDataReader cmd . CommandText = "select user_name from user" reader = cmd . ExecuteReader () ComboBox1 . Items . Clear () Do While reader . Read () ComboBox1 . Items . Add ( reader ( "user_name" ) ) Loop reader . Close () MsgBox ( "Connected" ) Catch ex As Exception MsgBox ( ex . Message ) End Try conn . Close () End Sub End Class Endet mit der Meldung: Wenn ich "cmd.Connection = conn" definieren, kriege ich "Der Wert vom Typ "MySqlConnection" kann nicht in "SqlConnection" konvertiert werden. zu hören. Wäre prima, wenn mich hin der hinsicht erleuchten würde. + Multi-Zitat Zitieren
#2 21. April 2016 AW: VB .NET - SQL Query an Variable übergeben Ich glaube da fehlt eine Zuweisung der Connection an das Dim cmd As New SqlClient.SqlCommand cmd.Connection = conn dann könnts klappen. Oder wie hast du es gelöst? + Multi-Zitat Zitieren
#3 22. April 2016 AW: VB .NET - SQL Query an Variable übergeben MySqlConnection =! SqlCommand bzw. SqlDataReader. Wie würde man dazu sagen... das sind unterschiedliche Klassen? + Multi-Zitat Zitieren
#4 24. April 2016 Zuletzt von einem Moderator bearbeitet: 14. April 2017 AW: VB .NET - SQL Query an Variable übergeben Kann mir einer sagen wo hier ein Sytaxfehler in der SQL-Query zu grunde liegt. Ich seh es einfach nicht... PHP: .... Dim cmd As New MySqlCommand Dim adapter As New MySqlDataAdapter Dim ds As New DataSet Dim intid As Integer intid = TextBoxID . Text cmd . Connection = conn cmd . CommandText = "UPDATE user SET user_name = '" & TextBoxName . Text & "', user_pw = '" & TextBoxPW . Text & "', user_mail = '" & TextBoxMail . Text & "', user_login = '" & TextBoxLogin . Text & "', WHERE user_id = '" & intid & "';" cmd . ExecuteNonQuery () Ich benutze XAMPP mit mySQL. (Bitte keine Kommtare zw. SQL-Injection. Ich bin mir darüber Bewusst, aber ich lerne vorerst die Grundlagen und konzentiere mich auf die Datenverarbeitung) + Multi-Zitat Zitieren