ch16-03-02.aspx
来自「这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助」· ASPX 代码 · 共 39 行
ASPX
39 行
<%@ 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 + =
减小字号Ctrl + -
显示快捷键?