当前位置:文档之家› 酒店管理系统

酒店管理系统

酒店管理系统设计

院系:铜仁学院数计系

专业:计算机科学与技术

班级:09计本

学号:2009045010

学生姓名:黄薇

指导教师:孙黎明

2012年12月

摘要

现代化的酒店组织庞大、服务项目多、信息量大,要想提高劳动生产、降低成本、提高服务质量和管理水平,进而促进经济效益,必须借助计算机来进行现代化的信息管理。酒店管理系统正是为此而设计的, 毕业设计中采用ASP开发,使用access数据库。采用Jsp应用开发技术,具有一些预订客房,查询等功能,尤其依靠ASP的来为酒店更好的进行管理,稳定性,可扩展性,安全性,健壮性,都是该酒店管理的优势所在。

关键词:酒店管理系统,ASP

目录

1.1 选题背景 (2)

1.2 课题研究的目的和意义 (2)

1.3 本文的研究内容……………………………………………………………………………错误!未定义书签。

1.4 国内外现状 (2)

第2章系统分析 (2)

3.1 可行性分析 (2)

3.2 需求分析 (2)

第3章设计 (4)

5.1 酒店首页展示及功能 (4)

5.2 管理员登陆 (8)

5.3 客户预定模块 (14)

8

第1章前言

1.1 选题背景

酒店业是一个前景广阔而又竞争激烈的行业。改革开放以来,我国的酒店业迅速发展,已经成为一个具有相当规模的产业。由于我国的旅游业迅速发展,通过调查,我国在2020年将成为世界上第四大旅游国家;同时我国加入世界贸易组织,酒店业将完全开放,这个时候,我国的酒店业将面临着前所未有的机遇和挑战。但是,现在甚至还有一些酒店还停留在由人工操作和管理阶段,这样已经无法适应当前的发展趋势。因此,要想使酒店的工作质量和效率提高,采用先进的计算机网络通信技术改变酒店业务模式,实现酒店业务管理的自动化已经成为一种必然。

1.2 课题研究的目的和意义

对酒店整个来说,对酒店经营状况起决定作用的是酒店的服务管理水平。如何利用先进的管理手段来提高酒店的管理水平成为酒店业务发展的当务之急。面对信息时代的机遇和挑战,利用科技手段提高酒店的管理无疑是一条行之有效的途径。虽然计算机管理并不是酒店管理走向成功的关键元素,但它可以最大限度地发挥准确、快捷、高效等作用,对酒店的业务管理提供强有力的支持。因此,采用全新的计算机网络和酒店业务管理系统,已成为提高酒店的管理效率,使作业人员与管理系统之间灵活互动,实现流畅的工作流衔接,帮助酒店有效地进行业务管理,释放最大价值。酒店业务管理系统在达到在节省人力资源成本的同时,可以提高业务效率,并能够及时、准确、迅速地满足顾客服务的需求[2]。

1.3 国内外现状

随着我国经济体制改革的不断深化和我国经济的快速发展,我国人民的收入不断提高,消费观念也有提高,对服务质量的要求也有很大的提高。各地把旅游业当作本地经济发展的重要支柱之一。酒店作为人们食宿、娱乐、休闲的场所而得到了快速的发展。社会上也成立了各种类型,不同规模的酒店服务企业。如何为客户提供更加准确及时的服务,成为各个酒店

竞争关键。所以酒店业务信息化建设就成为了客户衡量酒店提供商服务标准的一个准则,信息系统成为了基础。

随着Internet技术的进一步发展和普及,不能很好的适应世界经济发展的形式和我国国民经济建设的需要,市场现有的产品化的酒店业务软件系统在不断发展中的酒店的需求。基于WEB的酒店管理系统的总体设计目标能够建立完善、高效、可靠的酒店业务信息系统,为酒店提供良好的信息环境[3]。

第2章系统分析

3.1 可行性分析

随着旅游业的发展,酒店、餐饮娱乐行业日趋发达,引入全方位的电脑服务和电脑管理日益流行。同时,酒店和餐厅娱乐业引入电脑服务和管理也取得了优良的经济效益和社会效益。为此,国家建设部已于最近作出明确规定:凡星级酒店在项目审批时,其设计方案必须包括电脑管理系统,否则不予立项。可见,酒店管理电脑化势在必行。酒店管理系统将先进的电脑技术与现代酒店服务管理完美地结合起来,实现了住宿、餐饮、娱乐全新概念的服务和管理方式。

一个成熟的酒店管理系统不仅仅是记录酒店客人的信息,提供查询,报表打印等一系列简单的工作,它能让工作人员从烦琐的手工操作中解脱,并且酒店管理系统本身就代表着一种管理方法。随着它的深入,将带动企业的运做,为管理和决策提供支持。为了达到这个要求,它必须依靠高起点的硬件环境和软件开发工具来保证系统的稳定和正常运行。

3.2 需求分析

系统需对用户登录进行管理。使用各功能模块时,系统应验证用户身份的有效性,否则要求用户登录。另外,允许用户对自己的密码进行修改。

系统应提供客房的分类管理功能,可分类制订客房面积、价格、是否配备空调等客房类型,对不同标准的客房进行有效管理。系统可实现对客房信息的添加、删除以及修改。

在进行入住/退房管理时,系统可以根据客房当前的状态自动提示可用服务(入住/退房)。如果客房没有客人入住,则该客房的可用服务为“入住”;否则,可用服务为“退房”。

系统的客户端在Windows平台下运行,服务器端可在Windows平台或UNIX平台下运行。系统还需要有较好的安全性和可扩展性[8]。

需求分析是从客户的需求中提取出软件系统能够帮助用户解决的业务问题,通过对用户业务问题的分析,规划出系统的功能模块,即定义用例。这个步骤是对理解需求的升华,直接关系到该系统的质量。

整个系统可以分为2大部分。酒店网站部分(客户服务网站)和酒店管理部分(管理员部分)。本系统只做了有关酒店管理的一部分。

3.2.1 酒店管理部分

1. 客房管理: 预订客房管理、客房查询、退房管理。

前台服务员的主要职能是负责订房和退房,以及查询入住的客户信息。所有该角色只可以使用部分功能,包括预定管理、客户信息查询,入住管理,退房管理功能。

第3章设计

5.1 酒店首页展示

代码实现:

 

 

   最新资讯

<%

Sqlnews= "select * from news where idsort=1 and okgood=1 order by topgood desc,addtime desc"

Set Rsnews=Conn.Execute(Sqlnews)

if rsnews.eof and rsnews.bof then

response.write "

  • "

    else

    %>

    <%

    newsid=0

    do while not rsnews.eof

    newsid=newsid+1

    shijian=rsnews("addTime")

    fabutime=year(shijian)&"-"&getFormatDateString(month(shijian))&"-"&getFormatDateString(day(shijian)) if rsnews("topgood")*1=1 then

    classnames=" style=""color:#946E2E;font-weight:bold"""

    else

    classnames=""

    end if

    %>

    <%

    if newsid=5 then exit do

    rsnews.movenext

    loop

    end if

    %>

    "<%=classnames%>><%=left(rsnews("title"),20)%> <%=fabutime%>

    src="image/customer_btn02.gif" width="210" height="50" alt="">

    5.2 管理员登陆

    在本次系统中,用户登陆模块与普通应用系统的用户登陆是基本相同的。因此当一个用户登陆管理系统之后,管理员的操作流程如以下图所示。

    后台目录:/admin/Admin_Login.asp 登陆用户名及密码:admin

    图5-1 管理员登陆操作流程

    登陆界面

    输入用户名和密码 查询成功 登陆管理界面

    图5-2 系统登陆界面截图

    管理员代码如下:

    网站信息管理系统_管理员登录

    <%

    response.expires = 0

    if request("Action")="chk" then

    username=KillSQLCode(trim(Request.form("username")))

    password=KillSQLCode(trim(Request.form("password")))

    Md5_Pass=md5(password)

    if username="" or password="" then Response.Redirect ("Admin_login.asp")

    verifycode = Request("verifycode")

    if username="" or password="" then

    response.Write("") Response.End()

    end if

    set rs=server.createobject("adodb.recordset")

    sql="select * from admin where username='"&username&"'and password='"&Md5_Pass&"'" rs.open sql,conn,1,3

    if not rs.EOF then

    rs("LoginTimes")=rs("LoginTimes")+1

    rs("LoginTime")=now()

    rs("LoginIP")=Request.ServerVariables("REMOTE_ADDR")

    rs.Update

    Session("AdminID")=rs("id")

    Session("WendaySys_User")=rs("username")

    Session("IsAdmin")=true

    Session("KEY")=rs("Oskey")

    'Session("Admin") = "Login"

    Session("LoginTimes")=rs("LoginTimes")

    Session("LastLoginTime")=rs("LoginTime")

    Response.Redirect ("adminDefault.asp")

    else

    response.Write("")

    Response.End()

    end if

    rs.close

    set rs=nothing

    conn.close

    set conn=nothing

    end if

    if request("Action")="LoginOut" then

    IsAdmin=session("IsAdmin")

    If IsAdmin=true Then

    set rs=server.createobject("adodb.recordset")

    AdminID=session("AdminID")

    sql="select * from admin where id="&AdminID

    rs.open sql,conn,1,3

    if not rs.EOF then

    rs("LogoutTime")=now()

    rs.Update

    Session("AdminID")=""

    Session("IsAdmin")=""

    Session("KEY")=""

    'Session("Admin")=""

    rs.Close

    set rs=nothing

    else

    response.write"数据库出错!"

    Response.end

    end if

    end if

    conn.close

    set conn=nothing

    response.redirect ("Admin_Login.asp")

    end if

    %>

     

    background="images/login_05.gif"> 

    background="images/login_06.gif">

    class="STYLE1" style="color:#FFFFFF">用户名

    style="color:#FFFFFF">密码

    style="color:#FFFFFF">验证码

    style="cursor:pointer;padding:2px 2px 2px 2px;" src="../Common/GetCode.asp?n=<%=Timer%>" onClick="this.src='../Common/GetCode.asp?n='+ Math.random();"

    align="absmiddle">

    title="登录后台" src="images/dl.gif" width="49" height="18">

    background="images/login_07.gif"> 

     

    5.3 客户预定模块

    添加是为预定客户保留预定信息,流程如下:

    图5-3 “添加”流程

    点击“添加”按钮

    显示空房列表

    输入客户信息,点击确定

    是否有空房

    选择房间

    弹出预定客户客户信息表

    显示空列表

    提示操作成功

    图5-4登记模块界面截图

    代码实现如下:

    <%

    listid=request("listid")

    set RsChoosea=server.createobject("adodb.recordset")

    if request("listid")="" then

    listid=3

    SqlChoosea= "Select top 1 * from sclass where listid="&listid&" order by s_orders asc"

    else

    SqlChoosea= "Select * from sclass where id="&request("listid")&""

    end if

    RsChoosea.open SqlChoosea,conn,1,1

    if RsChoosea.eof then

    contentname=""

    else

    aboutidd=rschoosea("id")

    yangsidd=rschoosea("lxid")

    Titlename=rschoosea("ClassName")

    end if

    %>

    <%

    if request("listid")="" then

    Titlename="高级客房"

    end if

    %>