Coding
Coding
Index.aspx
<table style="width:100%;">
<tr>
<td class="style5" bgcolor="White" colspan="2">
<asp:Image ID="Image2" runat="server"
Height="88px"
ImageUrl="~/Images/Welcome.jpg"
style="margin-left: 0px" Width="381px" />
</td>
</tr>
<tr>
<td class="style6"><div align="right">
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="#FF9900"
ForeColor="White" BorderStyle="Outset" FontBold="True"
Font-Names="Arial Narrow"
Width="78px">Customer</asp:LinkButton>
</div></td>
<td class="style2" rowspan="10"><div align="Left">
<asp:Image ID="Image1" runat="server"
Height="368px"
ImageUrl="~/Images/hotel-view.jpg"
Width="670px"
style="text-align: left" />
</div></td>
</tr>
<tr>
<td class="style6"><div align="right">
<asp:LinkButton ID="LinkButton3" runat="server"
BackColor="#FF9900"
ForeColor="White" BorderStyle="Outset" FontBold="True"
Font-Names="Arial Narrow"
Width="78px">Booking</asp:LinkButton>
</div></td>
</tr>
<tr>
<td class="style6"><div align="right">
<td class="style6">
<asp:LinkButton ID="LinkButton9" runat="server"
BackColor="#FF9900"
ForeColor="White" BorderStyle="Outset" FontBold="True"
Font-Names="Arial Narrow" Width="82px">Room
Report</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style6">
</td>
</tr>
<tr>
<td class="style6">
<asp:LinkButton ID="LinkButton7" runat="server"
BackColor="#FF9900"
ForeColor="White" BorderStyle="Outset" FontBold="True"
Font-Names="Arial Narrow" Width="74px">Sign
Out</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style6">
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label5" runat="server" Font-Bold="True"
Font-Names="Courier New"
Font-Size="Small" ForeColor="Red"></asp:Label>
</td>
</tr>
</table>
</p>
<div>
<table style="width:100%;">
<tr>
<td class="style3">
</td>
<td class="style4">
<asp:Label ID="Label2" runat="server" FontBold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="UserID"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style3">
</td>
<td class="style4">
<asp:Label ID="Label3" runat="server" FontBold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Password"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox2" runat="server"
TextMode="Password"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style3">
</td>
<td class="style4">
</td>
<td>
<asp:Label ID="Label4" runat="server" FontBold="True" Font-Names="Courier New"
Font-Size="Small" ForeColor="Red"></asp:Label>
</td>
</tr>
<tr>
<td class="style3">
</td>
<td class="style4">
</td>
<td>
</td>
</tr>
<tr>
<td class="style3">
</td>
<td class="style4">
</td>
<td>
<asp:LinkButton ID="LinkButton1" runat="server"
BackColor="White"
ForeColor="Red" Font-Bold="True" FontNames="Courier New"
Font-Size="X-Large">OK</asp:LinkButton>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
Index.aspx.vb
Partial Class index
Inherits System.Web.UI.Page
Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton1.Click
Dim dlib As New DatabaseLib()
dlib.CreateConnection()
Session.Remove("UserID")
Label5.Text = "You have been logged out now..."
End Sub
Protected Sub LinkButton8_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton8.Click
Response.Redirect("hotel.aspx")
End Sub
Protected Sub LinkButton9_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton9.Click
Response.Redirect("RoomInfo.aspx")
End Sub
End Class
Registration.aspx
<%@ Page Language="VB" AutoEventWireup="false"
CodeFile="Registration.aspx.vb" Inherits="Registration" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0
Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1" runat="server">
<title></title>
<style type="text/css">
.style1
{
width: 152px;
}
.style2
{
width: 258px;
}
</style>
</head>
<body background="Images/line.jpg">
<td class="style2">
<asp:Label ID="Label12" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Address"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3" runat="server"
Height="92px" TextMode="MultiLine"
Width="180px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label2" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Phone No"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox4"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label8" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Email"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox5"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label3" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="City"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox6"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label9" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Choose Room No"></asp:Label>
</td>
<td>
<asp:DropDownList ID="DDLRoomGrade"
runat="server" Height="16px" Width="50px">
</asp:DropDownList>
<asp:LinkButton ID="btnAvail" runat="server"
BorderColor="#CCFF99"
ForeColor="#99FF33">Check
Availability</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
<asp:Label ID="lblAvailMsg" runat="server"
BorderColor="#CCFFCC"
ForeColor="#FF3300"></asp:Label>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label4" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="No. Of Guest"></asp:Label>
</td>
<td>
<asp:DropDownList ID="DDLTotalGuest"
runat="server" Height="16px" Width="50px">
<asp:ListItem>1</asp:ListItem>
<asp:ListItem>2</asp:ListItem>
<asp:ListItem>3</asp:ListItem>
<asp:ListItem>4</asp:ListItem>
<asp:ListItem>5</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label5" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Arrival Date"></asp:Label>
</td>
<td>
<asp:Calendar ID="Calendar1" runat="server"
Height="16px" Width="147px">
</asp:Calendar>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label6" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Departure Date"></asp:Label>
</td>
<td>
<asp:Calendar ID="Calendar2" runat="server"
Height="16px" Width="147px">
</asp:Calendar>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label7" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Flight No"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox7"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label13" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Flight Time"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox8"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label14" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Other Requirement"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox9" runat="server"
Height="92px" TextMode="MultiLine"
Width="180px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:LinkButton ID="LinkButton1" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Save</asp:LinkButton>
</td>
<td>
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Back</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
Registration.aspx.vb
Customer.aspx
<%@ Page Language="VB" AutoEventWireup="false"
CodeFile="Customer.aspx.vb" Inherits="Customer" %>
</td>
<td>
<asp:Label ID="Label1" runat="server"
BackColor="#669900" BorderStyle="Solid"
Font-Bold="True" Font-Names="Arial Black"
ForeColor="White"
Text="Customer Registration Form"></asp:Label>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label2" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="UserID"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label8" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Password"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox2" runat="server"
TextMode="Password"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label3" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="UserName"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label9" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="DOB"></asp:Label>
</td>
<td>
DD<asp:DropDownList ID="DDLDate" runat="server"
Height="16px" Width="50px">
</asp:DropDownList>
MM<asp:DropDownList ID="DDLMonth"
runat="server" Height="16px" Width="50px">
</asp:DropDownList>
YYYY<asp:DropDownList ID="DDLYear"
runat="server" Height="16px" Width="50px">
</asp:DropDownList>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label7" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text=" City"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox7"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:LinkButton ID="LinkButton1" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Save</asp:LinkButton>
</td>
<td>
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Back</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
Customer.aspx.vb
Partial Class Customer
Inherits System.Web.UI.Page
Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton1.Click
Dim dlib As New DatabaseLib
dlib.CreateConnection()
If Not dlib.CheckDuplicate("select * from Customer where
UserId='" & TextBox1.Text & "'") Then
dlib.InsertRecord("Insert into Customer values('" &
TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','"
& TextBox4.Text & "','" & TextBox5.Text & "','" & TextBox6.Text &
"','" & TextBox7.Text & "')")
dlib.InsertRecord("Insert into Login values('" &
TextBox1.Text & "','" & TextBox3.Text & "','" & TextBox5.Text & "','"
& DDLDate.Text & "/" & DDLMonth.Text & "/" & DDLYear.Text & "','"
& TextBox2.Text & "')")
End If
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
TextBox5.Text = ""
TextBox6.Text = ""
TextBox7.Text = ""
End Sub
Protected Sub LinkButton1_Load(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton1.Load
End Sub
{
width: 252px;
text-align: right;
}
.style2
{
width: 258px;
}
.style3
{
width: 258px;
text-align: center;
}
</style>
</head>
<body background="Images/line1.jpg">
<form id="form1" runat="server">
<div>
<table style="width:100%;">
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
<asp:Image ID="Image1" runat="server"
Height="158px" BorderStyle="Solid"
ImageUrl="~/Images/service1.jpg" />
</td>
<td class="style2">
<asp:Label ID="Label1" runat="server"
BackColor="#FF6666" BorderStyle="Solid"
Font-Bold="True" Font-Names="Arial Black"
ForeColor="White"
</tr>
</table>
</div>
</form>
</body>
</html>
CustomerInfo.aspx.vb
Imports System.Data.OleDb
Imports System.Data
Partial Class CustomerInfo
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
If IsNothing(Session.Item("UserID")) Then
Response.Redirect("index.aspx")
Else
If Session.Item("UserID") <> "admin" Then
Response.Redirect("index.aspx")
End If
End If
Dim ada As New OleDbDataAdapter()
Dim ds As New DataSet()
Dim rd As OleDbDataReader
Dim dlib As New DatabaseLib()
Dim query As String
dlib.CreateConnection()
query = "select * from registration"
Dim cmd As New OleDbCommand(query, dlib.con)
rd = cmd.ExecuteReader()
If rd.Read() Then
ada = New OleDbDataAdapter(query, dlib.con)
ds = New DataSet()
ada.Fill(ds, "Hotel")
GridView1.DataSource = ds.Tables("Hotel")
GridView1.DataBind()
End If
End Sub
End Class
Feedback.aspx
<%@ Page Language="VB" AutoEventWireup="false"
CodeFile="Feedback.aspx.vb" Inherits="Feedback" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0
Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1" runat="server">
<title></title>
<style type="text/css">
.style1
{
width: 152px;
}
.style2
{
width: 258px;
}
</style>
</head>
<body bgcolor="#cccc00">
<form id="form1" runat="server">
<div>
<table style="width:100%;">
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
<asp:Label ID="Label1" runat="server"
BackColor="#669900" BorderStyle="Solid"
Font-Bold="True" Font-Names="Arial Black"
ForeColor="White"
Text="Your Feedback"></asp:Label>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label2" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Name"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label8" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Email"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox2"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label3" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Phone No"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label4" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Feedback"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox4"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:LinkButton ID="LinkButton1" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Save</asp:LinkButton>
</td>
<td>
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Back</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
Feedback.aspx.vb
Partial Class Feedback
Inherits System.Web.UI.Page
Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton1.Click
Dim dlib As New DatabaseLib
dlib.CreateConnection()
dlib.InsertRecord("Insert into Feedback values('" &
TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','"
& TextBox4.Text & "')")
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
If IsNothing(Session.Item("UserID")) Then
Response.Redirect("index.aspx")
End If
End Sub
Protected Sub LinkButton2_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton2.Click
Response.Redirect("index.aspx")
End Sub
End Class
Cancellation.aspx
<%@ Page Language="VB" AutoEventWireup="false"
CodeFile="Cancellation.aspx.vb" Inherits="Cancellation" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0
Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1" runat="server">
<title></title>
<style type="text/css">
.style1
{
width: 152px;
}
.style2
{
width: 258px;
}
</style>
</head>
<body bgcolor="#cccc00">
<form id="form1" runat="server">
<div>
<table style="width:100%;">
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
<asp:Label ID="Label1" runat="server"
BackColor="#669900" BorderStyle="Solid"
Font-Bold="True" Font-Names="Arial Black"
ForeColor="White"
Text="Cancellation Form"></asp:Label>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label15" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="UserID"></asp:Label>
</td>
<td>
<asp:TextBox ID="txtUserID"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label10" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Name"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label11" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Phone No"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox2" runat="server"
TextMode="Password"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label12" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Email"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3" runat="server"
Height="21px"
Width="125px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label6" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Cancellation Date"></asp:Label>
</td>
<td>
<asp:Calendar ID="Calendar2" runat="server"
Height="16px" Width="147px">
</asp:Calendar>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:LinkButton ID="LinkButton1" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Save</asp:LinkButton>
</td>
<td>
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Back</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
Cancellation.aspx.cs
Partial Class Cancellation
Inherits System.Web.UI.Page
Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton1.Click
Dim dlib As New DatabaseLib()
dlib.CreateConnection()
Dim d1 As String
Dim d2 As String
d1 = Calendar1.SelectedDate.ToString()
d2 = Calendar2.SelectedDate.ToString()
If Not dlib.CheckDuplicate("select * from Customer where
UserId='" & TextBox1.Text & "'") Then
dlib.InsertRecord("Insert into Cancellations values('" &
txtUserID.Text & "','" & TextBox1.Text & "','" & TextBox2.Text & "','"
& TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text &
"','" & d1 & "','" & d2 & "')")
' for record deletion function insertrecord is calling
dlib.InsertRecord("Delete from Payment where UserID='"
& txtUserID.Text & "')")
dlib.InsertRecord("Delete from Registration where
UserID='" & txtUserID.Text & "')")
dlib.InsertRecord("Delete from Customer where UserID='"
& txtUserID.Text & "')")
TextBox1.Text
TextBox2.Text
TextBox3.Text
TextBox4.Text
TextBox5.Text
End If
End Sub
=
=
=
=
=
""
""
""
""
""
Payment.aspx
<%@ Page Language="VB" AutoEventWireup="false"
CodeFile="Payment.aspx.vb" Inherits="Payment" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0
Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1" runat="server">
<title></title>
<style type="text/css">
.style1
{
width: 152px;
}
.style2
{
width: 258px;
}
</style>
</head>
<body bgcolor="#cccc00">
<form id="form1" runat="server">
<div>
<table style="width:100%;">
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
<asp:Label ID="Label1" runat="server"
BackColor="#669900" BorderStyle="Solid"
Font-Bold="True" Font-Names="Arial Black"
ForeColor="White"
Text="Payment Details"></asp:Label>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label2" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="UserID"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1" runat="server"
Width="169px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label8" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="User Name"></asp:Label>
</td>
<td>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label10" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Amount Paid"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox4" runat="server"
Height="24px"
Width="169px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:LinkButton ID="LinkButton1" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Save</asp:LinkButton>
</td>
<td>
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Back</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
Payment.aspx.vb
Partial Class Payment
Inherits System.Web.UI.Page
<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1" runat="server">
<title></title>
<style type="text/css">
.style1
{
width: 152px;
text-align: right;
}
.style2
{
width: 258px;
}
</style>
</head>
<body>
<form id="form1" runat="server">
<div>
<table style="width:100%;">
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
<asp:Label ID="Label1" runat="server"
BackColor="#669900" BorderStyle="Solid"
Font-Bold="True" Font-Names="Arial Black"
ForeColor="White"
Text="Contact Us"></asp:Label>
</td>
</tr>
<tr>
<td class="style1">
<asp:Image ID="Image1" runat="server"
Height="146px"
ImageUrl="images/other_girl.jpg"
Width="170px" />
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label2" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Name"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label8" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Address"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox2" runat="server"
TextMode="MultiLine" Height="90px"
Width="164px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label3" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Phone No"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label9" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="DOB"></asp:Label>
</td>
<td>
DD<asp:DropDownList ID="DDLDate" runat="server"
Height="16px" Width="50px">
</asp:DropDownList>
MM<asp:DropDownList ID="DDLMonth"
runat="server" Height="16px" Width="50px">
</asp:DropDownList>
YYYY<asp:DropDownList ID="DDLYear"
runat="server" Height="16px" Width="50px">
</asp:DropDownList>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label4" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Save</asp:LinkButton>
</td>
<td>
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Back</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
Contact.aspx.vb
Partial Class ContactUs
Inherits System.Web.UI.Page
Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton1.Click
Dim dlib As New DatabaseLib
dlib.CreateConnection()
dlib.InsertRecord("Insert into ContactUs values('" &
TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','"
& DDLDate.Text & "/" & DDLMonth.Text & "/" & DDLYear.Text & "','"
& TextBox4.Text & "')")
TextBox1.Text
TextBox2.Text
TextBox3.Text
TextBox4.Text
End Sub
=
=
=
=
""
""
""
""
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label2" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Name"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label8" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Email"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox2"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label3" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Phone No"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label4" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Feedback"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox4"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:LinkButton ID="LinkButton1" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Save</asp:LinkButton>
</td>
<td>
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Back</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
Feedback.aspx.vb
Partial Class Feedback
Inherits System.Web.UI.Page
ContactUs.aspx
<%@ Page Language="VB" AutoEventWireup="false"
CodeFile="ContactUs.aspx.vb" Inherits="ContactUs" %>
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label2" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Name"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label8" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Address"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox2" runat="server"
TextMode="MultiLine" Height="90px"
Width="164px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label3" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Phone No"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label9" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="DOB"></asp:Label>
</td>
<td>
DD<asp:DropDownList ID="DDLDate" runat="server"
Height="16px" Width="50px">
</asp:DropDownList>
MM<asp:DropDownList ID="DDLMonth"
runat="server" Height="16px" Width="50px">
</asp:DropDownList>
YYYY<asp:DropDownList ID="DDLYear"
runat="server" Height="16px" Width="50px">
</asp:DropDownList>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:Label ID="Label4" runat="server"
BorderColor="#FF3300" Font-Bold="True"
Font-Names="Arial Narrow" ForeColor="Maroon"
Text="Email"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox4"
runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
<asp:LinkButton ID="LinkButton1" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Save</asp:LinkButton>
</td>
<td>
<asp:LinkButton ID="LinkButton2" runat="server"
BackColor="Yellow"
Font-Bold="True" Font-Names="Arial"
ForeColor="#660033">Back</asp:LinkButton>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
<tr>
<td class="style1">
</td>
<td class="style2">
</td>
<td>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
ContactUs.aspx.vb
Partial Class ContactUs
Inherits System.Web.UI.Page
Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal
e As System.EventArgs) Handles LinkButton1.Click
Dim dlib As New DatabaseLib
dlib.CreateConnection()
Span Shots