%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Language = "C"
sortid = Request("sortid")
function ThisSort( id ,ThisId )
linkClass = ""
if id = ThisId then
linkClass = "fa"
end if
ThisSort = "class="&linkClass
end function
%>
<%
sql2 = " select NS_ID from NewsSort_"&Language&" where NS_Parentid = 21 "
if sortid = "" then
sql="select * from News where N_Language='"&Language&"' and N_sortid in("&sql2&") order by N_id desc"
else
sql="select * from News where N_Language='"&Language&"' and N_sortid= "&sortid&" order by N_id desc"
end if
set rs=createobject("adodb.recordset")
rs.open sql,conn,1,1
if not rs.eof then
rs.pagesize=6
%>
<%
i = 1
While Not rs.Eof And i<=rs.pagesize
%>