list.asp

65353音乐网 v1.1

<!-- #include file="include/config.asp" -->
<%
call cid_sid()
select case action
case "good"
  tit="推荐文章"
case "hot"
  tit="热门文章"
case "search"
  tit="文章搜索"
case else
  if int(cid)<1 then call format_redirect("index.asp")
  if action<>"more" then action=""
'获取文章分类  
  Call GetSortName()
end select
%>
<!-- #include file="../include/jk_pagecute.asp" -->
<!-- #include file="../include/jk_page_cute.asp" -->
<!-- #include file="../include/jk_keyes.asp" -->
<%
dim nummer,rssum,page,viewpage,thepages,pageurl
nummer=dim_num(0)
pageurl="?action="&action&"&c_id="&cid&"&s_id="&sid&"&"

call web_head(0,0,0,0,0)
'----------------------------左边 开始----------------------------
call article_left_sort(tit,0)
call article_left2("hot",cid,sid,10,12,"本类热门文章")
call article_left2("good",cid,sid,10,12,"本类推荐文章")
'----------------------------左边 结束----------------------------
call web_center(0)
'----------------------------中间 开始----------------------------
'call article_bar_top("文章分类",sort_type("list.asp?",0,0),"")

select case action
case "more","good","hot","search"
  call article_more(nummer,30,tit)
case else
  if cint(sid)<1 then
    call article_list(6,30)
  else
    call article_more(nummer,30,tit)
  end if
end select

call article_bar_top("文章搜索",article_search_list("文章"),"")
'----------------------------中间 结束----------------------------
call article_end()
call web_end(0,0)


%>