SQL結果をLstに保存しますか？

Question

私のデータベースには、1人のユーザーが複数の注文を行うことができます。私はユーザーのためにすべての注文を取得し、それをリストに保存したい。

これは私が今

Public Function GetUserOrders(ByVal userID As Integer) As DataSet 
     Dim sqlDA As New SqlDataAdapter 
     Dim ds As New DataSet 
     Dim myCommand As New Data.SqlClient.SqlCommand("sp_GetUserOrders", myConnection) 
     ' Mark the Command as a SPROC 
     myCommand.CommandType = CommandType.StoredProcedure 
     Dim muserID As New SqlParameter("@userID", SqlDbType.Int) 
     muserID.Value = userID 
     myCommand.Parameters.Add(muserID) 
     Try 
      ' Open the connection and execute the Command 
      myConnection.Open() 
      sqlDA.SelectCommand = myCommand 
      sqlDA.Fill(ds) 

     Catch ex As Exception 

     Finally 
      myConnection.Close() 
     End Try 

     Return ds 
    End Function 

をやっているものですが、私は、リストに結果を割り当てる方法を見つけ出すように見えることはできません。

Dim orderList As New ListItemCollection() 
orderlist = GetUserOrders() 

は機能しません。

Answer 1

私はそれを得ました。

私はリストをgetuserorders関数の中に設定しました。

Dim dr As SqlDataReader 
     Dim orderList As New ListItemCollection() 
     Try 
      ' Execute the command 
      myConnection.Open() 
      dr = myCommand.ExecuteReader() 

      If Not dr.Read() Then 
       Return Nothing 
      Else 
       While dr.Read() 
        orderList .Add(dr("orderCode")) 
       End While 
      End If 
      dr.Close() 
     Finally 
      myConnection.Close() 
     End Try