data.chinahighlights.com/css/search-list.asp

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

Dim Search_tour_rs, Search_daytrip_rs, Search_addons_rs, Search_SQL

Dim S_price, S_seldays, S_theme, S_City
Dim S_price_SQL, S_seldays_SQL, S_theme_SQL, S_City_SQL

S_City = SafeRequest("s_city",0)
If S_City = "" Or IsEmpty(S_City) Or IsNull(S_City) Then
    S_City = "beijing"
End If
TitleCity = capitalize(S_City)
URLCity   = LCase(Replace(S_City, " ", ""))
cityurl   = URLCity
S_City_SQL= Replace(LCase(S_City), "hong kong", "hongkong")
CityId    = getcityid(S_City)

S_price = SafeRequest("S_price",0)
If S_price = "" Or IsEmpty(S_price) Or IsNull(S_price) Or LCase(S_price) = "none" Then

Else
    S_price = Replace(S_price, "-", " ")
    S_price_SQL = " AND ( dbo.CustomerLinePrice.CLP_TwoToFiveAdultPrice Between "& S_price &" )  "
End If

S_seldays = SafeRequest("S_seldays",0)
If S_seldays = "" Or IsEmpty(S_seldays) Or IsNull(S_seldays) Then
    S_seldays = 0
End If

S_theme = SafeRequest("S_theme",0)
If S_theme = "" Or IsEmpty(S_theme) Or IsNull(S_theme) Then
    S_theme = "None"
End If

Select Case S_seldays
    Case "1"
        Search_tour_S_seldays_SQL = " AND (dbo.CustomerLineInfo.CLI_Days = 1) "
        Search_daytrip_S_seldays_SQL = ""
        Search_addons_S_seldays_SQL  = ""
    Case "2"
        Search_tour_S_seldays_SQL = " AND (dbo.CustomerLineInfo.CLI_Days Between 2 And 3) "
        Search_daytrip_S_seldays_SQL = " AND (1 = 2) "
        Search_addons_S_seldays_SQL  = " AND (1 = 2) "
    Case "3"
        Search_tour_S_seldays_SQL = " AND (dbo.CustomerLineInfo.CLI_Days Between 4 And 5) "
        Search_daytrip_S_seldays_SQL = " AND (1 = 2) "
        Search_addons_S_seldays_SQL  = " AND (1 = 2) "
    Case "4"
        Search_tour_S_seldays_SQL = " AND (dbo.CustomerLineInfo.CLI_Days > 6) "
        Search_daytrip_S_seldays_SQL = " AND (1 = 2) "
        Search_addons_S_seldays_SQL  = " AND (1 = 2) "
    Case Else
        Search_tour_S_seldays_SQL = ""
End Select


Dim Search_tour_totality, Search_daytrip_totality, Search_addons_totality
Dim OrderPrice, OrderDay, OrderSQL
Sub Ordercondition()
    Orderp = Request.QueryString("orderp")
    If LCase(Orderp) = "asc" Or LCase(Orderp) ="desc" Then
        If LCase(Orderp) = "asc" Then
            OrderPrice = " dbo.CustomerLinePrice.CLP_TwoToFiveAdultPrice Asc, "
        Else
            OrderPrice = " dbo.CustomerLinePrice.CLP_TwoToFiveAdultPrice Desc, "
        End If
        OrderSQL = OrderPrice
    End If
    Orderd = Request.QueryString("orderd")
    If LCase(Orderd) = "asc" Or LCase(Orderd) ="desc" Then
        If LCase(Orderd) = "asc" Then
            OrderDay = " CLI_Days Asc, "
        Else
            OrderDay = " CLI_Days Desc, "
        End If
        OrderSQL = OrderDay
    End If
End Sub
Selectcondition = ""
Search_totality = 0

Select Case LCase(S_theme)
    Case "city tour package" 
        Selectcondition = "1"
        OrderSQL = ""
        Ordercondition
        Search_tour
        Search_totality = Search_tour_totality 
    Case "day trips & transfer"
        Selectcondition = "2"
        Search_daytrip
        Search_totality = Search_daytrip_totality 
    Case "itinerary plus"
        Selectcondition = "3"
        Search_addons
        Search_totality = Search_addons_totality 
    Case Else
        Selectcondition = "123"
        Search_tour
        Search_daytrip
        Search_addons
        Search_totality = Search_tour_totality + Search_daytrip_totality + Search_addons_totality
End Select

Sub Search_tour()
    Search_SQL = "" 
    Search_SQL = " " &_
                 "SELECT  " &_
                 "      dbo.CustomerLineInfo.CLI_SN,  " &_
                 "      dbo.CustomerLineInfo2.CLI2_Name,    " &_
                 "      IsNull(dbo.CustomerLinePrice.CLP_TwoToFiveAdultPrice, 0) As CLP_TwoToFiveAdultPrice, dbo.CustomerLineInfo.CLI_NO,    " &_
                 "      dbo.CustomerLineInfo.CLI_Days, dbo.CustomerLineInfo2.CLI2_AttractionList,    " &_
                 "      dbo.GetFullPathByPII_SN(dbo.CustomerLineInfo.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   " &_
                 "      dbo.CustomerLineInfo INNER JOIN   " &_
                 "      dbo.CustomerLineInfo2 ON    " &_
                 "      dbo.CustomerLineInfo.CLI_SN = dbo.CustomerLineInfo2.CLI2_CLI_SN INNER JOIN   " &_
                 "      dbo.CustomerLinePrice ON    " &_
                 "      dbo.CustomerLinePrice.CLP_CLI_SN = dbo.CustomerLineInfo.CLI_SN   " &_
                 "WHERE (dbo.CustomerLinePrice.CLP_PriceType = 2) AND    " &_
                 "      (dbo.CustomerLineInfo.CLI_PackageClass = '202003' OR   " &_
                 "      dbo.CustomerLineInfo.CLI_PackageClass = '202007' OR   " &_
                 "      dbo.CustomerLineInfo.CLI_PackageClass = '202005') AND    " &_
                 "      (dbo.CustomerLineInfo2.CLI2_LGC = " & Site_lgc & ") AND    " &_
                 "      (dbo.CustomerLineInfo.CLI_DEI_SN = 1 OR   " &_
                 "      dbo.CustomerLineInfo.CLI_DEI_SN = 2) AND    " &_
                 "      (dbo.CustomerLineInfo.CLI_State = 1005004) AND    " &_
                 "      (dbo.CustomerLineInfo2.CLI2_PassCity LIKE '%"& S_City &"%')   " &_
                 "      " & S_price_SQL & Search_tour_S_seldays_SQL & " " &_
                 "ORDER BY " & OrderSQL & " dbo.CustomerLineInfo.CLI_OrderNum   "
	'Response.Write(Search_SQL&"<br><br>")
    Set Search_tour_rs = Server.Createobject("adodb.recordset")
        Search_tour_rs.Open Search_SQL, Conn, 1, 1, 1
    If Not Search_tour_rs.Eof Then
        Search_tour_totality = Search_tour_rs.RecordCount
    Else
        Search_tour_totality = 0
            Search_tour_rs.Close
        Set Search_tour_rs = Nothing
    End If
End Sub

Sub Search_daytrip()
    Search_SQL = ""
'    Search_SQL = "   " &_
'    "SELECT    " &_
'    "      BIZ_PackageInfo.PAG_SN, BIZ_PackageInfo2.PAG2_Name,   " &_
'    "      BIZ_PackageInfo.PAG_NeedTime, SystemCode2.SYC2_CodeDiscribe,   " &_
'    "      BIZ_PackageInfo.PAG_Code, BIZ_PackageInfo2.PAG2_Attraction,   " &_
'    "      BIZ_PackageInfo2.PAG2_PII_SN  " &_
'    "FROM  dbo.BIZ_PackageInfo INNER JOIN   " &_
'    "      dbo.BIZ_PackageInfo2 ON    " &_
'    "      dbo.BIZ_PackageInfo.PAG_SN = dbo.BIZ_PackageInfo2.PAG2_PAG_SN INNER JOIN   " &_
'    "      dbo.SystemCode2 ON SystemCode2.SYC2_SYC_SN = LEFT(REPLACE(BIZ_PackageInfo.PAG_ExtendType, ',', ''), 5) INNER JOIN   " &_
'    "      dbo.BIZ_PackagePrice ON    " &_
'    "      dbo.BIZ_PackageInfo.PAG_SN = dbo.BIZ_PackagePrice.PKP_PAG_SN " &_
'    "WHERE (dbo.BIZ_PackageInfo2.PAG2_LGC = " & Site_lgc & ") AND (dbo.BIZ_PackageInfo2.PAG2_Check = 2) AND    " &_
'    "      (dbo.BIZ_PackageInfo.PAG_CII_SN =  " & CityId & ") AND (dbo.BIZ_PackageInfo.PAG_Flag = 1) AND    " &_
'    "       (dbo.SystemCode2.SYC2_LGC = " & Site_lgc & ") AND (dbo.BIZ_PackageInfo2.PAG2_PAG_SN IN   " &_
'    "          (SELECT sra_resid   " &_
'    "           FROM SRMS.dbo.SRMS_ResourceAllot   " &_
'    "           WHERE sra_ssiid = " & Site_id & " AND sra_code = 'D')) AND  " &_
'    "       (2 BETWEEN dbo.BIZ_PackagePrice.PKP_PersonStart AND dbo.BIZ_PackagePrice.PKP_PersonStop) AND   " &_
'    "       (GETDATE() BETWEEN dbo.BIZ_PackagePrice.PKP_ValidDate AND dbo.BIZ_PackagePrice.PKP_InvalidDate)   " &_
'    "       " & Search_daytrip_S_seldays_SQL & "   " &_
'    "GROUP BY BIZ_PackageInfo.PAG_SN, BIZ_PackageInfo2.PAG2_Name,    " &_
'    "      BIZ_PackageInfo.PAG_NeedTime, SystemCode2.SYC2_CodeDiscribe,    " &_
'    "      BIZ_PackageInfo.PAG_Code, BIZ_PackageInfo2.PAG2_Attraction,    " &_
'    "      BIZ_PackageInfo2.PAG2_PII_SN     " 
    Search_SQL = "   " &_
	" SELECT  " & _
	"       P1.PAG_SN, p2.PAG2_Name, p2.PAG2_Intro, p2.PAG2_PAG_SN, P1.PAG_NeedTime,  " & _
	"       P1.PAG_CII_SN, ISNULL " & _
	"           ((SELECT TOP 1 bpp.PKP_AdultPrice " & _
	"           FROM dbo.BIZ_PackagePrice bpp " & _
	"           WHERE bpp.PKP_PAG_SN = p1.PAG_SN AND (2 BETWEEN PKP_PersonStart AND  " & _
	"                 PKP_PersonStop) AND (GETDATE() BETWEEN PKP_ValidDate AND  " & _
	"                 PKP_InvalidDate) " & _
	"           ORDER BY  " & _
	"                     (SELECT TOP 1 dav.CAV_Level " & _
	"                    FROM DCityAndVendor dav " & _
	"                    WHERE bpp.PKP_VEI_SN = dav.CAV_VEI_SN AND  " & _
	"                          dav.CAV_CII_SN = P1.PAG_CII_SN " & _
	"                    ORDER BY dav.Cav_level)), 0) AS Price, p2.PAG2_PII_SN, P1.PAG_Code,  " & _
	"       p2.PAG2_Attraction, dbo.CItyInfo2.CII2_Name, P1.PAG_Code, SystemCode2.SYC2_CodeDiscribe  " & _
	" FROM dbo.BIZ_PackageInfo P1 INNER JOIN " & _
	"       dbo.BIZ_PackageInfo2 p2 ON P1.PAG_SN = p2.PAG2_PAG_SN INNER JOIN " & _
	"       dbo.SystemCode2 ON p2.PAG2_LGC = dbo.SystemCode2.SYC2_LGC AND  " & _
	"       CAST(dbo.SystemCode2.SYC2_SYC_SN AS varchar) IN (Left(P1.PAG_ExtendType, 5))  " & _
	"       INNER JOIN " & _
	"       dbo.CItyInfo2 ON P1.PAG_CII_SN = dbo.CItyInfo2.CII2_CII_SN AND  " & _
	"       p2.PAG2_LGC = dbo.CItyInfo2.CII2_LGC " & _
	" WHERE (p2.PAG2_LGC = 1) " & _
	"       AND (REPLACE(dbo.CItyInfo2.CII2_Name, ' ', '') IN ('"&S_City_SQL&"')) AND (ISNULL " & _
	"           ((SELECT TOP 1 bpp.PKP_AdultPrice " & _
	"           FROM dbo.BIZ_PackagePrice bpp " & _
	"           WHERE bpp.PKP_PAG_SN = p1.PAG_SN AND (2 BETWEEN PKP_PersonStart AND  " & _
	"                 PKP_PersonStop) AND (GETDATE() BETWEEN PKP_ValidDate AND  " & _
	"                 PKP_InvalidDate) " & _
	"           ORDER BY  " & _
	"                     (SELECT TOP 1 dav.CAV_Level " & _
	"                    FROM DCityAndVendor dav " & _
	"                    WHERE bpp.PKP_VEI_SN = dav.CAV_VEI_SN AND  " & _
	"                          dav.CAV_CII_SN = P1.PAG_CII_SN " & _
	"                    ORDER BY dav.Cav_level)), 0) > 0) " &_
	"        And (Pag2_check =2)  AND (P1.PAG_Flag = 1) " &_
	"        AND (dbo.SystemCode2.SYC2_LGC = 1) AND  " &_
	"            (dbo.CItyInfo2.CII2_LGC = 1) " 
	
    'Response.Write("<!-- "&Search_SQL&" --><br><br>")
	'Response.End()
    Set Search_daytrip_rs = Server.Createobject("adodb.recordset")
        Search_daytrip_rs.Open Search_SQL, Conn, 1, 1, 1
    If Not Search_daytrip_rs.Eof Then
        Search_daytrip_totality = Search_daytrip_rs.RecordCount
    Else
        Search_daytrip_totality = 0
            Search_daytrip_rs.Close
        Set Search_daytrip_rs = Nothing
    End If
End Sub

Sub Search_addons()
    Search_SQL = ""
    Search_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   " &_
    "FROM  dbo.EntertainmentInfo INNER JOIN   " &_
    "      dbo.EntertainmentInfo2 ON    " &_
    "      dbo.EntertainmentInfo.ENI_SN = dbo.EntertainmentInfo2.ENI2_ENI_SN   " &_
    "WHERE (dbo.EntertainmentInfo2.ENI2_LGC = 1) AND (dbo.EntertainmentInfo.ENI_Type = 2) AND    " &_
    "      (ISNULL(dbo.EntertainmentInfo.DeleteFlag, 0) <> 1) AND (dbo.EntertainmentInfo.ENI_CII_SN = " & CityId & ")   " &_
    "      " & Search_addons_S_seldays_SQL & "  "
	'Response.Write(Search_SQL&"<br><br>")
    Set Search_addons_rs = Server.Createobject("adodb.recordset")
        Search_addons_rs.Open Search_SQL, Conn, 1, 1, 1
    If Not Search_addons_rs.Eof Then
        Search_addons_totality = Search_addons_rs.RecordCount
    Else
        Search_addons_totality = 0
            Search_addons_rs.Close
        Set Search_addons_rs = Nothing
    End If
End Sub

%>
<!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><%=TitleCity%> Tours Search Results, Search a <%=TitleCity%> Tour</title>
<meta name="robots" content="noindex, follow" />
<meta name="Copyright" content="www.chinahighlights.com, copyrights reserved." />
<meta name="keywords" content="<%=TitleCity%> Tours Search Results, Search a <%=TitleCity%> Tour"/>
<meta name="description" content="Find a  <%=TitleCity%> Tour in our tour list, or you can tailor made a tour to meet your needs."/>
<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">
<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 language="javascript" src="/js/tourinfo.js"></script>

<script>
$(document).ready(function(){
	var S_price_value   = '<% =Request("S_price") %>';
	var S_seldays_value = '<% =Request("S_seldays") %>';
	var S_theme_value   = '<% =Request("S_theme") %>';
	$("select[name='S_price'] option").each(function(){
		if ($(this).val() == S_price_value) {
			$("#S_price").val(S_price_value);
		}
	});
	$("select[name='S_seldays'] option").each(function(){
		if ($(this).val() == S_seldays_value) {
			$("#S_seldays").val(S_seldays_value);
		}
	});
	$("select[name='S_theme'] option").each(function(){
		if ($(this).val() == S_theme_value) {
			$("#S_theme").val(S_theme_value);
		}
	});
});
</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/" class="moreCatagory">Single City Tours</a> <%
	  If Search_tour_totality > 0 And Search_daytrip_totality > 0 And Search_addons_totality > 0 Then
	  %><a href="/<%=lcase(TitleCity)%>/tours.htm"><%=TitleCity%> Tours</a><%
	  End If
	  %> <%=TitleCity%> Tour Search Results</div>
      <h1><%=TitleCity%> Tour Search Results</h1>
    </div>
    <div id="mainContent2">
      <div id="contentRight">
        <h2 class="resultSteps">You Searched for</h2>
        <p>
          <%
		  Cookiescustom = ""
          If S_price = "" Or IsEmpty(S_price) Or IsNull(S_price) Or LCase(S_price) = "none" Then
          Else
              tempS_price = LCase(S_price)
              tempS_price = Replace(tempS_price, "-", " ")
              If tempS_price = "0 and 100" Then
                  tempS_price = "100"
              ElseIf tempS_price = "600 and 10000" Then
                  tempS_price = "600"
              End If
              tempS_price = Replace(tempS_price, " and ", "-")
			  Cookiescustom = Cookiescustom & tempS_price
        %>
          <strong>US$
          <% = tempS_price%>
          </strong>,
          <%
          End If
          If S_seldays = "" Or IsEmpty(S_seldays) Or IsNull(S_seldays) Or S_seldays = "None" Then
          Else
              tempS_seldays = S_seldays
              Select Case S_seldays
                  Case "1" : tempS_seldays = "1 day"
                  Case "2" : tempS_seldays = "1-3 days"
                  Case "3" : tempS_seldays = "3-6 days"
                  Case "4" : tempS_seldays = "6 days"
              End Select 
			  Cookiescustom = Cookiescustom & tempS_seldays & ", " 
        %>
          <strong>
          <% =tempS_seldays %>
          </strong>,
          <%
          End If
        %>
          <strong>
          <% = TitleCity %>
          City Tour Packages</strong>.
          <%
		  Cookiescustom = Cookiescustom & TitleCity & " City Tour Package."
		  Response.Cookies("Cht")("Cookiescustom") = Cookiescustom
		%>
          <% If Search_totality < 1 Then %>
          If these tours are not right for you, let our professional travel advisor to <a href="/forms/tailor-made-<%=lcase(TitleCity)%>-tours.htm"><strong>design the right tour</strong></a> to meet your needs.
          <% End If %>
        </p>
        <%
        If Search_totality > 0 Then
      %>
        <div id="tourSort"> <span class=" numberChoice">
          <% =Search_totality %>
          Choices </span>
          <%
          If Selectcondition = 1 Then
		      arrow_down_d = "<img src=""/css/images/tour/arrow-down.png"">"
			  arrow_down_u = "<img src=""/css/images/tour/arrow-up.png"">"
              Orderp = Request.QueryString("orderp")
              If Orderp = "" Or IsEmpty(Orderp) Or IsNull(Orderp) Or Orderp = "None" Then
                  Orderp = "asc"
				  ad_p = arrow_down_u
              Else
                  If Orderp = "asc" Then
                      Orderp = "desc"
					  ad_p = arrow_down_d
                  Else
                      Orderp = "asc"
					  ad_p = arrow_down_u
                  End If
              End If
              OrderpUrl = "S_price=" & S_price & "&S_seldays=" & S_seldays & "&S_theme=" & S_theme & "&s_city=" & s_city & "&orderp=" & Orderp
              
              Orderd = Request.QueryString("orderd")
              If Orderd = "" Or IsEmpty(Orderd) Or IsNull(Orderd) Or Orderd = "None" Then
                  Orderd = "asc"
				   ad_d = arrow_down_u
              Else
                  If Orderd = "asc" Then
                      Orderd = "desc"
					  ad_d = arrow_down_d
                  Else
                      Orderd = "asc"
					  ad_d = arrow_down_u
                  End If
              End If
              OrderdUrl = "S_price=" & S_price & "&S_seldays=" & S_seldays & "&S_theme=" & S_theme & "&s_city=" & s_city & "&orderd=" & Orderd
			  
        %>
          <span class="sortBy"> <a href="/citytour/search-list.asp?<% =OrderpUrl %>">Price
          <% =ad_p %>
          </a> </span> <span class="sortBy"> <a href="/citytour/search-list.asp?<% =OrderdUrl %>">Days
          <% =ad_d %>
          </a> </span>
          <%
          End If
        %>
        </div>
        <!-- city tour result -->
        <%
            If TypeName(Search_tour_rs) = "Recordset" Then
                Do While Not Search_tour_rs.Eof
                    If IsNull(Search_tour_rs("pic")) Or Search_tour_rs("pic") = Empty Then
                        pic = "/pic/unknown.gif"
                    Else
                        pic =  "http://www.chinahighlights.com"& imgurl & Search_tour_rs("pic")
                    End If
                    If Search_tour_rs("CLI_Days") > 1 Then
                        days = Search_tour_rs("CLI_Days") &"-"& "Days"
                    Else
                        days = Search_tour_rs("CLI_Days") &"-"& "Day"
                    End If
                    CLI_NO = Trim(Search_tour_rs("CLI_NO"))
                    urlCityTourInfo = "/tour/{0}tour/{1}/"
                    'CityTourInfoUrl = strFormat(urlCityTourInfo, Array(changeStrPara(cityname), LCase(CLI_NO)))
					CityTourInfoUrl = "/tour/"& changeStrPara(Search_tour_rs("cityname")) &"tour/"& LCase(CLI_NO) &"/"
                    Price = setFigure(Search_tour_rs("CLP_TwoToFiveAdultPrice"))
      %>
        <div class="toursearchList">
          <div class="searchlistPic roundCorner"><a href="<%=pic%>" onclick="return false;" title="4-Day Beijing Tour" class="preview"><img src="<%=pic%>" border="0"></a>
            <% If Search_tour_rs("linetypeName") > "" Then %>
            <span class="category">
            <% =Search_tour_rs("linetypeName") %>
            </span>
            <% End If %>
          </div>
          <div class="searchlistContent">
            <span class="mainTitle"><a href="<%=CityTourInfoUrl%>"><%=Search_tour_rs("cli2_name")%></a> <span class="tourCode">(<%=Search_tour_rs("CLI_NO")%>)</span>
            <!--#include virtual="/include/value-guarantee.asp" -->
            </span>
            <h3>
              <% =days %>
              <span class="selectedCity"><%=TitleCity%></span> Tour</h3>
            <ul>
              <li>
                <% =Search_tour_rs("cli2_attractionlist") %>
                <a onclick="javascript:return ShowIFrame('','/tour/tourmap.asp?Adname=Beijing',425,380,'bottom');//show_tour_map(this);" href="#<% =TitleCity %>">View Map</a></li>
            </ul>
          </div>
          <div class="searchlistPrice"> <span class="fullPrice">Full price from:</span><br>
            <span class=" highlightBold red_price">$<%=Price%></span> p/p
            <div class="viewDetail"><a href="<%=CityTourInfoUrl%>"><img src="http://data.chinahighlights.com/pic/view-details.png"></a></div>
          </div>
          <div class="clear"></div>
        </div>
        <%
                Search_tour_rs.MoveNext
                Loop
            End If
            If TypeName(Search_daytrip_rs) = "Recordset" Then
                Do While Not Search_daytrip_rs.Eof
                sn = Search_daytrip_rs("PAG_SN")
                title = Search_daytrip_rs("PAG2_Name")
                hours = Search_daytrip_rs("PAG_NeedTime")
                ttype = Search_daytrip_rs("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 = Search_daytrip_rs("PAG_Code")
                content = Search_daytrip_rs("PAG2_Attraction")
                Price = setFigure(GetAdultPricePAG_SN(Search_daytrip_rs("PAG_SN"), 2))
                
                If IsNull(Search_daytrip_rs("PAG2_PII_SN")) Or Search_daytrip_rs("PAG2_PII_SN") = Empty Then
                    ListImage = -1
                Else
                    ListImage = Search_daytrip_rs("PAG2_PII_SN")
                End If
                
                daytripshtml = LCase(Replace(title, " ", "-"))
                
                daytripshtml = daytripshtml&".htm"
                cityurl = Replace(cityurl, " ", "-")
      %>
        <div class="toursearchList">
          <div class="searchlistPic roundCorner"><a href="/<%=cityurl%>/day-trips/<%=lcase(PAG_Code)%>.htm"><img src="http://www.chinahighlights.com<%=GetOnePicPII_SN(ListImage,1)%> " border="0"></a> <span class="category"><a href="/<%=URLCity%>/<%=LCase(Replace(ttype, " ", "-"))%>.htm"><%=ttype%></a></span> </div>
          <div class="searchlistContent">

            <span class="mainTitle"><a href="/<%=cityurl%>/day-trips/<%=lcase(PAG_Code)%>.htm"><%=title%></a> <span class="tourCode">(<%=PAG_Code%>)</span></span>
            <h3>Duration: <%=hours%></h3>
            <ul>
              <li><strong>Attractions:</strong> <%=content%></li>
            </ul>
          </div>
          <div class="searchlistPrice"> <span class="fullPrice">Full price from:</span><br>
            <span class=" highlightBold red_price">$<%=Price%></span> p/p
            <div class="viewDetail"><a href="/<%=cityurl%>/day-trips/<%=lcase(PAG_Code)%>.htm"><img src="http://data.chinahighlights.com/pic/view-details.png"></a></div>
          </div>
          <div class="clear"></div>
        </div>
        <%
                Search_daytrip_rs.MoveNext
                Loop
            End If
            If TypeName(Search_addons_rs) = "Recordset" Then
                Do While Not Search_addons_rs.Eof
                    sn = Search_addons_rs("ENI_SN")
                    title = Search_addons_rs("ENI2_Name")
                    tmpcityid = Search_addons_rs("eni_cii_sn")
                    content = Left(Search_addons_rs("ENI2_Introduction"), 126)&"..."
                
                    ENI_ConsumeTime = Search_addons_rs("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(Search_addons_rs("pic")) Or Search_addons_rs("pic") = Empty Then
                        ListImage = "/pic/unknown.gif"
                    Else
                        ListImage = "http://www.chinahighlights.com" & imgurl & Search_addons_rs("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
                
                    rs_tmp.Open sql, conn, 3, 1, 1
                    If Not rs_tmp.EOF Then
                        Price = setFigure(getUSDByRMB(CInt(rs_tmp(0)) * 1.2))
                        netprice = setFigure(getUSDByRMB(CInt(rs_tmp(0)) * 1.2 * 1.2))
                    End If
                    addonshtml = LCase(Replace(title, " ", "-"))
                    addonshtml = addonshtml&".htm"
					
					If netprice = "" Or netprice = 0 Then
					Else
      %>
        <div class="toursearchList">
          <div class="searchlistPic roundCorner"> <a href="/<%=cityurl%>/addons/<%=addonshtml%>"><img src="<%=ListImage%> " border="0"></a> <span class="category"><a href="/<%=URLCity%>/addons.htm" class="cname">Itinerary Plus</a></span> </div>
          <div class="searchlistContent" style="width:490px">
            <span class="mainTitle"><a href="/<%=cityurl%>/addons/<%=Trim(addonshtml)%>" class="cname"><%=title%></a></span>
            <ul>
              <li><strong>Duration:</strong> <%=ENI_ConsumeTime%></li>
              <li><strong>Attractions:</strong> <%=content%></li>
            </ul>
            <table cellspacing="0" cellpadding="0" class="addonpriceOption2">
              <tbody>
                <tr>
                  <th width="195" style="padding-left: 5px;">Booking Options</th>
                  <th width="125">Price Per Person</th>
                  <th width="158">Next Step</th>
                </tr>
                <tr>
                  <td style="padding-left: 5px;">A) Enquiry this tour Now </td>
                  <td><span class="redPrice12Bold">$<%=netprice%></span></td>
                  <td><!--<a href="/forms/addons-cart.asp?esn=1420">Choose it and continue&#187</a>--></td>
                </tr>
                <tr>
                  <td style="padding-left: 5px;">B) Combine it with a package</td>
                  <td><span class="redPrice12Bold">$<%=price%></span> <span style="font-style: italic; font-size: 11px;">(save 20%)</span></td>
                  <td><a href="####" onclick="return ShowIFrame('','/forms/enrich-your-tour-next.asp?esn=<%=Search_addons_rs("ENI_SN")%>',638,450,'bottom');">Choose it and continue&#187</a></td>
                </tr>
              </tbody>
            </table>
            <div class="clear"></div>
          </div>
          <div class="clear"></div>
        </div>
        <%
		        End If
                Search_addons_rs.MoveNext
                Loop
            End If
        End If
      %>
     
        <!-- addons result -->
        <div class="tailormadeBox roundCorner"><a href="/forms/tailormadetours.htm"><img src="http://data.chinahighlights.com/image/promo/tailor2.gif"border="0" align="right"></a><strong>Custom Tailoring:</strong> Design your own tour with our help to meet your unique interests. You don't have to compromise. Do exactly what you want to do! Let us assist you to tailor-make your own China experience. <a href="/forms/tailormadetours.htm">Tell us what you need now!</a> </div>
      </div>
      <div id="sideBar">
        <script>
      $(function(){
          $(".hotelsearchtitle .citySelect a").click(function(){ $("#hotelcityList").show(); });
          $("#hotelcityList .closeIt").click(function(){ $("#hotelcityList").hide(); });
		  $("#hotelcityList ul li").click(function(){
              $(".hotelsearchtitle .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:;"><%=TitleCity%></a></span> Tour Search </div>
        <div class="tourSearchBox">
          <div style="display: none ;" id="hotelcityList">
            <div class="closeIt"><img src="/css/images/guide/close.gif"></div>
            <h5>Most Popular Tourist Cities</h5>
            <ul>
              <li><a href="javascript:;">Beijing</a></li>
              <li><a href="javascript:;">Shanghai</a></li>
              <li><a href="javascript:;">Guangzhou</a></li>
              <li><a href="javascript:;">Xian</a></li>
              <li><a href="javascript:;">Guilin</a></li>
              <li><a href="javascript:;">Hangzhou</a></li>
              <li><a href="javascript:;">Shenzhen</a></li>
            </ul>
            <div class="clear"></div>
            <h5>Other Cities in China</h5>
            <ul>
              <li><a href="javascript:;">Changchun</a></li>
              <li><a href="javascript:;">Chengdu</a></li>
              <li><a href="javascript:;">Chengde</a></li>
              <li><a href="javascript:;">Chongqing</a></li>
              <li><a href="javascript:;">Datong</a></li>
              <li><a href="javascript:;">Dongguan</a></li>
              <li><a href="javascript:;">Dali</a></li>
              <li><a href="javascript:;">Dalian</a></li>
              <li><a href="javascript:;">Dengfeng</a></li>
              <li><a href="javascript:;">Dunhuang</a></li>
              <li><a href="javascript:;">Emeishan</a></li>
              <li><a href="javascript:;">Foshan</a></li>
              <li><a href="javascript:;">Fuzhou</a></li>
              <li><a href="javascript:;">Guiyang</a></li>
              <li><a href="javascript:;">Haikou</a></li>
              <li><a href="javascript:;">Harbin</a></li>
              <li><a href="javascript:;">Hefei</a></li>
              <li><a href="javascript:;">Huangshan</a></li>
              <li><a href="javascript:;">Hong Kong</a></li>
              <li><a href="javascript:;">Jinan</a></li>
              <li><a href="javascript:;">Kunming</a></li>
              <li><a href="javascript:;">Lanzhou</a></li>
              <li><a href="javascript:;">Lhasa</a></li>
              <li><a href="javascript:;">Lijiang</a></li>
              <li><a href="javascript:;">Longsheng</a></li>
              <li><a href="javascript:;">Luoyang</a></li>
              <li><a href="javascript:;">Nanchang</a></li>
              <li><a href="javascript:;">Nanjing</a></li>
              <li><a href="javascript:;">Nanning</a></li>
              <li><a href="javascript:;">Ningbo</a></li>
              <li><a href="javascript:;">Macau</a></li>
              <li><a href="javascript:;">Ordos</a></li>
              <li><a href="javascript:;">Pingyao</a></li>
              <li><a href="javascript:;">Qufu</a></li>
              <li><a href="javascript:;">Qingdao</a></li>
              <li><a href="javascript:;">Sanya</a></li>
              <li><a href="javascript:;">Shantou</a></li>
              <li><a href="javascript:;">Shenyang</a></li>
              <li><a href="javascript:;">Suzhou</a></li>
              <li><a href="javascript:;">Tianjin</a></li>
              <li><a href="javascript:;">Urumqi</a></li>
              <li><a href="javascript:;">Wenzhou</a></li>
              <li><a href="javascript:;">Wuhan</a></li>
              <li><a href="javascript:;">Xining</a></li>
              <li><a href="javascript:;">Xiamen</a></li>
              <li><a href="javascript:;">Yangshuo</a></li>
              <li><a href="javascript:;">Yantai</a></li>
              <li><a href="javascript:;">Yichang</a></li>
              <li><a href="javascript:;">Yiwu</a></li>
              <li><a href="javascript:;">Zhangzhou</a></li>
              <li><a href="javascript:;">Zhenzhou</a></li>
              <li><a href="javascript:;">Zhuhai</a></li>
            </ul>
          </div>
          <form action="/citytour/search-list.asp" method="get">
            <label> <span>Your Budget</span>
              <select name="S_price" class="roundCorner" id="S_price">
                <option selected="selected" value="None">Price Per Person</option>
                <option value="0-And-100">Less than $100</option>
                <option value="101-And-200">US$101-200</option>
                <option value="201-And-300">US$201-300</option>
                <option value="301-And-400">US$301-400</option>
                <option value="401-And-500">US$401-500</option>
                <option value="501-And-600">US$501-600</option>
                <option value="600-And-10000">Over $600</option>
              </select>
            </label>
            <label> <span>Duration</span>
              <select name="S_seldays" class="roundCorner" id="S_seldays">
                <option value="None" selected="selected">Length of Tour</option>
                <option value="1">1 day</option>
                <option value="2">1-3 days</option>
                <option value="3">3-6 days</option>
                <option value="4">over 6 days</option>
              </select>
            </label>
            <label> <span>Tour Themes</span>
              <select id="S_theme" name="S_theme" class="roundCorner">
                <option selected="selected" value="None">All theme</option>
                <option value="City tour package">City tour package</option>
                <option value="Day trips & transfer">Day trips & transfer</option>
                <option value="Itinerary Plus">Itinerary Plus</option>
              </select>
            </label>
            <input type="image" class="submitButton" src="http://data.chinahighlights.com/pic/hotel/horel-search-button.png">
            <input id="s_city" name="s_city" type="hidden" value="<%=s_city%>" />
          </form>
        </div>
        <p align="center"><a href="/forms/call-you.asp"><img src="http://data.chinahighlights.com/image/promo/call-you.gif" border="0" alt="Would you like us to call you" title="Would you like us to call you"></a></p>
        <p><a href="/forms/call-you.asp">Leave your phone number, and we will call back!</a></p>
        <div class="clear"></div>
      </div>
    </div>
    <div class="clear"></div>
  </div>
  <div class="contentBottom"></div>
  <!--#include virtual="/include/footer-link-tour.asp" -->
</div>
</body>
</html>