ASP.Net/User Control and Master Page/Register Tag — различия между версиями
Admin (обсуждение | вклад) м (1 версия) |
|
(нет различий)
|
Версия 18:30, 26 мая 2010
Give one user component different tag names (VB.net)
<source lang="csharp">
<%@ Page Language="vb" %> <%@ Register TagPrefix="MyTag" TagName="Header" Src="header.ascx" %> <%@ Register TagPrefix="MyTag" TagName="Header1" Src="header.ascx" %> <html> <head>
<title>User Control Examples</title>
</head> <body>
<form runat="server" method="post"> <MyTag:Header id="MyHeader" runat="Server" />
The Multi-Lingual Control Example
<MyTag:Header1 id="MyHeader1" runat="Server" /> </form>
</body> </html> <%--header.ascx <%@ Control Language="vb" %>
<asp:label id="WelcomeMessage" runat="Server">Welcome to the shop!</asp:label> |
Select your Language: |
<script runat="server">
Private Languages As New Hashtable() Public Sub Page_Load() Languages.Add("English", "Hello, and welcome to the shop") Languages.Add("French", "Bonjour, et bienvenue au magasin") Languages.Add("Spanish", "Buenas Dias, e bienvenido a la tienda") Languages.Add("German", "Guten Tag, und wilkommen ins geschaeft") If Not Page.IsPostback LanguageList.Datasource = Languages.Keys Page.DataBind() End If End Sub Public Sub DropList_Changed(Sender As Object, E As EventArgs) WelcomeMessage.text = Languages(Languagelist.SelectedItem.Text) End Sub
</script> --%>
</source>
Reference two different user control (VB.net)
<source lang="csharp">
<%@ Page Language="vb" %> <%@ Register TagPrefix="MyTag" TagName="Header" Src="header.ascx" %> <%@ Register TagPrefix="MyTag" TagName="FeaturedBooks" Src="FeaturedBooks.ascx" %> <html> <head>
<title>User Control Examples</title> <link rel="stylesheet" type="text/css" href="style.css">
</head> <body>
<form runat="server" method="post"> <MyTag:Header id="MyHeader" runat="Server" />
<MyTag:FeaturedBooks id="MyFeaturedBooks" runat="server" /> |
</form>
</body> </html> <%--header.ascx <%@ Control Language="vb" %>
<asp:label id="WelcomeMessage" runat="Server">Welcome to the shop!</asp:label> |
Select your Language: |
<script runat="server">
Private Languages As New Hashtable() Public Sub Page_Load() Languages.Add("English", "Hello, and welcome to the shop") Languages.Add("French", "Bonjour, et bienvenue au magasin") Languages.Add("Spanish", "Buenas Dias, e bienvenido a la tienda") Languages.Add("German", "Guten Tag, und wilkommen ins geschaeft") If Not Page.IsPostback LanguageList.Datasource = Languages.Keys Page.DataBind() End If End Sub Public Sub DropList_Changed(Sender As Object, E As EventArgs) WelcomeMessage.text = Languages(Languagelist.SelectedItem.Text) End Sub
</script> --%> <%--
<%@ import Namespace="System.Data" %> <%
Dim ResultString as StringResultString = "
Today"s Featured Books: |
"
ResultString += "fake book data"ResultString += " |
Response.Write (ResultString)
%>
--%>
</source>