?? lookguest.asp
字號(hào):
<%@LANGUAGE="VBSCRIPT"%>
<!-- #include file=include/setup.inc -->
<!--
------------------------
-->
<html>
<head>
<title>修武云臺(tái)山商務(wù)酒店網(wǎng)站客房預(yù)訂系統(tǒng)</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="html/guilin.css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border-style: dotted; border-width: 1" bordercolor="#000000" width="486" height="314" id="AutoNumber1" align="center">
<tr>
<td width="482" height="20" bgcolor="#000000"><font color="#FFFFFF"> ·修武云臺(tái)山商務(wù)酒店網(wǎng)站客房預(yù)訂系統(tǒng)</font></td>
</tr>
<tr>
<td width="482" height="324" bgcolor="#FFFFFF" valign="top">
<table width="483" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="483">
<%
tablebackcolor="#eeeeee"
id=request("id")
if isNumeric(id)=0 or isNull(id)<>0 then
response.write "記錄找不到!"
response.end
end if
rem -----------------------
rem ---顯示一條預(yù)定記錄----
rem -----------------------
function showRecord
tempRecord="<TABLE align=center border=0 cellPadding=5 cellSpacing=3 width=450>"
tempRecord=tempRecord&"<tr><td bgColor="&tablebackcolor&">ID:<font color=ff0000>"&id&"</font> "
if len(title)>0 then
tempRecord=tempRecord&"<span class=p9>公司:"&server.htmlencode(title)&"</strong>"
end if
if Goods<>1 then
tempRecord=tempRecord&"<br><span class=p9>預(yù)定房間："&chooseGoods(Goods-1)
end if
if len(guest)>0 then
tempRecord=tempRecord&"<br>留言內(nèi)容:<pre><span class=p9>"&server.htmlencode(guest)&"</pre>"
end if
if len(name)>0 then
tempRecord=tempRecord&"<br><span class=p9>預(yù) 定 人:"&server.htmlencode(name)
end if
if len(homepage)>0 then
tempRecord=tempRecord&"<br>聯(lián)系電話:<a href="&chr(34)&server.htmlencode(homepage)&chr(34)&">"&server.htmlencode(homepage)&"</a>"
end if
if len(address)>0 then
tempRecord=tempRecord&"<br><span class=p9>詳細(xì)地址:"&server.htmlencode(address)
end if
if len(mail)>0 then
tempRecord=tempRecord&"<br><span class=p9>電子郵箱:<a href="&chr(34)&"mailto:"&server.htmlencode(mail)&chr(34)&">"&server.htmlencode(mail)&"</a>"
end if
if len(shu)>0 then
tempRecord=tempRecord&"<br><span class=p9>客戶人數(shù):"&server.htmlencode(shu)
end if
if len(go)>0 then
tempRecord=tempRecord&"<br><span class=p9>入住時(shí)間:"&server.htmlencode(go)
end if
if len(up)>0 then
tempRecord=tempRecord&"<br><span class=p9>離開時(shí)間:"&server.htmlencode(up)
end if
tempRecord=tempRecord&"<br><span class=p9>提交時(shí)間:"&ndatetime
tempRecord=tempRecord&"<br><span class=p9> <a href=delguest.asp?id="&id&">>>刪除記錄</a></td></tr></table>"
response.write tempRecord
end function
rem -----------------------
rem ---顯示一條記錄結(jié)束----
rem -----------------------
%>
<!-- #include file=database.asp -->
<%
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.open "select top 1 * from manage",con,1,1
if Rs.eof or Rs.bof then
response.write "數(shù)據(jù)庫(kù)錯(cuò)誤,數(shù)據(jù)庫(kù)中注管理員已經(jīng)不存在,請(qǐng)?zhí)砑佑涗浐笤俨僮?"
Rs.close
set Rs=nothing
con.close
set con=nothing
response.end
end if
if session("pass")<>Rs("pass") then
response.write "密碼錯(cuò)誤!"
Rs.close
set Rs=nothing
con.close
set con=nothing
response.end
end if
Rs.close
Rs.open "select id,name,title,homepage,product,mail,guesttime,shu,go,up,address,guest from guest where id="&id,con,1,1
if Rs.eof or Rs.bof then
response.write "<span class=p9>找不到此預(yù)定記錄!</span>"
%>
【<a href="manage.asp?page=<%=request("page")%>>返回管理</a>】
【<a href="Goods.asp">返回預(yù)定表</a>】 【<a href=../index.htm>返回主頁(yè)</a>】
<%
Rs.close
set Rs=nothing
con.close
set con=nothing
response.end
end if
name=Rs(1)
title=Rs(2)
homepage=Rs(3)
Goods=Rs(4)
mail=Rs(10)
address=Rs(5)
go=Rs(8)
up=Rs(9)
shu=Rs(7)
ndatetime=Rs(6)
id=Rs(0)
guest=Rs(11)
showRecord()
Rs.close
set Rs=nothing
con.close
set con=nothing
%>
<center>
<span class=p9> 【<a href="manage.asp?page=<%=request("page")%>">返回管理</a>】
【<a href="Goods.asp">返回預(yù)定表</a>】 【<a href=Goods.asp>返回主頁(yè)</a>】 </span>
</center>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="482" height="2" bgcolor="#009BCE" bordercolor="#008000"> <marquee onMouseOver="this.stop()" onMouseOut="this.start()" scrollamount="50" scrolldelay="100" behavior="slide" loop="1"></marquee></td>
</tr>
</table>
</body>
</html>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -