Dim Con As New MySql.Data.MySqlClient.MySqlConnection()
        Dim Com As New MySql.Data.MySqlClient.MySqlCommand
        Dim reader As MySql.Data.MySqlClient.MySqlDataReader
        Try
            Con.ConnectionString = "Database=... ;server=... ;User Id=..." & _
              ";Password=..."
            com.CommandText = "select * from table
            com.Connection = Con
            Con.Open()
 
            reader = com.ExecuteReader()
            While (reader.Read())
            ergebniss= reader.GetString(0)
            End While
        Catch ex_sql As MySql.Data.MySqlClient.MySqlException
            Label1.Text = ex_sql.Message
        Catch ex_all As Exception
            Label1.Text = ex_all.Message
        Finally
            Con.Close()
        End Try

--
Wann und wo ? Denn, Dort....!

VB.NET 2005 EE / MySQL / MSSQL EE