⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 nestedrowfilter.aspx

📁 asp.net技术内幕的书配源码
💻 ASPX
字号:
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>

<Script Runat="Server">

Dim dstNorthwind As DataSet
Dim dvwProducts As DataView

Sub Page_Load
  Dim conNorthwind As SqlConnection
  Dim dadNorthwind As SqlDataAdapter

  dstNorthwind = New DataSet()
  conNorthwind = New SqlConnection( "Server=localhost;UID=sa;PWD=secret;Database=Northwind" )
  dadNorthwind = New SqlDataAdapter( "Select * From Categories", conNorthwind )
  dadNorthwind.Fill( dstNorthwind, "Categories" )
  dadNorthwind.SelectCommand = New SqlCommand( "Select * From Products", conNorthwind )
  dadNorthwind.Fill( dstNorthwind, "Products" )

  dvwProducts = dstNorthwind.Tables( "Products" ).DefaultView()

  rptCategories.DataSource = dstNorthwind
  rptCategories.DataMember = "Categories"
  rptCategories.DataBind()
End Sub

Function FilterProducts( intCatID As Integer ) As DataView
  dvwProducts.RowFilter = "CategoryID=" & intCatID
  Return dvwProducts
End Function

</Script>

<html>
<head><title>NestedRowFilter.aspx</title></head>
<body>

<asp:Repeater
  ID="rptCategories"
  Runat="Server">
<ItemTemplate>
<h2><%# Container.DataItem( "CategoryName" )%></h2>
<asp:DataGrid
  DataSource='<%# FilterProducts( Container.DataItem( "CategoryID" ) )%>'
  Runat="Server" />
</ItemTemplate>
</asp:Repeater>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -