📄 ch16-03-02.aspx

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

💻 ASPX

字号:

<%@ Import NameSpace="System.Data" %>
<%@ Import NameSpace="System.Data.OleDb" %>
<% Response.Expires = 0 %>
<Html>
<Head>
<Title>Ch16-03-02.aspx 以DataReader对象作为数据来源</Title>
<Script Language="VB" Runat="Server">
Sub Page_Load(Obj As Object, e As EventArgs)
If Not IsPostBack Then
Dim DSN As String
Dim tSQL As String = "Select * From UserDatas"
Dim OBJConn As OleDbConnection
DSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
            Server.MapPath("/ASP/chap14/ASP.NET网页数据库.mdb") & ";"
OBJConn = New OleDbConnection(DSN)
OBJConn.Open()
Dim OBJCmd As OleDbCommand = New OleDbCommand(tSQL, OBJConn)
RadioList1.DataSource = OBJCmd.ExecuteReader()
RadioList1.DataTextField = "UserName"
RadioList1.DataBind()
OBJConn.Close()
End If
End Sub
Sub Button1_Click(Obj As Object, e As EventArgs)
Label1.Text = "用户选择：" & RadioList1.SelectedItem.Text
End Sub
</Script>
</Head>
<Body>
<Form Runat="Server" >
<asp:RadioButtonList ID="RadioList1" Runat="Server" />
<asp:Button ID="Button1" Text="选择"
                   OnClick="Button1_Click" Runat="Server" /><P>
<asp:Label ID="Label1" BorderStyle="Double"
                   BorderColor="#FF00FF" Runat="Server" />
</Form>
</Body>
</Html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -