📄 ch15-01-02.aspx

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

💻 ASPX

字号:

<%@ Import NameSpace="System.Data" %>
<%@ Import NameSpace="System.Data.OleDb" %>
<% Response.Expires = 0 %>
<Html>
<Head>
<Script Language="VB" Runat="Server">
Sub Page_Load(Obj As Object, e As EventArgs)
Dim DSN As String, tSQL As String
Dim I As Integer
' 设置使用联机字符串 
DSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
      Server.MapPath("/ASP/Chap14/ASP.NET网页数据库.mdb") & ";"
tSQL = "SELECT * FROM UserDatas"
' 使用联机字符串创建连接
Dim OBJConn As OleDBConnection = New OleDbConnection(DSN)
OBJConn.Open()      ' 创建数据库连接
' 声明并使用OleDbCommand对象执行SQL语句
Dim OBJCmd As OleDBCommand = New OleDbCommand(tSQL, OBJConn)
Dim OBJReader As OleDbDataReader = OBJCmd.ExecuteReader()
' 设置OleDbDataReader类的数据源
If OBJReader.Read() Then 
For I = 0 To OBJReader.FieldCount()-1
 Response.Write("字段名称：""" & OBJReader.GetName(I) & """ ")
Response.Write("字段值：""" & OBJReader.GetValue(I) & """<BR>")
Next
End If
OBJConn.Close()
End Sub
</Script>
</Head>
<Body>
</Body>
</Html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -