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.

491 lines
23 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-packageinfo.asp" -->
<!--#include virtual="/common/Function-seo.asp" -->
<!--#include virtual="/common/function-cityguide.asp" -->
<!--#include virtual="/common/travelguide-china-funs.asp" -->
<%
'call t_che_now()
If request.QueryString("city") = Empty Then
city = "beijing"
Else
city = changeParaStr(SafeRequest("city", 0))
End If
If city = "tibet" Then
EntranceCity = "Lhasa"
Else
EntranceCity = city
End If
cityurl = city
cityid = getcityid(city)
ShowTimeStr = ""
ShowTimeStr = TowNum(Month(Now())) & "/" & TowNum(Day(Now())) & "/" & Year(Now())
Set rs = server.CreateObject("adodb.recordset")
Set rs2 = server.CreateObject("adodb.recordset")
Set rs3 = server.CreateObject("adodb.recordset")
wid = Site_ID
eid = GetSRMSCityId(city)
etype = "K"
epagetype = "t-citytour-list"
def_title = days_txt & capitalize(city)&" Tour, "&capitalize(city)&" Tours, "&capitalize(city)&" Day Tours & "&capitalize(city)&" China Tours"
def_keywords = days_txt & capitalize(city)&" tour, "&capitalize(city)&" tours, "&capitalize(city)&" tour packages, tours in "&capitalize(city)&", "&capitalize(city)&" china tours, "&capitalize(city)&" tour guide, "&capitalize(city)&" day tours"
def_description = days_txt & capitalize(city)&" Tours: "&capitalize(city)&" city packages, "&capitalize(city)&" private city tours, China tours to "&capitalize(city)&", "&capitalize(city)&" Day tours, etc. All the tours in "&capitalize(city)&" are customizable to fit your own pace."
urlCityTourInfo = "/tour/{0}tour/{1}/"
%>
<!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><%=seo_title(wid,eid,etype,epagetype,def_title)%></title>
<meta name="Copyright" content="www.chinahighlights.com, copyrights reserved." />
<meta name="keywords" content="<%=seo_keywords(wid,eid,etype,epagetype,def_keywords)%>"/>
<meta name="description" content="<%=capitalize(city)%> Tours: <%=strGetSubstring(get_city_introduction(city), 1, 150, "...")%>"/>
<link href="http://data.chinahighlights.com/css/basic.css" rel="stylesheet" type="text/css" media="all" />
<link href="http://data.chinahighlights.com/css/layout.css" rel="stylesheet" type="text/css" media="all" />
<link href="http://data.chinahighlights.com/css/tour.css" rel="stylesheet" type="text/css" media="all" />
<link href="http://data.chinahighlights.com/css/citytour.css" rel="stylesheet" type="text/css" media="all" />
<link href="http://data.chinahighlights.com/css/PluginsCss.css" rel="stylesheet" type="text/css" media="all" />
<script language="javascript" type="text/javascript" src="http://data.chinahighlights.com/js/jquery.js"></script>
<script language="javascript" type="text/javascript" src="/js/jsbase.js"></script>
<script type='text/javascript' src='http://data.chinahighlights.com/js/ChtPublic.js'></script>
<script language="javascript" src="/js/newcitytour.js"></script>
<script type="text/javascript" src="/js/community/facebox.js"></script>
<script language="javascript" src="/js/citytour-left.js"></script>
<link rel="canonical" href="http://www.chinahighlights.com<%=getHTTPURL()%>" />
<style>
#subContent {
float: left!important;
margin: 0 0 0 20px!important
}
#mainContent {
float: right!important;
margin: 0 20px 0 0!important;
}
</style>
</head>
<body>
<div id="wrapper" class="<%=lcase(city)%>Tour guide">
<div id="pageIntro">
<p><%=capitalize(city)%> Tours - See the best with our <%=capitalize(city)%> tour packages </p>
</div>
<!--#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>
<script type="text/javascript" src="/js/Html/page-tool.js"></script>
<h1><%=capitalize(city)%> Tours</h1>
</div>
<div id="citytourFilter">
<div class="note">
<p><% =def_write_city_introduction(city) %></p>
</div>
<%
' *6065
sql = "select cli_sn,CLI2_Name,CLP_TwoToFiveAdultPrice,CLI_NO,CLI_Days,cli2_attractionlist, dbo.GetFullPathByPII_SN(CLI_ListImage, 1) as pic, (case when charindex('6060',cli_linetype ) > 0 then 'Just the City' when charindex('6059',cli_linetype ) >0 then 'The City and Nearby' when charindex('6061',cli_linetype ) >0 then 'Trips from the City' when charindex('6062',cli_linetype ) >0 then 'Water Town Tours' when charindex('6063',cli_linetype ) >0 then 'Event Tours' when charindex('6065',cli_linetype ) >0 then 'Great Wall Tours' else '' end ) as linetypeName,dbo.GetCityName(CLI_CII_SN, "&site_lgc&") AS cityname from customerlineinfo inner join customerlineinfo2 on cli_sn=cli2_cli_sn inner join CustomerLinePrice on CLP_CLI_SN = cli_sn where clp_pricetype=2 and (CLI_PackageClass = '202003' or CLI_PackageClass='202007' or CLI_PackageClass='202005') and cli2_lgc="&site_lgc&" and (cli_dei_sn=1 or cli_dei_sn=2) and cli_state=1005004 and dbo.GetCityName(dbo.CustomerLineInfo.CLI_CII_SN, "&site_lgc&") = '"&city&"' ORDER BY CLI_OrderNum"
'Response.Write(sql)
rs.Open sql, conn, 1, 1, 1
totaltour = rs.recordcount
'增加多网站后台的选择
sql = "select * from BIZ_PackageInfo INNER JOIN BIZ_PackageInfo2 on PAG_SN=PAG2_PAG_SN inner join systemcode2 on (cast(SYC2_SYC_SN as varchar) in (Left(Replace(BIZ_PackageInfo.PAG_ExtendType, ',', ''), 5))) where PAG2_LGC=1 and pag2_check=2 and PAG_CII_SN="&cityid&" AND BIZ_PackageInfo.PAG_Flag = 1 and SYC2_lgc="&site_lgc&_
" "
'Response.Write(sql)
rs2.Open sql, conn, 1, 1, 1
totaldaytrip = rs2.recordcount
sql = " " &_
" SELECT *, " &_
" (SELECT TOP 1 dbo.GetFullPathByPII_SN(dbo.PictureInfo.PII_SN, 1) " &_
" FROM pictureinfo " &_
" WHERE (PII_ResourceSN = dbo.EntertainmentInfo.ENI_SN) AND " &_
" (PII_ServiceType = 'e')) AS pic, IsNull( " &_
" (SELECT TOP 1 EnterTainmentPrice.ENP_Agreement " &_
" FROM EnterTainmentPrice INNER JOIN " &_
" DCityAndVendor ON " &_
" EnterTainmentPrice.ENP_VEI_SN = DCityAndVendor.CAV_VEI_SN " &_
" WHERE (EnterTainmentPrice.ENP_ENI_SN = ENI_SN) AND (GETDATE() BETWEEN " &_
" EnterTainmentPrice.ENP_Start AND EnterTainmentPrice.ENP_Stop) AND " &_
" (EnterTainmentPrice.ENP_PGI_SN = 8 OR " &_
" EnterTainmentPrice.ENP_PGI_SN = 11 OR " &_
" EnterTainmentPrice.ENP_PGI_SN = 13) AND (DCityAndVendor.CAV_CII_SN = "&cityid&") " &_
" ORDER BY DCityAndVendor.CAV_Level), 0) AS price " &_
" FROM dbo.EntertainmentInfo INNER JOIN " &_
" dbo.EntertainmentInfo2 ON " &_
" dbo.EntertainmentInfo.ENI_SN = dbo.EntertainmentInfo2.ENI2_ENI_SN " &_
" WHERE (dbo.EntertainmentInfo2.ENI2_LGC = "&Site_lgc&") AND (dbo.EntertainmentInfo.ENI_Type = 2) " &_
" AND (ISNULL(dbo.EntertainmentInfo.DeleteFlag, 0) <> 1) AND " &_
" (dbo.EntertainmentInfo.ENI_CII_SN = "&cityid&") AND " &_
" (ISNULL " &_
" ((SELECT TOP 1 EnterTainmentPrice.ENP_Agreement " &_
" FROM EnterTainmentPrice INNER JOIN " &_
" DCityAndVendor ON " &_
" EnterTainmentPrice.ENP_VEI_SN = DCityAndVendor.CAV_VEI_SN " &_
" WHERE (EnterTainmentPrice.ENP_ENI_SN = ENI_SN) AND (GETDATE() BETWEEN " &_
" EnterTainmentPrice.ENP_Start AND EnterTainmentPrice.ENP_Stop) AND " &_
" (EnterTainmentPrice.ENP_PGI_SN = 8 OR " &_
" EnterTainmentPrice.ENP_PGI_SN = 11 OR " &_
" EnterTainmentPrice.ENP_PGI_SN = 13) AND (DCityAndVendor.CAV_CII_SN = "&cityid&") " &_
" ORDER BY DCityAndVendor.CAV_Level), 0) > 0) "
'Response.Write(sql)
'Response.End()
rs3.Open sql, conn, 1, 1, 1
totaladdons = rs3.recordcount
%>
</div>
<div id="mainContent2">
<div id="contentRight">
<!--Filter Result Begins-->
<div id="tourfilterResult" class="roundCorner" style="border: 0px;">
<%
While Not rs.EOF
sn = rs("cli_sn")
title = rs("CLI2_Name")
Price = rs("CLP_TwoToFiveAdultPrice")
CLI_NO = Trim(rs("CLI_NO"))
If IsNull(rs("pic")) Or rs("pic") = Empty Then
pic = "/pic/unknown.gif"
Else
pic = imgurl & rs("pic")
End If
If len(rs("cityname"))>0 Then
CityTourInfoUrl = strFormat(urlCityTourInfo,array(changeStrPara(rs("cityname")),lcase(CLI_NO)))
Else
CityTourInfoUrl = strFormat(urlCityTourInfo,array(changeStrPara(city),lcase(CLI_NO)))
End If
If rs("CLI_Days") > 1 Then
days = rs("CLI_Days") & "-Day "
Else
days = rs("CLI_Days") & "-Day "
End If
alist = rs("cli2_attractionlist")
%>
<script>
function get_picinfo(o){
var tempPic = $(".imgdivlist a").clone();
alert($(tempPic).html())
//$(this).html(tempPic);
}
</script>
<div class=" china-tour-list daytripList tourfilterList" style="display:none1" id="Type_<%=rs("linetypeName")%>">
<div class="listImage150"><a href="<%=CityTourInfoUrl%>"><img src="http://www.chinahighlights.com/<%=pic%>" lazyload="false" border="0"></a></div>
<div class="listContent418">
<span class="mainTitle"><%=days%> <a href="<%=CityTourInfoUrl%>" target="citytour"><%=title%></a></span>
<ul class="tourdetailedInfo">
<li><strong>Attractions:</strong> <%=alist%></li>
<li><strong>Tour Code:</strong> <%=rs("CLI_NO")%></li>
</ul>
</div>
<div class="searchlistPrice"><span class="fullPrice">Full price from:</span> <br />
<span class=" highlightBold red_price">$<%=setFigure(getPriceNine(CLng(Price), INTERVAL))%></span> p/p<br />
<div class="viewDetail"> <a href="<%=CityTourInfoUrl%>" target="citytour"><img src="http://data.chinahighlights.com/pic/view-details.png" alt="View Details"></a></div>
</div>
<div class="clear"></div>
</div>
<%
rs.movenext
Wend
While Not rs2.EOF
sn = rs2("PAG_SN")
title = rs2("PAG2_Name")
hours = rs2("PAG_NeedTime")
ttype = rs2("SYC2_CodeDiscribe")
hrstr = "hr"
hours = FormatNumber(hours, 1, TristateTrue)
If CInt(hours)>= 2 Then hrstr = "hrs"
If InStr(hours, ".") >0 And Right(hours, 1)<>0 Then
If CInt(hours)<= 1 Then
tmphours = 0
tmpmins = hours * 60
Else
tmphours = (hours * 10 ) Mod 10
tmpmins = ((tmphours * 6) \ 10) * 10
End If
If tmphours>0 Then
hours = Int(hours)&hrstr& tmpmins &"mins"
Else
hours = tmpmins &"mins"
End If
Else
hours = CInt(hours) &hrstr
End If
PAG_Code = rs2("PAG_Code")
content = rs2("PAG2_Attraction")
Price = GetAdultPricePAG_SN(rs2("PAG_SN"), 2)
If IsNull(rs2("PAG2_PII_SN")) Or rs2("PAG2_PII_SN") = Empty Then
ListImage = -1
Else
ListImage = rs2("PAG2_PII_SN")
End If
daytripshtml = LCase(Replace(title, " ", "-"))
daytripshtml = daytripshtml&".htm"
cityurl = Replace(cityurl, " ", "-")
%>
<div class="china-tour-list tourfilterList1" style="display: ">
<div class="listImage150"><a href="/<%=cityurl%>/day-trips/<%=daytripshtml%>"><img src="<%=GetOnePicPII_SN(ListImage,1)%> " border="0"></a></div>
<div class="listContent418">
<h2><a href="/<%=cityurl%>/day-trips/<%=daytripshtml%>"><%=title%></a></h2>
<ul class="tourdetailedInfo">
<li style="display:none"><%=ttype%></li>
<li><strong>Duration: </strong><%=hours%> <span class="tourCode"><strong>Tour Code:</strong> <%=PAG_Code%></span></li>
<li><strong>Attractions:</strong> <%=content%></li>
<li><strong>Tour Type:</strong>
<%
If RegExpfind("hksic", LCase(rs2("PAG_Code"))) = true Then
%>
<span class="redArial12Bold">Seat-in-coach tour (SIC)</span> Join an organized tour in a large coach with a tour guide for the group.
<%
else
%>
<span class="redArial12Bold">Private Tour</span> A private tour includes a private guide and driver
<%
end if
%>
</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="/<%=cityurl%>/day-trips/<%=daytripshtml%>"><img src="http://data.chinahighlights.com/pic/view-details.png"></a></div>
</div>
<div class="clear"></div>
</div>
<%
rs2.movenext
Wend
While Not rs3.EOF
sn = rs3("ENI_SN")
title = rs3("ENI2_Name")
tmpcityid = rs3("eni_cii_sn")
content = Left(rs3("ENI2_Introduction"), 126)&"..."
ENI_ConsumeTime = rs3("ENI_ConsumeTime")
If Not IsNull(ENI_ConsumeTime) And IsNumeric(ENI_ConsumeTime) Then
If ENI_ConsumeTime < 1 Then
ENI_ConsumeTime = ENI_ConsumeTime * 60 &" Min"
Else
ENI_ConsumeTime = ENI_ConsumeTime &" Hours"
End If
End If
If IsNull(rs3("pic")) Or rs3("pic") = Empty Then
ListImage = "/pic/unknown.gif"
Else
ListImage = imgurl & rs3("pic")
End If
price = 0
netprice = 0
Set rs_tmp = server.CreateObject("adodb.recordset")
' rs_tmp.Open "SELECT top 1 cav_vei_sn FROM [dbo].[DCityAndVendor] where cav_cii_sn="&tmpcityid&" order by cav_level", conn, 1, 1, 1
' If Not rs_tmp.EOF Then
' veisn = rs_tmp("cav_vei_sn")
' End If
' rs_tmp.Close
'
' sql = "SELECT TOP 1 ENP_Agreement "&_
' " FROM dbo.EnterTainmentPrice WHERE "&_
' " (ENP_ENI_SN = "&sn&") AND (GETDATE() "&_
' " BETWEEN ENP_Start AND ENP_Stop) and (enp_pgi_sn=8 or enp_pgi_sn=11 or enp_pgi_sn=13 or enp_pgi_sn=25) and enp_vei_sn= "&veisn
sql = " SELECT TOP 1 EnterTainmentPrice.ENP_Agreement, "&_
" EnterTainmentPrice.ENP_PGI_SN "&_
" FROM EnterTainmentPrice INNER JOIN "&_
" DCityAndVendor ON "&_
" EnterTainmentPrice.ENP_VEI_SN = DCityAndVendor.CAV_VEI_SN "&_
" WHERE (EnterTainmentPrice.ENP_ENI_SN = "&sn&") AND (GETDATE() BETWEEN EnterTainmentPrice.ENP_Start AND EnterTainmentPrice.ENP_Stop) AND "&_
" (EnterTainmentPrice.ENP_PGI_SN = 8 OR EnterTainmentPrice.ENP_PGI_SN = 11 OR EnterTainmentPrice.ENP_PGI_SN = 13) AND cav_cii_sn="&cityid&" Order by cav_level "
'Response.Write(sql)
rs_tmp.Open sql, conn, 3, 1, 1
If Not rs_tmp.EOF Then
Price = getUSDByRMB(CInt(rs_tmp(0)) * 1.2)
netprice = getUSDByRMB(CInt(rs_tmp(0)) * 1.2 * 1.2)
End If
addonshtml = LCase(Replace(title, " ", "-"))
addonshtml = addonshtml&".htm"
%>
<div class="china-tour-list daytripList tourfilterList2" style="border-bottom: none;display:none">
<div class="listImage150"><a href="/<%=cityurl%>/addons/<%=addonshtml%>"><img src="<%=ListImage%> " border="0"></a></div>
<div class="tourlistContent2">
<h2><a href="/<%=cityurl%>/addons/<%=Trim(addonshtml)%>" class="cname"><%=title%></a></h2>
<ul class="tourdetailedInfo">
<li><strong>Duration: </strong><span><%=ENI_ConsumeTime%></span></li>
<li><strong>Attractions:</strong><span class="TourAttr"><%=content%></span></li>
</ul>
<table width="100%" border="0" class="addPrice" cellpadding="0" cellspacing="0">
<tr>
<th width="198" scope="col">Booking Options</th>
<th width="135" scope="col">Price Per Person</th>
<th width="167" scope="col">Next Step</th>
</tr>
<tr>
<td>A) Enquiry this tour Now </td>
<td><span class="redPrice12Bold red_price">$<%=netprice%></span></td>
<td>
<!--<a href="#">Choose it and continue?</a>-->
</td>
</tr>
<tr>
<td>B) Combine it with a package</td>
<td><span class="redPrice12Bold red_price">$<%=price%></span><em>(save 20%)</em></td>
<td><a href="####" onclick="return ShowIFrame('','/forms/enrich-your-tour-next.asp?esn=<%=rs3("ENI_SN")%>',638,450,'bottom');">Choose it and continue&#187</a></td>
</tr>
</table>
<br />
<div class="clear"></div>
</div>
<div class="clear"></div>
</div>
<%
rs3.movenext
Wend
%>
<div id="ZShowMsg" style="display:none; padding-left:10px;"><span class="highlight">Please select a different criteria and try again!</span> Or
just ask us to <a href="/forms/tailor-made-<%=replace(city," ","-")%>-tours.htm"><strong>Customize a <%=capitalize(city)%> Tour</strong></a> to suit your needs. </div>
<p>&nbsp;</p>
</div>
<!--Filter Result Ends-->
<script type='text/javascript' src='/js/tour/tailor-in-page.js'></script>
</div>
<div id="sideBar">
<!-- city tour search -->
<script>
$(function(){
$(".hotelsearchtitle .citySelect a").click(function(){ $("#hotelcityList").show(); });
$("#hotelcityList .closeIt").click(function(){ $("#hotelcityList").hide(); });
$("#hotelcityList ul li").click(function(){
$(".singlecitytoursearchtitle .citySelect a").text("");
$("#s_city").val("");
$("#s_city").val($(this).text());
$(".hotelsearchtitle .citySelect a").text($(this).text());
$("#hotelcityList").hide();
});
});
</script>
<div class="hotelsearchtitle"><span class="citySelect"><a name="city" href="javascript:;">
<% =capitalize(city) %>
</a></span> Tour Search
</div>
<%if city="beijing" or city="shanghai" or city="guilin" or city="lhasa" then
moretops="<div class=\'moretops\'><a href=\'/"&city&"/top10-tours.htm\'>Top 10 "&capitalize(city)&" Tours &#187;</a></div>"
end if%>
<script>var moretops="<%=moretops%>";</script>
<div class="weather">
<div> </div>
<div class="clear"></div>
</div>
<!--<p><a href="/contactus/"><img src="http://data.chinahighlights.com/image/promo/phone.jpg" alt="Call us" border="0" /></a></p>-->
<div class="clear"></div>
<%
cityCapStr = capitalize(city)
linkCity = replace(lcase(City), " ","-")
%>
<div class="rightBox">
<div class="rightContent">
<h4>About <%=capitalize(city)%></h4>
<ul class="squareGray">
<% If checkCityMM(city, "MainCity")<>"" Then %>
<li><a href="/<%=linkCity%>/"><%=cityCapStr%> Overview</a></li>
<li><a href="/<%=linkCity%>/weather.htm"><%=cityCapStr%> Weather</a></li>
<li><a href="/<%=linkCity%>/attraction/"><%=cityCapStr%> Attractions</a></li>
<li><a href="/<%=linkCity%>/map.htm"><%=cityCapStr%> Maps</a></li>
<li><a href="/<%=linkCity%>/transportation.htm"><%=cityCapStr%> Transportation</a></li>
<li><a href="http://photo.chinahighlights.com/<%=linkCity%>/"><%=cityCapStr%> Photos</a></li>
<li><a href="/<%=linkCity%>/food-restaurant.htm"> Food &amp; Restaurant</a></li>
<% ElseIf checkCityMM(city, "minorCity")<>"" Then %>
<li><a href="/<%=linkCity%>/"><%=cityCapStr%> Overview</a></li>
<li><a href="/<%=linkCity%>/weather.htm"><%=cityCapStr%> Weather</a></li>
<li><a href="/<%=linkCity%>/attraction/"><%=cityCapStr%> Attractions</a></li>
<li><a href="/<%=linkCity%>/map.htm"><%=cityCapStr%> Maps</a></li>
<li><a href="/<%=linkCity%>/transportation.htm"><%=cityCapStr%> Transportation</a></li>
<li><a href="http://photo.chinahighlights.com/<%=linkCity%>/"><%=cityCapStr%> Photos</a></li>
<% End If %>
<%
getCityRCLiksStr = getCityRCLiks(CityID,city,"Hotel|Train|Flight")
If getCityRCLiksStr<>"" Then
allCount = 0
linkArr = split(getCityRCLiksStr, "$$")
tmpArr = split(linkArr(1),"@")
For i=0 to ubound(tmpArr)
tmp = split(tmpArr(i), "-")
If tmp(0)="Hotel" AND tmp(1)>0 Then linkHotels = "<li><a href=""/hotel/"&linkCity&"-hotels/"" title=""Recommended "&cityCapStr&" Hotel"">"&cityCapStr&" Hotels</a></li>"
'If tmp(0)="Tour" AND tmp(1)>0 Then linkTour = "<li><a href=""/"&linkCity&"/tours.htm"" title="""&cityCapStr&" Tours"">"&cityCapStr&" Tours</a></li>"
If tmp(0)="Flight" AND tmp(1)>0 Then
linkFlight = "<li><a href=""/"&linkCity&"/flights-to-"&linkCity&".htm"" title="""&cityCapStr&" Flight Schedule"">"&cityCapStr&" Flights</a></li>"
linkFlights= "<li><a href=""/china-flight-schedules/"&linkCity&"-flight-departures.htm"" title="""&cityCapStr&" Flight Schedule"">"&cityCapStr&" Flight Schedule</a></li>"
End If
If tmp(0)="Train" AND tmp(1)>0 Then linkTrain = "<li><a href=""/china-trains/"&linkCity&"-train-schedule.htm"" title="""&cityCapStr&" Train Schedule"">"&cityCapStr&" Train Schedule</a></li>"
allCount = allCount + tmp(1)
Next
If allCount>0 Then
Response.Write(linkHotels)
'Response.Write(linkTour)
Response.Write(linkTrain)
Response.Write(linkFlight)
Response.Write(linkFlights)
End If
End If %>
</ul>
</div>
</div>
<p align="center"><a href="/forms/call-you.asp" rel="nofollow"><img src="http://data.chinahighlights.com/image/promo/call-you.gif" border="0" alt="Would you like us to call you" width="171" height="71"></a></p>
<p><a href="/forms/call-you.asp" rel="nofollow">Leave your phone number, and we will call back!</a></p>
<p><img src="http://data.chinahighlights.com/image/promo/book-steps-s.jpg" alt="<%=capitalize(city)%> Private Tours" title="<%=capitalize(city)%> Private Tours"></p>
</div>
<div class="clear"></div>
</div>
<div class="clear"></div>
</div>
<!--#include virtual="/include/footer-link-tour.asp" -->
<!--#include virtual="/include/boldchat.asp" -->
</div>
</body>
<script>
totaladdons = <%=totaladdons%>,
totaltour = <%=totaltour%>,
totaldaytrip =<%=totaldaytrip%>;
</script>
</html>