将mysql查询转换为在vb.net中使用
我是mysql和vb.net的新手,有以下问题:将mysql查询转换为在vb.net中使用,mysql,vb.net,Mysql,Vb.net,我是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 (
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 = ?
您可以使用下面的代码来显示数据。。。我希望这就是你想要的……)
您可以使用正在使用的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
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