📄 view.asp
字号:
<%
if not Request.ServerVariables("REMOTE_ADDR")=request.cookies("IPAddress") then
response.cookies("IPAddress")=Request.ServerVariables("REMOTE_ADDR")
connstr = "DBQ="+server.mappath("_database/cfn4.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set DataConn = Server.CreateObject("ADODB.Connection")
dataconn.open connstr
Set rs = dataconn.execute("update data set num = num+1 WHERE id=" +Cstr(request("id")))
end if
%>
<html>
<head>
<LINK href="new.css" rel=stylesheet type=text/css>
<title>江西旅游网--Jxtour.Net</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#999999" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!--#include file="head.asp"-->
<!----------------------------------------------
Powered by CFN_RedHyphone（安庆分站汪懿[QQ：9000558]制作）
娱乐搜索程式
http://www.Jxtour.Net
此版本只能在个人网站使用并要求保留中国第四网&红旋风联盟版权！
商业用途必须与本人联系！
-------------------------------------------------->
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#FFFFFF" width="750" id="AutoNumber1">
<tr>
<td width="80%" bgcolor="#FFFFFF"><%
on error resume next
connstr = "DBQ="+server.mappath("_database/cfn4.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set DataConn = Server.CreateObject("ADODB.Connection")
dataconn.open connstr
Set rs = dataconn.execute("select * from data where ID= "+Cstr(request("ID"))+" order by id desc")
response.write "<div align=center><TABLE width=550 cellPadding=0 cellSpacing=0 border=0 bordercolor=#ffffff valign=middle>"
response.write "<tr><td>"
response.write "</td></tr><tr><td>"
response.write "<div align=center><TABLE width=100% border=1 bordercolor=#ffffff valign=middle>"
response.write "<tr><TD bgcolor=#80808 width=100 height=30 align=center> 登记日期 </td><td bgcolor=#fcfafc>"+cstr(rs("date"))+" "+cstr(rs("time"))+"</td></tr><tr>"
response.write "<tr><TD bgcolor=#ff6600 width=100 height=40 align=center><font color=ffffff> <b>商家名称</b> </font></td><td bgcolor=#fcfafc><b>"+cstr(rs("goods"))+"</b></td></tr><tr>"
response.write "<TD bgcolor=#f0f0f0 width=100 height=30 align=center> 标准间价格 </td><td bgcolor=#fcfafc>"
if len(Rs("price"))>0 then
response.write +Rs("price")+" 元</td></tr><tr>"
else
response.write +"无最低消费.</td></tr><tr>"
end if
response.write "<TD bgcolor=#f0f0f0 width=100 height=30 align=center> 其他房型价格 </td><td bgcolor=#fcfafc>"+Rs("name")+"</td></tr><tr>"
response.write "<TD bgcolor=#f0f0f0 width=100 height=30 align=center> 星级 </td><td bgcolor=#fcfafc>"+Rs("amount")+"</td></tr><tr>"
response.write "<TD bgcolor=#f0f0f0 width=100 height=30 align=center> 是否特价 </td><td bgcolor=#fcfafc>"+Rs("buyorsell")+"</td></tr><tr>"
response.write "<TD bgcolor=#f0f0f0 width=100 height=30 align=center> <font color=red>所在城市 </td><td bgcolor=#fcfafc><font color=red><b>"+Rs("icq")+"</td></tr><tr>"
response.write "<td bgcolor=#f0f0f0 width=100 height=30 align=center> 商家地址 </td><td bgcolor=#fcfafc>"+Rs("city")+"</td></tr><tr>"
response.write "<td bgcolor=#f0f0f0 width=100 height=30 align=center> 交通 </td><td bgcolor=#fcfafc>"+Rs("province")+"</td></tr><tr>"
response.write "<td bgcolor=#f0f0f0 width=100 height=30 align=center> 附近景点 </td><td bgcolor=#fcfafc>"+Rs("degree")+"</td></tr><tr>"
response.write "<td bgcolor=#f0f0f0 width=100 height=30 align=center> 联系电话 </td><td bgcolor=#fcfafc>"+Rs("telephone")+"</td></tr><tr>"
response.write "<TD bgcolor=#f0f0f0 width=100 height=30 align=center> 相关网站 </td><td bgcolor=#fcfafc>"+Rs("email")+"</td></tr><tr>"
response.write "<TD bgcolor=#f0f0f0 width=100 align=center> 商家描述 </td><td bgcolor=#fcfafc><font size=2>"+rs("content")+""
response.write "</td></tr></table></div>"
response.write "</td></tr></table></div>"
%>
<p><div align="center">
<center>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#FFFFFF" width="556" id="AutoNumber1" bgcolor="#FFFFFF">
<tr><!--#include file="gb/hotelding.asp"-->
</tr>
</table>
</center>
</div>
</tr>
</table>
</center>
</div>
<!--#include file="adv.htm"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -