< Back
Page 7 of 7
This chapter is from the book
This chapter is from the book
This chapter is from the book
This chapter is from the book
Answers for Day 3
Exercise Answer
One possible solution to the exercise is as follows:
Public Function GetTitlesLookups(ByVal connect As String) As DataViewManager
Dim con As New SqlConnection(connect)
Dim da As New SqlDataAdapter("usp_GetTitlesLookups", con)
Dim dsTitlesLookups As New DataSet("TitlesLookups")
' Fill the DataSet
da.Fill(dsTitlesLookups)
' Create the data view manager and set the properties
Dim dvm As New DataViewManager(dsTitlesLookups)
dvm.DataViewSettings("Table").RowFilter = "Price > 25"
dvm.DataViewSettings("Table2").Sort = "PubCode ASC"
Return dvm
End Function
In this method, the dsTitlesLookups DataSet is populated by the SqlDataAdapter da using the Fill method. The DataSet will contain three tables (Table, Table1, and Table2, which are the defaults) with the Titles, Categories, and Publishers data. The DataViewManager can then be created and its individual DataViewSettings accessed through the collection.
< Back
Page 7 of 7