You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

286 lines
12 KiB
Plaintext

<!--#include virtual="/include/site-seting.asp" -->
<!--#include virtual="/common/Function.asp" -->
<!--#include virtual="/common/Function-tour.asp" -->
<!--#include virtual="/common/function-seo.asp"-->
<!--#include virtual="/common/function-packageinfo.asp"-->
<!--#include virtual="/common/function-cityguide.asp" -->
<!--#include virtual="/common/travelguide-china-funs.asp" -->
<!--#include virtual="/common/function-pageintro.asp" --><%
''//应从原来一地线路列表另存出来的现暂时使用原有变量city....
city = request.QueryString("region")
if request.QueryString("region") = empty then
city = "beijing"
else
city = Replace(SafeRequest("region",0), "-", " ")
end if
if request.querystring("days") <> empty then
days = SafeRequest("days",1)
days_sql = " and dbo.V_SRMS_ResourceAllot_Tour_Price_CJ.CLI_Days = " & days
if days > 1 then
days_txt = days & " Days " & capitalize(city) & " Tours, "
else
days_txt = days & " Day " & capitalize(city) & " Tours,"
end if
end if
SRMSPRovinceInfo = GetSRMSPRovinceId(city,Site_LGC,Site_ID)
if isarray(SRMSPRovinceInfo) then
SRMSPRI_SN = SRMSPRovinceInfo(0)
PRI_Code = SRMSPRovinceInfo(1)
else
'response.write "PRovince Error"
'response.End()
end if
''-----------------------------
wid = Site_ID
eid = SRMSPRI_SN
etype = "K"
epagetype="t-citytour-list"
def_title = days_txt & capitalize(city)&" Tours, "&capitalize(city)&" China Tours, Top "&capitalize(city)&" Tour Packages."
def_keywords = days_txt & capitalize(city)&" tour, "&capitalize(city)&" china tours, "
'URL定义-3H
dim urlCityTourInfo
urlCityTourInfo= "/tour/{0}tour/{1}/"
OrderType=saferequest("OrderType",0)
select case OrderType
case "price"
strFileName="tours-sort-by-price"
order_sql = " order by CLP_TwoToFiveAdultPrice"
case "days"
strFileName="tours-sort-by-length"
order_sql = " order by CLI_Days"
case else
strFileName="tours"
OrderType="OrderNum"
order_sql = " order by CLI_OrderNum"
end select
sql=""
sql=" " &_
"SELECT CItyInfo2.CII2_Name, PRovinceInfo2.PRI2_Name " &_
"FROM CItyInfo2 INNER JOIN " &_
" CItyInfo ON CItyInfo2.CII2_CII_SN = CItyInfo.CII_SN INNER JOIN " &_
" PRovinceInfo2 ON CItyInfo.CII_PRI_SN = PRovinceInfo2.PRI2_PRI_SN " &_
"WHERE (CItyInfo.DeleteFlag <> 1) AND (CItyInfo2.CII2_LGC = 1) AND " &_
" (PRovinceInfo2.PRI2_LGC = 1) AND (PRovinceInfo2.DeleteFlag <> 1) AND " &_
" (PRovinceInfo2.PRI2_Name = N'"& city &"') "
'response.write sql
'response.End()
set rs_cities = server.createobject("adodb.recordset")
rs_cities.open sql,conn,1,1,1
temp_cities = ""
if rs_cities.eof then
GotoErrPage
end if
k_i = 1
do while not rs_cities.eof
if k_i = rs_cities.recordcount then
temp_cities = temp_cities & " (CLI2_PassCity Like '%"&rs_cities("CII2_Name")&"%') "
else
temp_cities = temp_cities & " (CLI2_PassCity Like '%"&rs_cities("CII2_Name")&"%') Or "
end if
k_i = k_i + 1
rs_cities.movenext
loop
if temp_cities <> "" then
temp_cities = " AND ( " & temp_cities & " ) "
end if
rs_cities.close
set rs_cities = nothing
sql= ""
sql=" "&_
"SELECT top 100 T.CLI_SN, T.CLI_Days, T.CLI_ListImage, T.CLI_CityName, T.CLI2_Name, T.CLI_NO, "&_
" T.CLI2_PassCity, T.CLI2_AttractionList, T.CLI2_Memo, T.CLI_OrderNum, "&_
" dbo.GetFullPathByPII_SN(dbo.PictureInfo.PII_SN, 1) AS pic, T.CityName, T.CLI_CII_SN, T.CLP_TwoToFiveAdultPrice "&_
"FROM (SELECT TOP 100 dbo.CustomerLineInfo.CLI_SN, dbo.CustomerLineInfo.CLI_Days, "&_
" dbo.CustomerLineInfo.CLI_ListImage, dbo.CustomerLineInfo.CLI_CityName, "&_
" dbo.CustomerLineInfo2.CLI2_Name, dbo.CustomerLineInfo.CLI_NO, "&_
" dbo.CustomerLineInfo2.CLI2_PassCity, "&_
" dbo.CustomerLineInfo2.CLI2_AttractionList, "&_
" dbo.CustomerLineInfo2.CLI2_Memo, dbo.CustomerLineInfo.CLI_OrderNum, "&_
" dbo.getCityName(dbo.CustomerLineInfo.CLI_CII_SN, 1) AS CityName, dbo.CustomerLineInfo.CLI_CII_SN, "&_
" (SELECT TOP 1 CLP_TwoToFiveAdultPrice "&_
" FROM dbo.CustomerLinePrice "&_
" WHERE (CLP_CLI_SN = dbo.CustomerLineInfo.CLI_SN) "&_
" ORDER BY CLP_TwoToFiveAdultPrice) AS CLP_TwoToFiveAdultPrice "&_
" FROM dbo.CustomerLineInfo2 INNER JOIN "&_
" dbo.CustomerLineInfo ON "&_
" dbo.CustomerLineInfo2.CLI2_CLI_SN = dbo.CustomerLineInfo.CLI_SN INNER JOIN "&_
" dbo.CustomerLinePrice ON "&_
" dbo.CustomerLineInfo.CLI_SN = dbo.CustomerLinePrice.CLP_CLI_SN "&_
" GROUP BY dbo.CustomerLineInfo.CLI_SN, dbo.CustomerLineInfo.CLI_NO, "&_
" dbo.CustomerLineInfo.CLI_Days, dbo.CustomerLineInfo.CLI_ListImage, "&_
" dbo.CustomerLineInfo.CLI_OrderNum, dbo.CustomerLineInfo.CLI_State, "&_
" dbo.CustomerLineInfo2.CLI2_PassCity, "&_
" dbo.CustomerLinePrice.CLP_TwoToFiveAdultPrice, "&_
" dbo.CustomerLinePrice.CLP_PriceType, dbo.CustomerLineInfo2.CLI2_Name, "&_
" dbo.CustomerLineInfo.CLI_PackageClass, "&_
" dbo.CustomerLineInfo.CLI_LineType, "&_
" dbo.CustomerLineInfo2.CLI2_AttractionList, "&_
" dbo.CustomerLineInfo2.CLI2_EntranceCity, "&_
" dbo.CustomerLineInfo2.CLI2_DepartureCity, dbo.CustomerLineInfo2.CLI2_LGC, "&_
" dbo.CustomerLinePrice.CLP_TwoToFiveAdultPriceRMB, "&_
" dbo.CustomerLineInfo.CLI_CityName, dbo.CustomerLineInfo.CLI_Grade, "&_
" dbo.CustomerLineInfo.CLI_LineClass, dbo.CustomerLineInfo.CLI_PrimeGroup, "&_
" dbo.CustomerLineInfo2.CLI2_Memo, dbo.CustomerLineInfo2.CLI2_Introduction, "&_
" dbo.CustomerLineInfo.CLI_DEI_SN, "&_
" dbo.CustomerLinePrice.CLP_TwoToFiveAdultProPriceRMB, "&_
" dbo.CustomerLineInfo.CLI_Area, "&_
" dbo.getCityName(dbo.CustomerLineInfo.CLI_CII_SN, 1),dbo.CustomerLineInfo.CLI_CII_SN "&_
" HAVING (dbo.CustomerLineInfo.CLI_State = 1005004) AND "&_
" (dbo.CustomerLineInfo2.CLI2_LGC = 1) AND "&_
" (dbo.CustomerLineInfo.CLI_PackageClass IN (202003, 202005, 202007)) "&_
" "& temp_cities &" " &_
" ORDER BY dbo.CustomerLinePrice.CLP_TwoToFiveAdultPrice) T LEFT OUTER JOIN "&_
" dbo.PictureInfo ON T.CLI_ListImage = dbo.PictureInfo.PII_SN "&_
"GROUP BY T.CLI_SN, T.CLI_Days, T.CLI_ListImage, T.CLI_CityName, T.CLI2_Name, "&_
" T.CLI_NO, T.CLI2_PassCity, T.CLI2_AttractionList, T.CLI2_Memo, T.CLI_OrderNum, "&_
" dbo.GetFullPathByPII_SN(dbo.PictureInfo.PII_SN, 1), T.CityName, T.CLI_CII_SN, T.CLP_TwoToFiveAdultPrice "&_
"ORDER BY T.CLI_OrderNum "
'response.write sql
'response.End()
set rs = server.createobject("adodb.recordset")
rs.open sql,conn,3,1,1
tourcount = rs.recordcount
if tourcount = "" Or isempty(tourcount) Or isnull(tourcount) then
tourcount = 0
end if
'转到city-tour-list-new.asp
'if rs.recordcount > 8 then
' server.Transfer("/single-city-tour/city-tour-list-new.asp")
'end if
'转到city-tour-list-new.asp
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title><%=def_title%></title>
<meta name="Copyright" content="www.chinahighlights.com, copyrights reserved." />
<meta name="keywords" content="<%=def_keywords%>"/>
<meta name="description" content="<%=capitalize(city)%> Tours: <%=strGetSubstring(get_web_page_intro(city), 1, 150, "...")%>"/>
<link href="/css/global-all-new.css" rel="stylesheet" type="text/css" media="all" />
<link href="http://data.chinahighlights.com/css/citytour.css" rel="stylesheet" type="text/css" media="all" />
<script language="javascript" src="http://data.chinahighlights.com/js/jquery.js"></script>
<script language="javascript" src="/js/newcalendar.js"></script>
<script type='text/javascript' src='/js/boxyapp.js'></script>
<script type="text/javascript" src="/js/newcalendar.js"></script>
<script type="text/javascript" src="/js/common.js"></script>
<script type="text/javascript" src="/js/hotel.js"></script>
<script type='text/javascript' src='http://data.chinahighlights.com/js/ChtPublic.js'></script>
<script language="javascript">
$(function(){
$("#ShowDayTrips").click(function(){
$("#DayTripsTop").show();$("#ActivitiesTop").hide();
$("#ShowDayTrips").addClass("active");$("#ShowActivities").removeClass("active");
})})
$(function(){
$("#ShowActivities").click(function(){
$("#DayTripsTop").hide();$("#ActivitiesTop").show();
$("#ShowDayTrips").removeClass("active");$("#ShowActivities").addClass("active");
})})
</script>
</head>
<body>
<div id="wrapper">
<!--#include virtual="/include/headerWrapper-2013.asp"-->
<div id="content">
<div id="contentHead">
<div id="subNav"><a href="/">Home</a> <a href="/citytour/" >Single City Tours</a> <%=capitalize(city)%> Tours</div>
<h1><%=capitalize(city)%> Tours</h1>
</div>
<div id="mainContent2">
<div id="contentRight">
<div class="note">
<p><% =get_web_page_intro(city) %></p>
</div>
<form id="form1" name="form1" method="post" action="">
<%
if rs.eof and rs.bof then
else
dim i1
i1 = 1
do while not rs.eof
sn = rs("cli_sn")
title = rs("CLI2_Name")
Price = rs("CLP_TwoToFiveAdultPrice")
CLI_NO = rs("CLI_NO")
CLI_CityName = rs("CityName")
CityTourInfoUrl = strFormat(urlCityTourInfo,array(changeStrPara(CLI_CityName),changToPara(rs("CLI_NO"))))
if rs("CLI_Days") > 1 then
days = rs("CLI_Days") & " Days"
else
days = rs("CLI_Days") & " Day"
end if
'HF 100211更新获得图片地址方法
if isnull(rs("pic")) or rs("pic") = empty then
pic = "/pic/unknown.gif"
else
pic = imgurl & rs("pic")
end if
CLI2_Memo = rs("CLI2_Memo")
if i1 > 4 then box_class = "tourListBox2" else box_class = "tourListBox1"
%>
<div class="china-tour-list">
<div class="listImage150"><a href="<%=CityTourInfoUrl%>"> <img src="<%=pic%> " border="0" /> </a> </div>
<div class="listContent418">
<h2><a href="<%=CityTourInfoUrl%>"><%=title%></a></h2>
<ul class="tourdetailedInfo">
<li><strong>Duration:</strong> <%=days%></li>
<li><strong>Destination:</strong> <%=capitalize(CLI_CityName)%></li>
<li class="features"><strong>Attractions:</strong> <%=CLI2_Memo%></li>
</ul>
</div>
<div class="searchlistPrice"><span class="fullPrice">Full price from:</span> <br />
<span class=" highlightBold red_price">$<%=Price%></span> p/p<br />
<div class="viewDetail"> <a href="<%=CityTourInfoUrl%>" target="citytour"><img src="http://data.chinahighlights.com/pic/view-details.png"></a></div>
</div>
<div class="clear"></div>
</div>
<%
i1 = i1 + 1
rs.movenext
loop
end if
rs.close
%>
</form>
<div id="sidebar"> </div>
<p><a href="/forms/tailormadetours.htm"><img src="http://data.chinahighlights.com/image/promo/tailor-make-760.gif" width="760" height="140" alt="Tailor Make a China Tour"></a></p>
</div>
<div id="sideBar">
<div class="rightBox">
<div class="rightContent">
<h4>About <%=capitalize(city)%></h4>
<ul class="squareGray">
<li><a href="/<%=replace(lcase(city), " ", "-")%>/"><%=capitalize(city)%> Overview</a></li>
<li><a href="/<%=replace(lcase(city), " ", "-")%>/weather.htm"><%=capitalize(city)%> Weather</a></li>
<li><a href="/<%=replace(lcase(city), " ", "-")%>/map.htm"><%=capitalize(city)%> Map</a>s</li>
</ul>
</div>
</div>
<p><a href="/faq/tour/china-tours-reservation/how-to-make-a-reservation.htm" target="_blank"><img src="http://data.chinahighlights.com/image/promo/book-steps-s.jpg" alt="<%=capitalize(city)%> Private Tours" title="<%=capitalize(city)%> Private Tours"></a></p>
<p>&nbsp;</p>
<p align="center"><a href="/forms/call-you.asp" rel="nofollow"><img original="/image/promo/call-you.gif" src="http://data.chinahighlights.com/image/promo/call-you.gif" alt="Would you like us to call you" border="0" height="71" width="171"></a></p>
<p><a href="/forms/call-you.asp" rel="nofollow">Leave your phone number, and we will call back!</a></p>
</div>
</div>
<div class="clear"></div>
</div>
<div class="contentBottom"></div>
<!--#include virtual="/include/footer-link-tour.asp" -->
</div>
</body>
</html>