Registration Form Using Two Webpages in VB.NET

In this article we will do a register page, but here in one form we will not insert all the information, rather we will insert some information in one page and some other information's in the next page but the first information we have inserted will be show in the second page and then we will click register button to have a complete registration and a success page will display containing the Full name of the user who have already registered.

Program

FirstForm.aspx code

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="FirstForm.aspx.vb"Inherits="FirstForm" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1
transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Label ID="Label1" runat="server" Text="First Name" Width="160px"
Font-Bold="True"></asp:Label>
<asp:TextBox ID="TextBox1" runat="server" Width="200px"></asp:TextBox>

<asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server"
ControlToValidate="TextBox1" ErrorMessage="Name Required"></asp:RequiredFieldValidator>
<br />
<asp:Label ID="Label2" runat="server" Text="Email" Width="160px"
Font-Bold="True"></asp:Label>

<asp:TextBox ID="TextBox2" runat="server" Width="200px"></asp:TextBox>
<asp:RegularExpressionValidator ID="RegularExpressionValidator1" runat="server"
ControlToValidate="TextBox2" ErrorMessage="Invalid Email"
ValidationExpression="\w+([-+.']\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*"></asp:RegularExpressionValidator>
<asp:RequiredFieldValidator ID="RequiredFieldValidator2" runat="server"
ControlToValidate="TextBox2" ErrorMessage="Email Required"></asp:RequiredFieldValidator>
<br />
<asp:Label ID="Label3" runat="server" Text="Mobile No" Width="160px"
Font-Bold="True"></asp:Label>
<asp:TextBox ID="TextBox3" runat="server" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RequiredFieldValidator3" runat="server"
ControlToValidate="TextBox3" ErrorMessage="Mobile No. Required"></asp:RequiredFieldValidator>
<br />
<asp:Label ID="Label4" runat="server" Text="Country" Width="160px"
Font-Bold="True"></asp:Label>

<asp:DropDownList ID="DropDownList1" runat="server">
<asp:ListItem>India</asp:ListItem>
<asp:ListItem>usa</asp:ListItem>
<asp:ListItem>uk</asp:ListItem>
<asp:ListItem>Nepal</asp:ListItem>

<asp:ListItem>Srilanka</asp:ListItem>
<asp:ListItem>Australia</asp:ListItem>
<asp:ListItem>Germany</asp:ListItem>
</asp:DropDownList>

<asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server"
ControlToValidate="DropDownList1" ErrorMessage="Country Required"></asp:RequiredFieldValidator>

</div>
<asp:Button ID="Button1" runat="server" onclick="Button1_Click"
Text="Register continue to next page" Font-Bold="True" />
</form>
</body>
</html>

FirstForm.aspx.vb code

Imports System.Data.SqlClient
Imports System.Data
Partial Class FirstForm
Inherits System.Web.UI.Page
Dim strConnString As String = System.Configuration.ConfigurationManager.ConnectionStrings.Item("ConnectionString"
.ToString()
Dim con As New SqlConnection(strConnString)
Dim sqlda As SqlDataAdapter
Dim com As SqlCommand
Dim ds As DataSet
Dim str As String
Dim url As String
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) HandlesButton1.Click
url = "SecondForm.aspx?name=" & TextBox1.Text & "&email=" & TextBox2.Text &"&mobileno=" & TextBox3.Text & "
&country=" & DropDownList1.SelectedItem.Text
Response.Redirect(url)
End Sub
End Class

SecondForm.aspx code

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="SecondForm.aspx.vb"Inherits="SecondForm" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1
transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Label ID="Label1" runat="server" Text=" Email:*" Width="160px"
Font-Bold="True"></asp:Label>
<asp:TextBox ID="TextBox1" runat="server" Width="200px"></asp:TextBox>
<asp:RegularExpressionValidator ID="RegularExpressionValidator1" runat="server"
ControlToValidate="TextBox1" ErrorMessage="Invalid email"
ValidationExpression="\w+([-+.']\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*"></asp:RegularExpressionValidator>
<br />
<asp:Label ID="Label2" runat="server" Text=" Password:*" Width="160px"
Font-Bold="True"></asp:Label>
<asp:TextBox ID="TextBox2" runat="server" Width="200px" TextMode="Password"></asp:TextBox>
<asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server"
ControlToValidate="TextBox2" ErrorMessage="Password Required"></asp:RequiredFieldValidator>
<br />
<asp:Label ID="Label3" runat="server" Text=" Confirm Password:*" Width="160px"
Font-Bold="True"></asp:Label>
<asp:TextBox ID="TextBox3" runat="server" Width="200px" TextMode="Password"></asp:TextBox>

<asp:CompareValidator ID="CompareValidator2" runat="server"
ControlToCompare="TextBox2" ControlToValidate="TextBox3"
ErrorMessage="Password mismatch"></asp:CompareValidator>
<asp:RequiredFieldValidator ID="RequiredFieldValidator2" runat="server"
ControlToValidate="TextBox3" ErrorMessage="ConfirmPassword Required"></asp:RequiredFieldValidator>
<br />

<asp:Label ID="Label4" runat="server" Text="First Name:*" Width="160px"
Font-Bold="True"></asp:Label>
<asp:TextBox ID="TextBox4" runat="server" Width="200px"></asp:TextBox><br />

<asp:Label ID="Label5" runat="server" Text=" Last Name:*" Width="160px"
Font-Bold="True"></asp:Label>
<asp:TextBox ID="TextBox5" runat="server" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server"
ControlToValidate="TextBox5" ErrorMessage="Last Name Required"></asp:RequiredFieldValidator>
<br />
<asp:Label ID="Label6" runat="server" Text="Mobile Number: *" Width="160px"
Font-Bold="True"></asp:Label>
<asp:TextBox ID="TextBox6" runat="server" Width="200px"></asp:TextBox><br />
<asp:Label ID="Label7" runat="server" Text="You have selected: *" Width="160px"
Font-Bold="True"></asp:Label>
<asp:DropDownList ID="DropDownList1" runat="server">
</asp:DropDownList>
<br />
</div><br />
<asp:Button ID="Button1" runat="server" Text="Confirm Register" onclick="Button1_Click"
Font-Bold="True" />
</form>
</body>
</html>

SecondForm.aspx.vb code

Imports System.Data.SqlClient
Imports System.Data
Partial Class SecondForm
Inherits System.Web.UI.Page
Dim strConnString As String = System.Configuration.ConfigurationManager.ConnectionStrings.Item("ConnectionString".ToString()
Dim con As New SqlConnection(strConnString)
Dim sqlda As SqlDataAdapter
Dim com As SqlCommand
Dim ds As DataSet
Dim str As String

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) HandlesMe.Load
TextBox4.Text = Request.QueryString("name")
TextBox1.Text = Request.QueryString("email")
TextBox6.Text = Request.QueryString("mobileno")
DropDownList1.Items.Add(Request.QueryString("country"))
End Sub
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) HandlesButton1.Click
con.Open()
Session("fname") = TextBox4.Text
Session("lname") = TextBox5.Text

str = "insert into employee values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & Sessio
("fname") & "','" & Session("lname") & "','" & TextBox6.Text & "','" & DropDownList1.SelectedValue &"')"
com = New SqlCommand(str, con)
com.ExecuteNonQuery()
con.Close()
Response.Redirect("sucess.aspx")
End Sub
End Class

Success.aspx code

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="sucess.aspx.vb" Inherits="sucess"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1
transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Label ID="Label1" runat="server" Height="61px" Text="Label" Width="200px"></asp:Label>
</div>
</form>
</body>
</html>

Success.aspx.vb code

Partial Class sucess
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) HandlesMe.Load
Label1.Text = "Welcome:" + "<h2>" + Session("fname") + Session("lname") + "</h2>"
End Sub
End Class

Output

registration form asp.net

asp.net registration form

Thanks for reading.