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.
236 lines
10 KiB
Plaintext
236 lines
10 KiB
Plaintext
6 years ago
|
<!--#include virtual="/include/site-seting.asp" -->
|
||
|
|
<!--#include virtual="/common/Function.asp" -->
|
||
|
|
<!--#include virtual="/common/function-customer.asp" -->
|
||
|
|
<% Dim vTypeP,vType,vTypeSql,vPage,vOrder
|
||
|
|
vTypeP = SafeRequest("vtype",0)
|
||
|
|
vType = changeParaStr(SafeRequest("vtype",0))
|
||
|
|
vTypeSql = vType
|
||
|
|
vPage = int(SafeRequest("page",1))
|
||
|
|
vOrder = SafeRequest("order",0)
|
||
|
|
'response.write(vType)
|
||
|
|
'response.write(vPage)
|
||
|
|
'response.write(vOrder)
|
||
|
|
'response.End()
|
||
|
|
|
||
|
|
If vPage=1 Then GotoErrPage()
|
||
|
|
set rs = server.CreateObject("adodb.recordset")
|
||
|
|
t_sql = " SELECT Top 1 * "&_
|
||
|
|
" FROM MC_Tags INNER JOIN MC_TagsLGC "&_
|
||
|
|
" ON TG_SN = TGL_TG_SN "&_
|
||
|
|
" WHERE (TGL_LGC = 1) AND "&_
|
||
|
|
" (TG_Name LIKE '%视频专用%') AND "&_
|
||
|
|
" (TGL_Name = N'"&vTypeSql&"') "
|
||
|
|
rs.open t_sql,conn,1,1
|
||
|
|
If rs.eof Then GotoErrPage()
|
||
|
|
rs.close
|
||
|
|
|
||
|
|
'#############==== start seo ===#############
|
||
|
|
dim topb,h1,lmenu,mtitle,keyword1,descriptionstr,tempstr,thisUrl
|
||
|
|
|
||
|
|
If (not isempty(vType) and vType <>"") then
|
||
|
|
tempstr = capitalize(vType)
|
||
|
|
If vTypeSql = "xian" then tempstr = "Xi'an"
|
||
|
|
topb = "Video of "&tempstr&" Series in China"
|
||
|
|
h1 = tempstr&" Videos"
|
||
|
|
lmenu = "Videos of "&tempstr
|
||
|
|
mtitle = tempstr&" Videos, Travel Videos of "&tempstr&" China"
|
||
|
|
keyword1 = tempstr&" Video, "&tempstr&" China Video, China "&tempstr&" Video "
|
||
|
|
descriptionstr= tempstr&" travel videos, show you the most popular attractions in "&tempstr&" China. "
|
||
|
|
If vTypeSql = "other location videos" or vTypeSql = "other travel videos" or vTypeSql = "other culture videos" or vTypeSql = "other company videos" then
|
||
|
|
h1 = tempstr
|
||
|
|
lmenu = tempstr
|
||
|
|
mtitle = tempstr
|
||
|
|
keyword1 = tempstr
|
||
|
|
descriptionstr= tempstr&", show you the most popular attractions in China. "
|
||
|
|
End If
|
||
|
|
summary = "Find great deals on China Flights in real time from China Highlights! We provide a comprehensive range of flight schedul-es, seat availability and discount fares for China domestic flights from our user friendly search engine. Find the China flights that suit you best and we will do the rest! Reliable information and friendly prompt service are just a few clicks away."
|
||
|
|
Else
|
||
|
|
topb = "Video in China"
|
||
|
|
h1 = "China Videos"
|
||
|
|
lmenu = "Videos of China"
|
||
|
|
title = "China Video, Videos of China, China Travel Video"
|
||
|
|
keyword1= "China Video , China Travel Video "
|
||
|
|
descriptionstr= "Travel Video: watch active videos of attraction, actives, people & life in China."
|
||
|
|
summary = "Find great deals on China Flights in real time from China Highlights! We provide a comprehensive range of flight schedul-es, seat availability and discount fares for China domestic flights from our user friendly search engine. Find the China flights that suit you best and we will do the rest! Reliable information and friendly prompt service are just a few clicks away."
|
||
|
|
End If
|
||
|
|
thisUrl = getHTTPURL()
|
||
|
|
|
||
|
|
a = split(thisUrl,"/")
|
||
|
|
thisUrl = "/"&a(1)&"/"&a(2)&"/"
|
||
|
|
set rs = server.CreateObject("adodb.recordset")
|
||
|
|
s_sql = " SELECT Top 1 * "&_
|
||
|
|
" FROM infoSEOs "&_
|
||
|
|
" WHERE (seo_url = N'"&thisUrl&"') "
|
||
|
|
'response.Write(s_sql)
|
||
|
|
'response.End()
|
||
|
|
rs.open s_sql,conn,1,1
|
||
|
|
|
||
|
|
If (not rs.eof) and (not rs.bof) Then
|
||
|
|
If rs("seo_h1") <> "" Then
|
||
|
|
h1 = rs("seo_h1")
|
||
|
|
End If
|
||
|
|
If rs("seo_title") <> "" Then
|
||
|
|
mtitle = rs("seo_title")
|
||
|
|
End If
|
||
|
|
If rs("seo_keywords") <> "" Then
|
||
|
|
keyword1 = rs("seo_keywords")
|
||
|
|
End If
|
||
|
|
If rs("seo_description") <> "" Then
|
||
|
|
descriptionstr = rs("seo_description")
|
||
|
|
End If
|
||
|
|
If rs("seo_summary") <> "" Then
|
||
|
|
summary = rs("seo_summary")
|
||
|
|
End If
|
||
|
|
End If
|
||
|
|
|
||
|
|
rs.close
|
||
|
|
'#############==== end seo ====#############
|
||
|
|
%>
|
||
|
|
<!doctype html>
|
||
|
|
<html>
|
||
|
|
<head>
|
||
|
|
<meta charset="utf-8">
|
||
|
|
<title><%=mtitle%></title>
|
||
|
|
<meta http-equiv="X-UA-Compatible" content="IE=edge">
|
||
|
|
<meta content="width=device-width, initial-scale=1.0" name="viewport">
|
||
|
|
<meta content="yes" name="apple-mobile-web-app-capable">
|
||
|
|
<meta name="Copyright" content="www.chinahighlights.com, copyrights reserved." />
|
||
|
|
<meta name="description" content="<%=descriptionstr%>" />
|
||
|
|
<link rel="canonical" href="http://www.chinahighlights.com<%=thisUrl%>" />
|
||
|
|
<% If vPage <> 1 Then %><meta name="robots" content="noindex,follow" /><% End If %>
|
||
|
|
<link href="/css/ch-video.css" rel="stylesheet" type="text/css" media="all" />
|
||
|
|
<link href="http://data.chinahighlights.com/css/min.php?f=/public/css/global.min.css&v=20141011" rel="stylesheet" >
|
||
|
|
<script type="text/javascript" src="http://data.chinahighlights.com/js/min.php?f=/js/jquery-1.8.2.min.js,/js/ChtPublic.js,/js/community/jsbase.js&v=2015"></script>
|
||
|
|
</head>
|
||
|
|
<body>
|
||
|
|
<div id="wrapper">
|
||
|
|
<!--#include virtual="/include/header-html5-guide.asp" -->
|
||
|
|
|
||
|
|
<div id="content" class="container"><div id="contentHead"><div id="crumbNav"><a href="/">Home</a> <a href="/video/">China Videos</a> <%=lmenu%></div><h1><%=h1%></h1></div>
|
||
|
|
<div class="row">
|
||
|
|
|
||
|
|
<div class="col-md-19 col-sm-19 col-xs-24 pull-right">
|
||
|
|
<p><%=summary%></p>
|
||
|
|
<div id="sortbyList">
|
||
|
|
<div class="listAspTitle hidden-xs">
|
||
|
|
<form id="form1" name="form1" method="post" action="">
|
||
|
|
<label>
|
||
|
|
<input type="radio" name="RadioGroup1" value="1" id="RadioGroup1_0" onclick= "javascript:window.location= '/video/<%=vTypeP%>/';" <%if vOrder = "time" then%> checked="checked" <%end if%> />
|
||
|
|
Uploaded Time</label>
|
||
|
|
<label>
|
||
|
|
<input type="radio" name="RadioGroup1" value="1" id="RadioGroup1_1" onclick= "javascript:window.location= '/video/<%=vTypeP%>/views/';" <%if vOrder = "views" then%> checked="checked" <%end if%> />
|
||
|
|
Views</label>
|
||
|
|
</form>
|
||
|
|
</div>
|
||
|
|
<div class="videoList row">
|
||
|
|
<% Dim ReCount,vPageSize,TotalPage,vOrderSql
|
||
|
|
vOrderSql = "VI_CreateTime"
|
||
|
|
If vOrder = "views" Then
|
||
|
|
vOrderSql = "VI2_BrowseTimes"
|
||
|
|
End If
|
||
|
|
'response.write(vOrderSql)
|
||
|
|
'response.End()
|
||
|
|
set rs = server.CreateObject("adodb.recordset")
|
||
|
|
v_sql = " SELECT VI2_Name,VI2_BrowseTimes,VI_TmpLocation,VI_CreateTime,VI_OriginalPic,VI_VideoLength,VI_Recommend "&_
|
||
|
|
" FROM VideoInfo2 INNER JOIN "&_
|
||
|
|
" VideoInfo INNER JOIN "&_
|
||
|
|
" MC_Tags INNER JOIN "&_
|
||
|
|
" MC_TagsLGC ON "&_
|
||
|
|
" TG_SN = TGL_TG_SN INNER JOIN "&_
|
||
|
|
" MC_ExtensionBind ON "&_
|
||
|
|
" TG_SN = BE_Obj_SN ON "&_
|
||
|
|
" VI_SN = BE_PII_SN ON "&_
|
||
|
|
" VI2_VI_SN = VI_SN "&_
|
||
|
|
" WHERE (TG_Basic = 0 OR TG_Basic = 2) AND (TG_Name LIKE '%视频专用%') AND VI2_Webcode = N'CHT' "&_
|
||
|
|
" AND (TG_Parent <> 0) AND (TGL_LGC = 1) AND (VI2_LGC = 1) "&_
|
||
|
|
" AND isnull(VideoInfo.DeleteFlag,0)=0 AND (TGL_Name = N'"&vTypeSql&"') "&_
|
||
|
|
" ORDER BY "&vOrderSql&" DESC "
|
||
|
|
'response.write(v_sql)
|
||
|
|
'response.End()
|
||
|
|
rs.open v_sql,conn,1,1
|
||
|
|
if vPage=0 or isempty(vPage) or isnull(vPage) then
|
||
|
|
vPage=1
|
||
|
|
end if
|
||
|
|
|
||
|
|
if rs.eof or rs.bof then
|
||
|
|
response.Write("<p>No Video of the type temporary!</p>")
|
||
|
|
TotalPage=1
|
||
|
|
else
|
||
|
|
rs.pagesize=12
|
||
|
|
rs.absolutepage=vPage
|
||
|
|
ReCount=rs.recordcount
|
||
|
|
vPageSize = rs.pagesize
|
||
|
|
if ReCount mod vPageSize = 0 then
|
||
|
|
TotalPage = ReCount/vPageSize
|
||
|
|
else
|
||
|
|
TotalPage = (Recount - (ReCount mod vPageSize))/vPageSize + 1
|
||
|
|
end if
|
||
|
|
If vPage>TotalPage Then GotoErrPage()
|
||
|
|
'response.write(TotalPage)
|
||
|
|
'response.write(vPage)
|
||
|
|
'response.End()
|
||
|
|
rs_index=1
|
||
|
|
|
||
|
|
do while not rs.eof and rs_index<=rs.pagesize %>
|
||
|
|
<div class="col-md-8 col-sm-8 col-xs-24 videoBlock">
|
||
|
|
<ul>
|
||
|
|
<li class="imgtype"><a href="/video/<%=changeStrPara(rs("VI2_Name"))%>.htm"><img class="img-responsive" alt="<%=rs("VI2_Name")%>" src="<%if rs("VI_OriginalPic")<>"" then response.Write(Mediaurl&rs("VI_TmpLocation")&Left(trim(rs("VI_OriginalPic")),instrrev(trim(rs("VI_OriginalPic")),".")-1)&"-240x240."&Right(trim(rs("VI_OriginalPic")),Len(trim(rs("VI_OriginalPic")))-instrrev(trim(rs("VI_OriginalPic")),"."))) else response.Write("http://202.103.68.119:8000/images/sy.gif") end if%>" />
|
||
|
|
<div class="imgplay hidden-xs"></div></a>
|
||
|
|
<% if DATEDIFF("d", rs("VI_CreateTime"), DATE()) < 7 then %>
|
||
|
|
<div class="newvideo"></div>
|
||
|
|
<% end if %>
|
||
|
|
<% if rs("VI_Recommend") then %>
|
||
|
|
<div class="hotvideo"></div>
|
||
|
|
<% end if %>
|
||
|
|
<div class="videotime"><%=rs("VI_VideoLength")%></div>
|
||
|
|
</li>
|
||
|
|
<li><span class="titleBold"><%=rs("VI2_Name")%></span></li>
|
||
|
|
<li>Uploaded: <span class="xieti"><%=rs("VI_CreateTime")%></span> </li>
|
||
|
|
<li><span class="titleBlue">Views:<%=rs("VI2_BrowseTimes")%></span></li>
|
||
|
|
</ul>
|
||
|
|
</div>
|
||
|
|
<% if((rs_index) mod 3 =0) then %>
|
||
|
|
<div class="clear"></div>
|
||
|
|
<% end if
|
||
|
|
rs_index=rs_index+1
|
||
|
|
rs.movenext
|
||
|
|
loop
|
||
|
|
rs.close %>
|
||
|
|
|
||
|
|
<% end if %>
|
||
|
|
<div class="clear"></div>
|
||
|
|
</div>
|
||
|
|
</div>
|
||
|
|
<% If TotalPage<>1 Then %>
|
||
|
|
<!---------Page Start-------->
|
||
|
|
<div id="list-page">
|
||
|
|
<ul>
|
||
|
|
<%if vPage=1 then%>
|
||
|
|
<li class="pn1">PREV</li>
|
||
|
|
<%else%>
|
||
|
|
<li class="pn2"><a <%if vOrder = "views" then%>href="/video/<%=vTypeP%>/<%=vOrder%>/<%if vPage<>2 then%>index-<%=vPage-1%>.htm<%end if%>"<%else%>href="/video/<%=vTypeP%>/<%if vPage<>2 then%>index-<%=vPage-1%>.htm<%end if%>"<%end if%>>PREV</a></li>
|
||
|
|
<%end if%>
|
||
|
|
<% for i = 1 to TotalPage %>
|
||
|
|
<li <%if vPage = i then%>class="selected"<%end if%>><a <%if vOrder = "views" then%>href="/video/<%=vTypeP%>/<%=vOrder%>/<%if i<>1 then%>index-<%=i%>.htm<%end if%>"<%else%>href="/video/<%=vTypeP%>/<%if i<>1 then%>index-<%=i%>.htm<%end if%>"<%end if%>><%=i%></a></li>
|
||
|
|
<%next
|
||
|
|
if vPage=TotalPage then%>
|
||
|
|
<li class="pn1">NEXT</li>
|
||
|
|
<%else%>
|
||
|
|
<li class="pn2"><a <%if vOrder = "views" then%>href="/video/<%=vTypeP%>/<%=vOrder%>/index-<%=vPage+1%>.htm"<%else%>href="/video/<%=vTypeP%>/index-<%=vPage+1%>.htm"<%end if%>>NEXT</a></li>
|
||
|
|
<%end if%>
|
||
|
|
</ul>
|
||
|
|
</div>
|
||
|
|
<!---------Page End-------->
|
||
|
|
<% End If %>
|
||
|
|
|
||
|
|
</div>
|
||
|
|
<div class="col-md-5 col-sm-5 col-xs-24 pull-left">
|
||
|
|
<!--#include virtual="/video/left.asp" -->
|
||
|
|
</div>
|
||
|
|
</div>
|
||
|
|
</div>
|
||
|
|
<!--#include virtual="/include/footer-html5.asp" -->
|
||
|
|
</div>
|
||
|
|
</body>
|
||
|
|
</html>
|