ch16-02-01.aspx

来自「这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助」· ASPX 代码 · 共 41 行

ASPX
41 行
字号 
<%@ Page Language="VB" Debug="true" %>
<%@ Import NameSpace="System.Data" %>
<%@ Import NameSpace="System.Data.OleDb" %>
<% Response.Expires = 0 %>
<Html>
<Head>
<Title>Ch16-02-01.aspx DataTable对象的Select方法</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 SelectedRows() As DataRow
		SelectedRows = OBJDataSet.Tables("UserDatas").Select( _
					"UserAccount = 'Colin1'","UserName", _
					DataViewRowState.CurrentRows)
		Response.Write("<Center><H2>执行Select方法之后的数据列</H2>")
		Response.Write("<Table Border=1>")
		For Each OBJDataRow In SelectedRows
			Response.Write("<TR>")
			' 显示在数据列之中的每一个数据行
			For Each OBJDataColumn In OBJDataSet.Tables("UserDatas").Columns
				Response.Write("<TD>" & OBJDataRow(OBJDataColumn.ColumnName) & "</TD>" )
			Next OBJDataColumn
			Response.Write("</TR>")
		Next OBJDataRow
		Response.Write("</Table>")
	End Sub
</Script>
<!-- #Include Virtual="DataSetOP.inc" -->
</Head>
<Body>
</Body>
</Html>

ch16-02-01.aspx - 源码说明

本页面展示了「这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助」中的 ch16-02-01.aspx 源码文件，采用 ASPX 编程语言编写，共 41 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与asp相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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