Login User Control

Eric — Thu, 22 May 2008 15:29:08 GMT

This is a simple login user control used to demonstrate how to expose (get and set) the properties associated with the control. Here is a working demo.

** LoginUserControl.ascx **

<script language="VB" runat="server"> Public BackColor As String = "white" Public Property Login As String Get Return txtLogin.Text End Get Set txtLogin.Text
= Value End Set End Property Public Property Password As String Get Return txtPassword.Text End Get Set txtPassword.Text
= Value End Set End Property Public Property Status As String Get Return lblStatus.Text End Get Set lblStatus.Text
= Value End Set End Property </script>
<table style="background-color:<%=BackColor%>;font:
10pt verdana;border-width:1;border-style:solid;border-color:black;" cellspacing=15>
<tr> <td><b>Login: </b></td> <td><ASP:TextBox
id="txtLogin" runat="server"/></td>
</tr> <tr> <td><b>Password: </b></td> <td><ASP:TextBox
id="txtPassword" TextMode="Password" runat="server"/></td>
</tr> <tr> <td></td> <td><ASP:Button Text="Submit" runat="server"/></td>
</tr> <tr> <td></td> <td><asp:Label id="lblStatus" runat="server"/></td>
</tr> </table>

** LoginControl.aspx **

<%@ Register TagPrefix="MyUserControl" TagName="Login" Src="LoginUserControl.ascx" %>
<html> <script language="VB" runat="server"> Sub Page_Load(ByVal Sender As Object, ByVal E As EventArgs) If (Page.IsPostBack) Then MyLabel.Text
&= "The UserId is " & MyLogin.Login & "<br>" MyLabel.Text
&= "The Password is " & MyLogin.Password
& "<br>" MyLogin.Status = "Hello
world" End If End Sub </script>
<body style="font: 10pt verdana"> <h3>A
Login User Control</h3> <form runat="server">
<MyUserControl:Login id="MyLogin" UserId="John
Doe" Password="Secret" BackColor="beige" runat="server"/>
</form> <asp:Label id="MyLabel" runat="server"/>
</body> </html>

Stone Coast Web Design Blog - User Controls

Login User Control