dj.asp

网站整站

<!--#include file="inc/conn.asp"-->
<!--#include file="inc/set.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="inc/inc.asp"-->
<!--#include file="inc/code_dj.asp"-->
<%
'//版权所有：野草设计

'//程序作者：野草

'//当前版本：V2.0

'//联系QQ：94440079

'//官方网站：http://www.yecaoweb.com
%>
<%
title=indexname(3)
execute(loadskin(skinmode))
call NowWhere(indexname(3),"dj.asp")
call head()
%>
<table  border="0"  cellspacing="0" cellpadding="0" id="content">
<tr><td  valign="top" align="center" id="left" nowrap>
<table border="0" cellspacing="0" cellpadding="0"  width="100%"><tr>
<td class="1" nowrap></td><td  class="2" align="center"  nowrap>
<%call myday()%>
<td class="3" nowrap></td></td></tr></table>
<table border="0"   cellspacing="0" cellpadding="0"  width="100%"><tr>
<td class="4" nowrap></td>
<td  class="5" valign="top" nowrap>
<p class="left_title"><script type="text/javascript">yecaotitle("left","娱乐统计","0");</script></p>
<div class="left_content"><%=YC_count("YC_dj","娱乐")%></div>
<p class="left_title"><script type="text/javascript">yecaotitle("left","娱乐搜索","0");</script></p>
<div class="left_content"><%call YC_search("1","搜索娱乐")%></div>
<p class="left_title"><script type="text/javascript">yecaotitle("left"," 娱乐分类","0");</script></p>
<div class="left_content"><%call yecaoclass("YC_djclass","dj")%></div>
<p class="left_title"><script type="text/javascript">yecaotitle("left","点击排行","0");</script></p>
<div class="left_content"><%call YC_click("YC_dj","showdj.asp")%></div>
<p class="left_title"><script type="text/javascript">yecaotitle("left","本站推荐","0");</script></p>
<div class="left_content"><%call YC_best("YC_dj","showdj.asp")%></div>
</td><td class="6" nowrap></td></tr></table>
<table border="0" cellspacing="0" cellpadding="0"  width="100%">
<tr>
<td  class="7" nowrap></td>
<td class="8" nowrap></td>
<td class="9" nowrap></td>
</tr></table>
</td>
<td id="center" nowrap></td>
<td valign="top" align="center"  id="right" nowrap>
<table border="0"   cellspacing="0" cellpadding="0"  width="100%"><tr>
<td class="11" nowrap></td>
<td  class="22" nowrap>
<%
YC("&nbsp;当前位置：<a href=index.asp>本站首页</a>→<a href=""dj.asp"">"&indexname(3)&"</a>")
if request.querystring("action")="small" then
YC("→")
YC(mybigclass("YC_djclass","dj",request.querystring("id")))
elseif request.querystring("action")="list" then
YC("→")
YC(requestbigclass("YC_djclass","dj",request.querystring("class")))
YC("→")
YC(myclass("YC_djclass","dj",request.querystring("class")))
end if
%>
</td><td class="33" nowrap></td></tr></table>

<table border="0" cellspacing="0" cellpadding="0"  width="100%"><tr>
<td class="44" nowrap></td>
<td  class="55" valign="top" nowrap>
<%
select case request.querystring("action")
case""
call bigclass("YC_djclass","dj")
case"small"
call smallclass("YC_djclass","dj",request.querystring("id"))
case"list"
YC("<table border='1' width='100%' bordercolor='"&color(0)&"' align='center' frame='void'>")
sql="select * from [YC_dj] where  class="&request.querystring("class")&" order by id DESC"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
rs.pagesize=cint(yecaopage(3))
i=1
mypage=request("page")
if mypage="" then
mypage=1
else
mypage=cint(mypage)
end if
pages=rs.pagecount
rs.absolutepage=mypage

if not rs.bof and not rs.eof then
YC("<tr height='24' bgcolor='"&color(2)&"'>")
YC("<td width='70%' align='center'>标 题")
YC("</td>")
YC("<td width='10%' align='center' nowrap>点 击")
YC("</td>")
YC("<td width='20%' align='center' nowrap>发表时间")
YC("</td>")
YC("</tr>")
do while not rs.eof
YC("<tr height='24' bgcolor='"&color(1)&"' onmouseover=""this.bgColor='"&color(2)&"';"" onmouseout=""this.bgColor='"&color(1)&"';"">")
YC("<td>")
YC("<ul class='list'><li><a href='showdj.asp?id="&rs("id")&"' target='dj' TITLE='发布人："&rs("user")&"'>"&YC_cut(rs("title"),30)&"</a>")
if rs("best")=1 then
YC("『<font color=red>推荐</font>』")
end if
YC("</li></ul></td>")
YC("<td align='center' nowrap bgcolor='"&color(2)&"'>"&rs("click")&"")
YC("</td>")
YC("<td nowrap>&nbsp;"&replacetime(rs("date"),"1")&"")
YC("</td>")
YC("</tr>")

i=i+1
if i=rs.pagesize then
   exit do 
end if
rs.movenext
loop
end if
if rs.eof and rs.bof then
YC("<tr height='60' bgcolor='"&color(1)&"'><td colspan='4' align='center'>")
YC("<br/ ><center>暂无数据……</center><br />")
YC("</td</tr></tbody>")
else
YC("<tbody><tr height='24' bgcolor='"&color(2)&"'><td colspan='4' align='center'>")
call page("娱乐","个")
YC("</td</tr>")
end if
YC("</table>")
rs.close
set rs=nothing
case else
call bigclass("YC_djclass","dj")
end select
%>
<td class="66" nowrap></td></tr></table>
<table border="0" cellspacing="0" cellpadding="0"  width="100%"><tr>
<td  class="77" nowrap></td>
<td class="88" nowrap></td>
<td class="99" nowrap></td>
</tr></table>
</td></tr></table>
<%call foot()%>