mdb02.aspx
来自「《精通ASP.NET网络编程》附带实例」· ASPX 代码 · 共 21 行
ASPX
21 行
<%@Import Namespace="System.Data"%>
<%@Import Namespace="System.Data.OleDb"%>
<%@Import Namespace="MyMdb"%>
<Html>
<Body BgColor="White">
<H3>使用Mdb对象类别,利用GetDataReader方法显示表<HR></H3>
<%
Dim db As Mdb = New Mdb( Server.MapPath("Sample.mdb") )
Dim Reader As OleDbDataReader = db.GetDataReader("Select * From 物价表")
Dim I As integer
While Reader.Read()
Response.Write( "<UL>" )
For I = 0 To Reader.FieldCount - 1
Response.Write( "<LI>" & Reader.GetName(I) )
Response.Write( " = " & Reader.Item(I) )
Next
Response.Write( "</UL>" )
End While
%>
</Body>
</Html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?