如何将MySql查询记录集显示到datagridview中

时间:2015-05-25 10:38:59

标签: mysql vb.net datagridview

我对vb.net很陌生,我试图将查询结果显示在datagridview中。

在VBA中,我能够通过简单的命令将其显示在列表框中:

MyArray = rs.GetRows
'Then, after transposing of array
Me.ListBox1.List = MyArray 

这似乎不适用于vb.net,使用DataGridView似乎是最简单的解决方案。 (如果使用列表框更简单,请告诉我方法)

这是我写的代码。它没有给出错误,但在gridview中没有显示任何内容。环顾四周,我已经读过关于" bind"但每次使用它的尝试都失败了。

    Dim Cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    Dim Server_Name, Database_Name, UserDB, Password, SQLStr As String
    Dim mRS_Result As Object

    Cn = New ADODB.Connection
    rs = New ADODB.Recordset

    Server_Name = "localhost" 
    Database_Name = "MyDBName" 
    UserDB = "root" 
    Password = "" 

    Cn.Open("Driver={MySQL ODBC 5.3 Unicode Driver};Server=" & Server_Name & _
        ";Database=" & Database_Name & ";Uid=" & UserDB & ";Pwd=" & Password & ";")
    SQLStr = "SELECT * FROM errlog WHERE Data > NOW()-100000"
    rs.CursorLocation = ADODB.CursorLocationEnum.adUseClient
    rs.Open(SQLStr, Cn, ADODB.CursorTypeEnum.adOpenStatic)
    If rs.RecordCount > 0 Then mRS_Result = rs.GetRows()

    Me.DataGridView1.AutoGenerateColumns = True
    Me.DataGridView1.DataSource = rs

0 个答案:

没有答案