📄 ch16-02-02.aspx

📁 这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助

💻 ASPX

字号:

<%@ Import NameSpace="System.Data" %>
<%@ Import NameSpace="System.Data.OleDb" %>
<% Response.Expires = 0 %>
<Html>
<Head>
<Title>Ch16-02-02.aspx DataTable对象的DataView对象</Title>
<Script Language="VB" Runat="Server">
       ' 在这里设置联机字符串的内容
       Sub Page_Load(Obj As Object, e As EventArgs)
              ' 宣告DataSet对象
              Dim OBJDataSet As DataSet = New DataSet()
              Dim TableName As String = "UserDatas"
              Dim tSQL As String = "Select * From " & TableName
              GetDataSet(OBJDataSet , tSQL)
              ShowDataSet(OBJDataSet, TableName )
              Dim OBJDataRow As DataRow
              Dim OBJDataColumn As DataColumn
              Dim OBJDataView As DataView
              Dim OBJRowView As DataRowView
              OBJDataView = OBJDataSet.Tables("UserDatas").DefaultView
              OBJDataView.RowFilter = "UserAccount Like '%User%'"
              OBJDataView.Sort = "UserAccount"
              Response.Write("<Center><H2>DataView对象之中的数据列</H2>")
              Response.Write("<Table Border=1>")
              For Each OBJRowView In OBJDataView
                     Response.Write("<TR>")
                     ' 显示在数据列之中的每一个数据行
                     For Each OBJDataColumn In OBJDataSet.Tables("UserDatas").Columns
                            Response.Write("<TD>" & OBJRowView(OBJDataColumn.ColumnName) & "</TD>" )
                     Next OBJDataColumn
                     Response.Write("</TR>")
              Next OBJRowView
              Response.Write("</Table>")
       End Sub
</Script>
<!-- #Include Virtual="DataSetOP.inc" -->
</Head>
<Body>
</Body>
</Html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -