?? menu.aspx
字號:
<%@ Page Language="vb" %>
<%@ Import Namespace="System.Data" %>
<script language="VB" runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Dim dvMenuItems As DataView
Dim products As New Conference.ProductsDB
dvMenuItems = products.GetProductCategories().Tables(0).DefaultView
' Bind the DataView of menu items to the list
lstMenu.DataSource = dvMenuItems
lstMenu.DataBind()
End Sub
</script>
<html>
<body>
<asp:DataList id="lstMenu" width="145" runat="server">
<template name="ItemTemplate">
<asp:HyperLink id="HyperLink1" CssClass="MenuUnselected"
Text='<%# Container.DataItem("CategoryName") %>'
NavigateUrl='<%# "productslist.aspx?CategoryID=" & _
Container.DataItem("CategoryID") %>'
runat="server" />
</template>
</asp:DataList>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -