mysql - 将 odbcReader 分配给数据集

Question

我执行了一个存储过程

Dim conStr As String = "Dsn=dat;database=dat;option=0;port=0;server=localhost;uid=root"
Dim con As New OdbcConnection(conStr)
Dim cmd As New OdbcCommand("dat.selectRowCount", con)
con.Open()
cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.AddWithValue("@startIndex", 5)
cmd.Parameters.AddWithValue("@endIndex", 15)
Dim reader As OdbcDataReader
reader = cmd.ExecuteReader
While reader.Read
'Some operations performed
End While

如果我需要将此reader添加到DataTable意味着

Dim dt As DataTable = New DataTable("adm_ttemp")
dt.Load(reader)

但是我如何将此阅读器分配给DataSet？

Answer 1

为什么您要寻找数据集的odbcReader分配？您可以直接将查询结果读取到数据集，如上面答案中所述？

    Dim conStr As String = "Dsn=dat;database=dat;option=0;port=0;server=localhost;uid=root"
    Dim con As New OdbcConnection(conStr)
    Dim cmd As New OdbcCommand("dat.selectRowCount", con)
    con.Open()
    cmd.CommandType = CommandType.StoredProcedure
    cmd.Parameters.AddWithValue("@startIndex", 5)
    cmd.Parameters.AddWithValue("@endIndex", 15)
    Dim DS As New DataSet
    '<---- lines to be noticed 
    Using AD As New OdbcDataAdapter(cmd)
        AD.Fill(DS)
    End Using

您可以通过以下方式调用存储过程，试试吧

    Dim conStr As String = "Dsn=dat;database=dat;option=0;port=0;server=localhost;uid=root"
    Dim con As New OdbcConnection(conStr)
    Dim cmd As New OdbcCommand("dat.selectRowCount", con)
    con.Open()
    '<----
    Dim callString As String = "CALL dat.selectRowCount(5,15)"
    cmd.CommandType = CommandType.StoredProcedure
    cmd.CommandText = callString
    '<-----
    Dim dlist As New DataList
    Dim DS As New DataSet
    Using AD As New OdbcDataAdapter(cmd)
        AD.Fill(DS)
    End Using