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

This file contains ambiguous Unicode characters!

This file contains ambiguous Unicode characters that may be confused with others in your current locale. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to highlight these characters.

<!--#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>