求助!listview控件接收存储过程返回的多行数据集
Private Sub TreeView1_NodeMouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeNodeMouseClickEventArgs) Handles TreeView1.NodeMouseClick '下面是点击节点触发的事件 Select Case e.Node.Tag Case "yggl" ListView_yuangong.Visible = True Dim ygglSQL = New SqlClient.SqlCommand("list_user", dbConnection) ygglSQL.CommandType = CommandType.StoredProcedure '???这里怎么定义接收返回的数据集?? dbConnection.open() ygglSQL.ExecuteReader() '????这里怎么接收返回的数据集,让它显示到ListView_yuangong控件 dbConnection.close() Case ("zy") ListView_yuangong.Visible = False End Select End Sub
Dim nwindConn As OleDbConnection = New OleDbConnection("Provider=MSDataShape;Data Provider=SQLOLEDB;" & _ "Data Source=localhost;Integrated Security=SSPI;Initial Catalog=northwind")Dim custCMD As OleDbCommand = New OleDbCommand("SHAPE {SELECT CustomerID, CompanyName FROM Customers} " & _ " APPEND ({SELECT CustomerID, OrderID FROM Orders} AS CustomerOrders " & _ " RELATE CustomerID TO CustomerID)", nwindConn)nwindConn.Open()Dim custReader As OleDbDataReader = custCMD.ExecuteReader()Dim orderReader As OleDbDataReaderDo While custReader.Read() Console.WriteLine("Orders for " & custReader.GetString(1)) ' custReader.GetString(1) = CompanyName orderReader = custReader.GetValue(2) ' custReader.GetValue(2) = Orders chapter as DataReader Do While orderReader.Read() Console.WriteLine(vbTab & orderReader.GetInt32(1)) ' orderReader.GetInt32(1) = OrderID Loop orderReader.Close()LoopcustReader.Close()nwindConn.Close()