hyperlinklist.aspx
来自「asp.net技术内幕的书配源码」· ASPX 代码 · 共 48 行
ASPX
48 行
<%@ Import Namespace="System.Data.SqlClient" %>
<Script Runat="Server">
Sub Page_Load
If Not IsPostBack Then
Dim conMyData As SqlConnection
Dim cmdSelect As SqlCommand
Dim dtrLinks As SqlDataReader
conMyData = New SqlConnection( "Server=localhost;UID=sa;PWD=secret;Database=myData" )
cmdSelect = New SqlCommand( "Select * From FavLinks", conMyData )
conMyData.Open()
dtrLinks = cmdSelect.ExecuteReader()
rptLinks.DataSource = dtrLinks
rptLinks.DataBind()
dtrLinks.Close()
conMyData.Close()
End If
End Sub
</Script>
<html>
<head><title>HyperLinkList.aspx</title></head>
<body>
<form Runat="Server">
<asp:Repeater
ID="rptLinks"
Runat="Server">
<ItemTemplate>
<li>
<ASP:HyperLink
Text='<%# Container.DataItem( "link_title" ) %>'
NavigateURL='<%# Container.DataItem( "link_url" ) %>'
Runat="Server" />
</ItemTemplate>
</asp:Repeater>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?