[VB.Net]SQL-Befehle[Question]

Baratoik · 11/15/2011, 21:05

hallo wie kann ich mit hilfe von diesem Code z.b. das guthaben in einem Label anzeigen

PHP Code:



   
        MySqlConnection = New MySqlConnection
       
        MySqlConnection.ConnectionString = "server=localhost;port=3306; user ID=root; password=123456; database=test"
        MySqlConnection.Open()

        Dim Myadapter As New MySqlDataAdapter
        
        Dim sqlquary = "SELECT Guthaben FROM user WHERE Benutzername = '" & lbName.Text & "';"
        Dim command As New MySqlCommand
        command.Connection = MySqlConnection
        command.CommandText = sqlquary
        Myadapter.SelectCommand = command

        mydata = command.ExecuteReader

Ronox · 11/16/2011, 09:34

Hey,
deine Daten müstest du in Etwa so in ein label bekommen:

Code:

do while (mydata.Read)
label.text += mydata(0)
loop

So in etwa müste das gehen, hab es jetzt nicht getestet, ist nur grad aus dem kopf geschrieben.

Gruß Ronox

Demon-777 · 11/16/2011, 16:51

Give it a try!
Still in C# but easy to convert to VB.NET

PS. Not sure if it works! I have no MySQL Server on my Home PC

Code:

internal static void Main(string[] args)
{
    using (var connection = new MySqlConnection()
    {
        ConnectionString = "server=localhost; port=3306; user ID=root; password=123456; database=test"
    })
    {
        connection.Open();

        var query = "SELECT Guthaben FROM user WHERE Benutzername = 'Dieter';";

        using (var command = new MySqlCommand()
        {
            Connection = connection,
            CommandText = query
        })

        using (var adapter = new MySqlDataAdapter()
        {
            SelectCommand = command
        })
        {
            var reader = command.ExecuteReader();

            while (reader.Read())
            {
                string output = reader.GetValue(0).ToString();

                Console.WriteLine(output);
            }

            reader.Close();
        }

        connection.Close();
    }
}

~~.exTremez™~~ · 11/16/2011, 22:05

In VB.Net Übersetzt
->

Code:

Friend Shared Sub Main(args As String())
	Using connection = New MySqlConnection() With { _
		Key .ConnectionString = "server=localhost; port=3306; user ID=root; password=123456; database=test" _
	}
		connection.Open()

		Dim query = "SELECT Guthaben FROM user WHERE Benutzername = 'Dieter';"

		Using command = New MySqlCommand() With { _
			Key .Connection = connection, _
			Key .CommandText = query _
		}

			Using adapter = New MySqlDataAdapter() With { _
				Key .SelectCommand = command _
			}
				Dim reader = command.ExecuteReader()

				While reader.Read()
					Dim output As String = reader.GetValue(0).ToString()

					Console.WriteLine(output)
				End While

				reader.Close()
			End Using
		End Using

		connection.Close()
	End Using
End Sub

~~Jopsi332~~ · 11/17/2011, 21:03

Quote:

Originally Posted by Baratoik

hallo wie kann ich mit hilfe von diesem Code z.b. das guthaben in einem Label anzeigen

PHP Code:

MySqlConnection = New MySqlConnection MySqlConnection.ConnectionString = "server=localhost;port=3306; user ID=root; password=123456; database=test" MySqlConnection.Open() Dim Myadapter As New MySqlDataAdapter Dim sqlquary = "SELECT Guthaben FROM user WHERE Benutzername = '" & lbName.Text & "';" Dim command As New MySqlCommand command.Connection = MySqlConnection command.CommandText = sqlquary Myadapter.SelectCommand = command mydata = command.ExecuteReader

label1.text = mydata ?