dropdownlist.aspx
来自「asp.net技术内幕的书配源码」· ASPX 代码 · 共 43 行
ASPX
43 行
<%@ Import Namespace="System.Data.SqlClient" %>
<Script Runat="Server">
Sub Page_Load
If Not IsPostBack Then
Dim conPubs As SqlConnection
Dim cmdSelect As SqlCommand
Dim dtrAuthors As SqlDataReader
conPubs = New SqlConnection( "Server=localhost;UID=sa;PWD=secret;Database=Pubs" )
conPubs.Open()
cmdSelect = New SqlCommand( "Select au_lname From Authors", conPubs )
dtrAuthors = cmdSelect.ExecuteReader()
dropAuthors.DataSource = dtrAuthors
dropAuthors.DataTextField = "au_lname"
dropAuthors.DataBind()
dtrAuthors.Close()
conPubs.Close()
End If
End Sub
</Script>
<html>
<head><title>DropDownList.aspx</title></head>
<body>
<form Runat="Server">
<asp:DropDownList
ID="dropAuthors"
Runat="Server" />
<asp:Button
Text="Pick Author!"
Runat="Server" />
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?