Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
Dim DBConn as OleDbConnection
Dim DBCommand As OleDbDataAdapter
Dim DSPageData as New DataSet
DBConn = New OleDbConnection("Provider=sqloledb;" _
& "server=localhost;" _
& "Initial Catalog=INETC15;"
& "User Id=sa;" _
& "Password=yourpassword;")
DBCommand = New OleDbDataAdapter _
("Select ProductID, ProductName, BriefDescription, " _
& "Price From Products Where ProductName Like '%" _
& txtSearchText.Text & "%' or BriefDescription " _
& "Like '%" & txtSearchText.Text & "%' Order By " _
& "ProductName", DBConn)
DBCommand.Fill(DSPageData, _
"Products")
dgProducts.DataSource = _
DSPageData.Tables("Products").DefaultView
dgProducts.DataBind
End Sub

DBCommand = New OleDbDataAdapter _
("Select ProductID, ProductName, BriefDescription, " _
& "Price From Products Where ProductName Like '%" _
& txtSearchText.Text & "%' or BriefDescription " _
& "Like '%" & txtSearchText.Text & "%' Order By " _
& "ProductName", DBConn)

DBCommand.Fill(DSPageData, _
"Products")

dgProducts.DataSource = _
DSPageData.Tables("Products").DefaultView
dgProducts.DataBind

Страница Просмотр

На странице Просмотр посетителю предоставляется возможность просмотреть все категории товаров и перечень товаров по каждой категории.

<asp:Label
id="lblTitle"
BorderWidth="7px"
BorderStyle=7
Width="90%"
Font-Size="25pt'"
Font-Name="Arial"
runat=" server"
/>

<ASP:DataGrid
id="dgCategories"
АиtoGenerateColumns="false"
Width="90%"
BackColor="beige"
AlternatingItemStyle-BackColor="cornsilk"
BorderColor="black"
ShowFooter="false"
CellPadding=3
CellSpacing="0"
Font-Name="Arial"
Font-Size="8pt"
ForeColor="Black"
HeaderStyle-BackColor="burlywood"
HeaderStyle-Font-Bold="True"
runat="server">
<Columns>
<asp:HyperLinkColumn
HeaderText="Категория товара (Щелкните для
получения подробной информации)"
DataNavigateUrlField="ProductCategoryID"
DataNavigateUrlFormatString="/browse.aspx?ProductCategoryID={0}"
DataTextField="CategoryName"
Target="_self"
/>
<asp:BoundColumn
HeaderText="Описание"
DataField="CategoryDescription"
/>
</Columns>
</asp:DataGrid>