Преобразование MySQL запросов для использования в vb.net

Question

Я новичок в MySQL и vb.net и есть этот запрос:

select `db_employee`.`firstName` as `firstName`, `db_employee`.`lastName` as `lastName`, 
     `tbl_employment`.`position` as `position` 
    from (`db_employee` `db_employee` 
    inner join `tbl_employment` `tbl_employment` on (`tbl_employment`.`ctrlID` = `db_employee`.`ctrlID`)) 
where (`tbl_employment`.`companyName` like 'MES%') 

И я хочу, чтобы преобразовать его использовать здесь:

Dim MySqlConn = New MySqlConnection 
MySqlConn.ConnectionString = connStr 
Dim SDA As New MySqlDataAdapter 
Dim dbdataset As New DataTable 
Dim bsource As New BindingSource 
MySqlConn.Open() 
Dim query As String 
query = ? 

Answer 1

вы можете использовать ниже код для отображения данных ... я надеюсь, что это то, что вы хотите .. :)

Dim cn As SqlConn= New SqlConn("Connecting String") 
    Dim cmd As sqlCommand 
    Dim dr As sqlDataReader 
cn.open() 
cmd = New sqlCommand("select * from table or your query, cn) 
      dr = cmd.ExecuteReader() 
      dr.Read() 
      textbox1.Text = dr(1).ToString() 
cn.close() 

Answer 2

вы можете сделать что-то подобное с поставщиком MySQL вы находитесь с помощью. Это создаст ваше соединение, устройство чтения команд и данных, а также закройте и утилизируйте все правильно. Если вы хотите экземпляр DataTable, вы можете загрузить его из DataReader.

Using conn As New MySql.Data.MySqlClient.MySqlConnection("YourConnectionString") 
     conn.Open() 

     Using cmd As MySql.Data.MySqlClient.MySqlCommand = conn.CreateCommand 
      cmd.CommandText = "select db_employee.firstName as firstName, " & _ 
             "db_employee.lastName as lastName, " & _ 
             "tbl_employment.position as position " & _ 
             "from db_employee db_employee " & _ 
             "inner join tbl_employment tbl_employment on tbl_employment.ctrlID = db_employee.ctrlID " & _ 
             "where tbl_employment.companyName like 'MES%' " 

      ' Get a data reader that you can loop over or load a data table with 
      Dim dr As MySql.Data.MySqlClient.MySqlDataReader = cmd.ExecuteReader 

      ' How to read with a DataReader 
      While dr.Read 
       ' Do something with this 
       Dim lastName As String = dr("lastName") 

      End While 


     End Using 

     conn.Close() 
    End Using