register.aspx

asp.net技术内幕的书配源码

<!-- #INCLUDE Virtual="/aspnetjobs/site/includes/header.aspx" -->

<Script runat="Server">

Dim blnIsResume As Boolean

Sub Page_Load
  Dim strReturnURL As String

  If Not IsPostBack Then
    strReturnURL = Request.QueryString( "ReturnURL" )
    IF INSTR( strReturnURL.ToLower(), "listjob" ) > 0 Then
      blnIsResume = False
    Else
      blnIsResume = True
    End If
    Databind()
  End If
End Sub

Sub Button_Click( s As Object, e As EventArgs )
  Dim conJobs As SqlConnection
  Dim strConString As String
  Dim cmdInsert As SqlCommand
  Dim parmReturn As SqlParameter

  If IsValid Then
  strConString = ConfigurationSettings.AppSettings( "constring" )
  conJobs = New SqlConnection( strConString )
  cmdInsert = New SqlCommand( "addUser", conJobs )
  cmdInsert.CommandType = CommandType.StoredProcedure
  parmReturn = cmdInsert.Parameters.Add( "@Return", SqlDbType.Int )
  parmReturn.Direction = ParameterDirection.ReturnValue
  cmdInsert.Parameters.Add( "@username", txtUsername.Text )
  cmdInsert.Parameters.Add( "@password", txtPassword.Text )
  cmdInsert.Parameters.Add( "@firstname", txtFirstname.Text )
  cmdInsert.Parameters.Add( "@lastname", txtLastname.Text )
  cmdInsert.Parameters.Add( "@email", txtEmail.Text )
  cmdInsert.Parameters.Add( "@briefdesc", txtBriefdesc.Text )
  cmdInsert.Parameters.Add( "@fulldesc", txtFulldesc.Text )
  cmdInsert.Parameters.Add( "@isresume", pnlResume.Visible )
  conJobs.Open()
    cmdInsert.ExecuteNonQuery()
  conJobs.Close
  If cmdInsert.Parameters( "@Return" ).Value = 0 Then
    If pnlResume.Visible Then
      Cache.Remove( "NewResumes" )
    End If
    FormsAuthentication.RedirectFromLoginPage( txtUsername.Text, False )
  Else
    lblError.Visible = True
  End If
  End If
End Sub
</Script>

<myControls:Header
  PageTitle="Register"
  Runat="Server" />

<h3>Please Register</h3>
<form runat="Server">

<table border=0 width="400">
<tr><td>

<asp:Label
  ID="lblError"
  forecolor="red"
  font-bold="True"
  Visible="False"
  Runat="Server">
The username that you entered has already been selected
by another user. Please enter a new username.
<p>
</asp:Label>

<b>First Name</b>
<br>
<asp:TextBox
  ID="txtFirstname"
  Maxlength="30"
  CssClass="formfield"
  Runat="Server" />
<asp:RequiredFieldValidator
  ControlToValidate="txtFirstname"
  Text="Required!"
  Runat="Server" />
<p>
<b>Last Name</b>
<br>
<asp:TextBox
  ID="txtLastname"
  Maxlength="30"
  CssClass="formfield"
  Runat="Server" />
<asp:RequiredFieldValidator
  ControlToValidate="txtLastname"
  Text="Required!"
  Runat="Server" />
<p>
<b>Email Address</b>
<br>
<asp:TextBox
  ID="txtEmail"
  Maxlength="255"
  Columns="50"
  CssClass="formfield"
  Runat="Server" />
<asp:RequiredFieldValidator
  ControlToValidate="txtEmail"
  Text="Required!"
  Runat="Server" />
<p>
<b>Username</b>
<br>
<asp:TextBox
  ID="txtUsername"
  Maxlength="20"
  CssClass="formfield"
  Runat="Server" />
<asp:RequiredFieldValidator
  ControlToValidate="txtUsername"
  Text="Required!"
  Runat="Server" />
<p>
<b>Password</b>
<br>
<asp:TextBox
  ID="txtPassword"
  Maxlength="20"
  TextMode="Password"
  CssClass="formfield"
  Runat="Server" />
<asp:RequiredFieldValidator
  ControlToValidate="txtPassword"
  Text="Required!"
  Runat="Server" />
<p>
<b>Password (Again for confirmation)</b>
<br>
<asp:TextBox
  ID="txtPassword2"
  Maxlength="20"
  TextMode="Password"
  CssClass="formfield"
  Runat="Server" />
<asp:RequiredFieldValidator
  ControlToValidate="txtPassword2"
  Text="Required!"
  Display="Dynamic"
  Runat="Server" />
<asp:CompareValidator
  ControlToValidate = "txtPassword"
  ControlToCompare = "txtPassword2"
  Type = "String"
  Operator="Equal"
  Text="Passwords must match!"
  Runat = "server" />
<p>
<asp:Panel
  Visible='<%# Not blnIsResume %>'
  Runat="Server">
<b>Company Brief Description</b>
<br>
Enter a brief description of your company. This description
will appear on the page that lists links to your current
job postings. 
</asp:Panel>
<asp:Panel
  Visible='<%# blnIsResume %>'
  Runat="Server">
<b>Brief Description</b>
<br>
Enter a brief description of the type of job that you are seeking.
</asp:Panel>
<br>
<asp:TextBox
  ID="txtBriefdesc"
  Maxlength="50"
  Columns="50"
  CssClass="formfield"
  Runat="Server" />
<p>
<asp:Panel
  ID="pnlCompany"
  Visible='<%# Not blnIsResume %>'
  Runat="Server">
<b>Company Full Description</b>
<br>
Enter a full description of your company. This description
will appear on the page that lists links to your current
job postings. This description can contain HTML formatting.
</asp:Panel>
<asp:Panel
  ID="pnlResume"
  Visible='<%# blnIsResume %>'
  Runat="Server">
<b>Resume</b>
<br>
Enter your resume. Your resume will appear on your personal home page.
Your resume can contain HTML formatting.
</asp:Panel>
<br>
<asp:TextBox
  ID="txtFullDesc"
  TextMode="Multiline"
  Columns="80"
  Rows="10"
  CssClass="formfield"
  Runat="Server" />
<p>
<asp:Button
  Text="Register!"
  OnClick="Button_Click"
  Runat="Server" />

</td></tr>
</table>

</form>

<myControls:Footer
  Runat="Server" />