ASP.Net/User Control and Master Page/Data Exchange
Data exchange between user control and master page (VB.net)
<source lang="csharp">
<%@ Page Language=VB Debug=true %> <%@ Register
TagPrefix="My" TagName="SimpleControl" Src="UserControlReadProp.ascx"
%> <script runat=server> Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
lblMessage.Text = "You entered: " & MSC1.UserName _ & " " & MSC1.Password & "
Control Version: " _ & MSC1.Version "MSC1.UserName = "Bob"
End Sub </SCRIPT> <HTML> <HEAD> <TITLE>Implementing a User Control on an ASP.NET Page</TITLE> </HEAD> <BODY LEFTMARGIN="40"> <form
runat="server" id="MyForm"
>
<My:SimpleControl
id="MSC1" runat="server"
/>
<asp:button
id="butOK" text=" OK " onclick="SubmitBtn_Click" runat="server"
/>
<asp:label
id="lblMessage" runat="server"
/> </form> </BODY> </HTML> <%--UserControlReadProp.ascx <script language="VB" runat="server"> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
If Not IsPostBack Then txtUserName.Text = "Your Name Here" End If
End Sub Public ReadOnly Property UserName() As String
Get UserName = txtUserName.Text End Get
End Property Public ReadOnly Property Password() As String
Get Password = txtPassword.Text End Get
End Property Public ReadOnly Property Version() As String
Get Version = "2.3.145" End Get
End Property </script>
<asp:Label id="lbl1" runat="server" Font-Bold="True" Text="User Name: " /> |
<asp:TextBox id="txtUserName" runat=server /> |
<asp:Label id="lbl2" runat="server" Font-Bold="True" Text="Password: " /> |
<asp:TextBox id="txtPassword" runat=server TextMode="Password" /> |
--%>
</source>