网上客房预订系统(ASP+Access+系统功能结构图+文件架构图+源代码) 第4页
网上客房预订系统(ASP+Access+系统功能结构图+文件架构图+源代码) 第4页
图5 网站导航页面设计效果
■功能分类导航条
用户可以通过功能分类导航条查看相应类别的信息，功能分类导航条主要通过传递参数来实现超链接。关键程序代码如下：
<A href="index.asp?Typeid=1">宾馆简介</A></TD> '通过传递参数Typeid实现超链接功能
<A href="index.asp?Typeid=2">地理位置</A></TD>
<A href="index.asp?Typeid=4">会展中心</A></TD>
<A href="index.asp?Typeid=5">餐饮美食</A></TD>
<A href="index.asp?Typeid=6">商务中心</A></TD>
<A href="index.asp?Typeid=7">其他</A></TD>
5.3 宾馆简介管理模块设计
宾馆简介管理模块的主要功能是介绍宾馆地理位置、室内设施、宾馆大小等相关详细信息介绍。宾馆简介页面的设计效果如图6所示。
图6 宾馆简介页面设计效果
宾馆简介页面，主要是根据传递的参数（本例为Typeid为参数名进行传递）查找相应的记录并显示。查询宾馆简介信息的程序代码如下：
<%
if request("Typeid")="" then '判断接收的Typeid是否为空值
Typeid=1 '设置默认值
else
Typeid=request("Typeid") '将接收到的Typeid值赋值给Typeid
end if
set rs=server.CreateObject("adodb.recordset")
sql="select * from news where Typeid="&Typeid&" order by Dateandtime desc" '通过时间进行降序排列
rs.open sql,conn,1,1
%>
<A href="index.asp?Typeid=1">宾馆简介</A> '传递参数Typeid
<A href="index.asp?Typeid=2">地理位置</A>
<A href="index.asp?Typeid=4">会展中心</A>
<A href="index.asp?Typeid=5">餐饮美食</A>
<A href="index.asp?Typeid=6">商务中心</A>
<a href="index.asp?Typeid=7">其他</a>
通过以下代码判断记录集是否为空，也就是判断是否有符合条件的记录，如没有符合条件的记录系统将给予提示。相关程序代码如下：
<% If not rs.eof Then %>
<%= rs("content") %>
<% Else %>
暂无信息
<% End If %>
通过以下代码显示宾馆简介内容：
<%= rs("content") %>
5.4 客房服务管理模块设计
客房服务管理模块的主要功能是介绍房价、房间类型、房间内部设施等，页面设计效果如图7所示。
若图片无法显示请联系QQ3249114,网上客房预订系统免费,转发请注明源于www.751com.cn图7 客房服务管理页面设计效果
客房服务管理页面主要用于显示客房的相关信息，程序代码如下：
<%
set rs=server.CreateObject("adodb.recordset")'获取客房信息
sql="select * from fangjian "
rs.open sql,conn,1,1
function HTMLcode(fString)
if not isnull(fString) then
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
fString = Replace(fString, CHR(10), "<BR>")
fString = Replace(fString, CHR(32), " ")
HTMLcode = fString
end if
end function
%>
<table width="97%" border="0" align="left" cellspacing="1" bgcolor="#000000">
<%
If not rs.eof Then
tol=rs.recordcount
for i=1 to tol
%>
<%
rs.movenext '向下移动记录指针
if rs.eof then exit for '判断当前记录指针是否到达记录尾
next
else
response.Write("暂无信息")
end if
%>
</table>
5.5 在线订房管理模块设计
在线订房管理主要用于在线预订客房，在进行在线订房时，所填写的登记信息必须真实有效，否则不能预期正确地进行客房预订。在线订房管理模块的页面设计效果如图8所示。
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>