eeting.asp 漂亮的地方旅游景点景观介绍网站源代码 - ASP源码程序

www.gusucode.com > 漂亮的地方旅游景点景观介绍网站源代码 > meeting.asp
    <!--#include file="config.asp" --><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<HTML 
xmlns="http://www.w3.org/1999/xhtml"><HEAD><%
if fid=0 then 
fid=1
end if
ym=5
dim dh
dh="<a href=""index.asp"">首页</a> &gt;&gt; "&getdaoh("jw_innclass")&"&gt;&gt; 酒店列表"
mytit=getmc("jw_innclass","id",fid,"mc")
call headinfo()
%>
<LINK id=css href="skins/css/web.css" type=text/css rel=stylesheet>
<LINK id=css href="skins/css/hotel.css" type=text/css rel=stylesheet>
<!--日历 simonsu 2008-08-29-->
<META content="MSHTML 6.00.2900.3268" name=GENERATOR><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></HEAD>
<BODY>
<DIV class=ethainan><!--头部-->
<!--#include file="head.asp" -->
<!--头部结束--><!--酒店部分-->
  <DIV class=path><%= dh %></DIV>
<DIV class="body hotellist">
<DIV class=list_bodyshow>
  <!--酒店tab部分-->
  <%
call content()

sub content()
call record(rs,"select * from jw_inn where instr(fpath,',"&fid&",')>0 and show=0 order by zd desc,"&order("jw_innclass",fid),1)
dim n,pagetol,page,iid,i
n=10
if not rs.eof or rs.bof then
if Request("page")="" then 
page=1
else
page=CInt(Request("page"))'读取 URL 页号
end if
rs.PageSize=n '定义每页显示记录数
If page>rs.PageCount Then page=rs.PageCount 
If page<1 Then page=1 
if rs.recordcount>0 then
rs.AbsolutePage=page '定义当前页码
end if
pagetol=rs.pagecount

i=n
%>

<%
do while not rs.eof and i>0
%>
  
<DIV class=hotelinfo>
<H2><SPAN><A 
href="javascript:addBookmark('<%= rs("mc") %>','<%= getmc("jw_innclass","id",rs("fid"),"newspath") %>?fid=<%= rs("fid") %>&id=<%= rs("id") %>');">收藏酒店</A></SPAN><a href="<%= getmc("jw_innclass","id",rs("fid"),"newspath") %>?fid=<%= rs("fid") %>&id=<%= rs("id") %>"><%= rs("mc") %></a></H2>
<DIV class=info><SPAN class=pic><A 
href="<%= getmc("jw_innclass","id",rs("fid"),"newspath") %>?fid=<%= rs("fid") %>&id=<%= rs("id") %>" 
target=_blank><IMG height=90 alt=<%= rs("mc") %> 
src="<%= rs("simg") %>" width=120 border=0></A></SPAN>
<P 
class=text><%= cutstring(rs("content"),300) %><A 
href="<%= getmc("jw_innclass","id",rs("fid"),"newspath") %>?fid=<%= rs("fid") %>&id=<%= rs("id") %>">[详细信息]</A></P></DIV>
<DIV class=price><I><%= rs("cityid") %></I></DIV>
</DIV>
<%
i=i-1
rs.movenext
loop
%>
<%
end if
%>

<!--酒店tab结束-->
<DIV class=pages>
<%= pagenum(page,rs.pagecount) %>  共 [<span class="fontr"><%= rs.recordcount %></span>] 个酒店
 </DIV></DIV></DIV>
 
 <%
call recordend(rs)
end sub
%><!--酒店部分结束--><!--E部分-->
<!--#include file="foot.asp" -->
</DIV></BODY></HTML>
<%
call connend()
%>