index.asp

打开目录ads文件夹 找到top_ads.js文件 用记事本打开后就可以看到: -------------------------------------- var head_ads_tx

    </table></td>
    <td width="779" align="left" valign="top"><table width="755" border="0" align="right" cellpadding="0" cellspacing="0">
      <tr>
        <td align="left" valign="top"><a href="forum.asp"><img src="skin/skin_1/ltxt.gif" width="755" height="30" border="0"></a></td>
      </tr>
      <tr>
        <td height="253" align="left" valign="top" bgcolor="#E1F4F6"><table width="100%" border="0" cellspacing="5" cellpadding="0">
          <tr>
            <td width="240" align="left" valign="middle" background="skin/skin_1/reading46.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="19"> </td>
                <td width="47%" align="left" valign="bottom" class="zitil">休闲综合区</td>
                <td width="48%" align="right" valign="middle"><span class="STYLE3"><a href="forum_list.asp?forum_id=74">more<span class="STYLE5">>></span></a></span></td>
              </tr>
            </table></td>
            <td width="240" height="30" align="left" valign="middle" background="skin/skin_1/reading46.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="19"> </td>
                <td width="47%" align="left" valign="bottom" class="zitil">网络资源区</td>
                <td width="48%" align="right" valign="middle"><span class="STYLE3"><a href="forum_list.asp?forum_id=73">more<span class="STYLE5">>></span></a></span></td>
              </tr>
            </table></td>
            <td width="240" align="left" valign="middle" background="skin/skin_1/reading46.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="19"> </td>
                <td width="47%" align="left" valign="bottom" class="zitil">文学交流区</td>
                <td width="48%" align="right" valign="middle"><span class="STYLE3"><a href="forum_list.asp?forum_id=75">more<span class="STYLE5">>></span></a></span></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td width="240" align="left" valign="top">
			<%
			sub main_center_list5(cl_type,cl_tnum,cl_cnum,cl_classid)
  dim tmp1,tmp_title,tmp_tit,tmp_count,tmp_img,tmp_record,tmp_table,tmp_where,tmp_url,tmp_color,tmp_name
  tmp_img=cl_type
  tmp_where="hidden=1"
  if cl_classid>0 then tmp_where=tmp_where&" and s_id="&cl_classid
  select case cl_type
  case "forum"
    cl_type="forum"
    tmp_title="forum"
    tmp_tit="论坛标题"
    tmp_count="论坛回复"
    tmp_img="forum"
    tmp_table="bbs_topic"
    tmp_record="id,topic,username,tim,re_counter,tcolor,forum_id"
    tmp_where="forum_id<>999999999"
  end select
  sql="select top "&cl_tnum&" "&tmp_record&" from "&tmp_table&" where forum_id=64 or forum_id=65 or forum_id=66 or forum_id=79 order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
    tmp_url=cl_type&"_view.asp?id="&rs(0)
    if cl_type="forum" then
      tmp_url=cl_type&"_view.asp?forum_id="&rs(6)&"&view_id="&rs(0)
    end if
    if cl_type="article" or cl_type="news" or cl_type="forum" then 
      tmp_color="style=""color:"&rs(5)&";"""
	end if 
    tmp1=tmp1&vbcrlf&"<tr><td height="&dim_num(6)&">&nbsp;&nbsp;"&img_skin("h_"&tmp_img)&"<a href='"&tmp_url&"' "&tmp_color&" alt='"&tmp_tit&"："&joekoe_cms.code_html(rs(1),1,0)&"<br>发 布 人："&rs(2)&"<br>"&tmp_count&"："&rs(4)&" 人次<br>整理时间："&rs(3)&"' target=_blank>"&joekoe_cms.code_html(rs(1),1,cl_cnum)&"</a></td></tr>"
    rs.movenext
  loop
  rs.close
  response.write "<table border=0 cellspacing=0 cellpadding=2 width='100%'>"&tmp1&vbcrlf&"</table>"
end sub
			%><%call main_center_list5("forum",10,18,0)%></td>
            <td width="240" height="204" align="left" valign="top"><%
			sub main_center_list6(cl_type,cl_tnum,cl_cnum,cl_classid)
  dim tmp1,tmp_title,tmp_tit,tmp_count,tmp_img,tmp_record,tmp_table,tmp_where,tmp_url,tmp_color,tmp_name
  tmp_img=cl_type
  tmp_where="hidden=1"
  if cl_classid>0 then tmp_where=tmp_where&" and s_id="&cl_classid
  select case cl_type
  case "forum"
    cl_type="forum"
    tmp_title="forum"
    tmp_tit="论坛标题"
    tmp_count="论坛回复"
    tmp_img="forum"
    tmp_table="bbs_topic"
    tmp_record="id,topic,username,tim,re_counter,tcolor,forum_id"
    tmp_where="forum_id<>999999999"
  end select
  sql="select top "&cl_tnum&" "&tmp_record&" from "&tmp_table&" where forum_id=86 or forum_id=61 or forum_id=62 or forum_id=63 or forum_id=80 or forum_id=85 order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
    tmp_url=cl_type&"_view.asp?id="&rs(0)
    if cl_type="forum" then
      tmp_url=cl_type&"_view.asp?forum_id="&rs(6)&"&view_id="&rs(0)
    end if
    if cl_type="article" or cl_type="news" or cl_type="forum" then 
      tmp_color="style=""color:"&rs(5)&";"""
	end if 
    tmp1=tmp1&vbcrlf&"<tr><td height="&dim_num(6)&">&nbsp;&nbsp;"&img_skin("h_"&tmp_img)&"<a href='"&tmp_url&"' "&tmp_color&" alt='"&tmp_tit&"："&joekoe_cms.code_html(rs(1),1,0)&"<br>发 布 人："&rs(2)&"<br>"&tmp_count&"："&rs(4)&" 人次<br>整理时间："&rs(3)&"' target=_blank>"&joekoe_cms.code_html(rs(1),1,cl_cnum)&"</a></td></tr>"
    rs.movenext
  loop
  rs.close
  response.write "<table border=0 cellspacing=0 cellpadding=2 width='100%'>"&tmp1&vbcrlf&"</table>"
end sub
			%>
              <%call main_center_list6("forum",10,18,0)%></td>
            <td width="240" height="204" align="left" valign="top"><%
			sub main_center_list8(cl_type,cl_tnum,cl_cnum,cl_classid)
  dim tmp1,tmp_title,tmp_tit,tmp_count,tmp_img,tmp_record,tmp_table,tmp_where,tmp_url,tmp_color,tmp_name
  tmp_img=cl_type
  tmp_where="hidden=1"
  if cl_classid>0 then tmp_where=tmp_where&" and s_id="&cl_classid
  select case cl_type
  case "forum"
    cl_type="forum"
    tmp_title="forum"
    tmp_tit="论坛标题"
    tmp_count="论坛回复"
    tmp_img="forum"
    tmp_table="bbs_topic"
    tmp_record="id,topic,username,tim,re_counter,tcolor,forum_id"
    tmp_where="forum_id<>999999999"
  end select
  sql="select top "&cl_tnum&" "&tmp_record&" from "&tmp_table&" where forum_id=67 or forum_id=68 or forum_id=69 order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
    tmp_url=cl_type&"_view.asp?id="&rs(0)
    if cl_type="forum" then
      tmp_url=cl_type&"_view.asp?forum_id="&rs(6)&"&view_id="&rs(0)
    end if
    if cl_type="article" or cl_type="news" or cl_type="forum" then 
      tmp_color="style=""color:"&rs(5)&";"""
	end if 
    tmp1=tmp1&vbcrlf&"<tr><td height="&dim_num(6)&">&nbsp;&nbsp;"&img_skin("h_"&tmp_img)&"<a href='"&tmp_url&"' "&tmp_color&" alt='"&tmp_tit&"："&joekoe_cms.code_html(rs(1),1,0)&"<br>发 布 人："&rs(2)&"<br>"&tmp_count&"："&rs(4)&" 人次<br>整理时间："&rs(3)&"' target=_blank>"&joekoe_cms.code_html(rs(1),1,cl_cnum)&"</a></td></tr>"
    rs.movenext
  loop
  rs.close
  response.write "<table border=0 cellspacing=0 cellpadding=2 width='100%'>"&tmp1&vbcrlf&"</table>"
end sub
			%>
              <%call main_center_list8("forum",10,18,0)%></td>
          </tr>
        </table></td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="925" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="5"> </td>
  </tr>
</table>
<table width="925" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="146" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td colspan="2" align="left" valign="middle"><img src="skin/skin_1/reading_user.gif" width="155" height="41"></td>
      </tr>
      <tr>
        <td width="5%" height="247" align="left" valign="top"> </td>
        <td width="95%" height="247" align="left" valign="top" class="tjbk"><%sub main_left_user()
sql="select top 14 id,username,bbs_counter,tim from user_data where hidden=1 order by bbs_counter desc,id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
response.write vbcrlf&"<table border=0 cellspacing=0 class=table><tr><td height="&dim_num(6)&" align=left width='4%'></td><td height="&dim_num(6)&" width='50%' align=left><p><img src='images/top.gif' border=0 align=absMiddle><a href='user_view.asp?username="&rs("username")&"' alt='查看 "&rs("username")&" 的详细资料' target=_blank>"&rs("username")&"</a></p></td><td height="&dim_num(6)&" width='30%' align=right><p><font class=red>"&rs("bbs_counter")&"</font>帖</p></td></tr></table>"
rs.movenext
loop
rs.close
end sub
%>
              <%call main_left_user()%>
        </td>
      </tr>
    </table></td>
    <td width="779" align="left" valign="top"><table width="755" border="0" align="right" cellpadding="0" cellspacing="0">
      <tr>
        <td align="left" valign="top"><a href="photo.asp"><img src="skin/skin_1/wlxc.gif" width="755" height="30" border="0"></a></td>
      </tr>
      <tr>
        <td height="117" align="left" valign="middle" bgcolor="#E1F4F6">
		<!-- #include file="include/photo.inc" -->
		</td>
      </tr>
      <tr>
        <td height="26" align="left" valign="top" bgcolor="#E1F4F6"><a href="gallery.asp"><img src="skin/skin_1/jctt.gif" width="755" height="30" border="0"></a></td>
      </tr>
      <tr>
        <td height="113" align="left" valign="middle" bgcolor="#E1F4F6">
		<%
		sub main_center_pic1(cs_tnum,cs_cnum)
dim tmp1,tmp_topic,tmp_url,temp_tit
tmp1=vbcrlf&"<tr align=center>"
 sql="select top "&cs_tnum&" id,name,spic from gallery where hidden=1 and types='paste' order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
tmp_topic=rs(1)
tmp_url="gallery_view.asp?id="&rs(0)
tmp1=tmp1&vbcrlf&"<td>" & _
vbcrlf&" <table border=0 cellspacing=0 cellpadding=0 class=table>" & _
vbcrlf&" <tr><td align=center>"&pic_fk(rs("spic"),1,tmp_url)&"</td></tr>" & _
vbcrlf&" <tr><td align=center height="&dim_num(6)&"><a href='"&tmp_url&"' target=_blank>"&joekoe_cms.code_html(tmp_topic,1,cs_cnum)&"</a></td></tr>" & _
vbcrlf&" </table>" & _
vbcrlf&"</td>"
rs.movenext
loop
rs.close
tmp1=tmp1&vbcrlf&"</tr>"
tmp1="<table border=0 cellspacing=0 cellpadding=0 width='100%'>"&tmp1&vbcrlf&"</table>"
response.write vbcrlf&"<table cellspacing=0 cellpadding=0>" & _
vbcrlf&"<tr><td> "&temp_tit&"</td></tr>" & _
vbcrlf&"<tr><td align=center><div id=demo style=overflow:hidden;height:130;width:750>"& _
vbcrlf&"<table align=left cellpadding=0 cellspace=0 border=0>"& _
vbcrlf&"<td id=demo1 valign=top>"&tmp1&"</td>"& _
vbcrlf&"<td id=demo2 valign=top></td></tr></table>"& _
vbcrlf&"</div>"& _
vbcrlf&"</td></tr>" & _
vbcrlf&"<table border=0 cellspacing=0 cellpadding=0 class=table>" & _

vbcrlf&"</table>"&ukong
end sub
		%><%call main_center_pic1(7,8)%>
		</td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="925" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td> </td>
  </tr>
</table>
<table width="925" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="569" height="111" align="left" valign="top"><table width="569" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="23" colspan="3" align="left" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td align="left" valign="top"><a href="video.asp"><img src="skin/skin_1/ys1.gif" width="283" height="46" border="0"></a></td>
            <td align="left" valign="top"><a href="music.asp"><img src="skin/skin_1/yy.gif" width="286" height="46" border="0"></a></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td width="11" height="178" align="left" valign="top" background="skin/skin_1/ysleft.gif"><img src="skin/skin_1/ysleft.gif" width="11" height="11"></td>
        <td width="551" align="left" valign="top" bgcolor="#EFFFA5"><table width="545" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="270" height="103" align="center" valign="top" bgcolor="#EFFFA5"><%
		sub main_center_list_pic(cl_type,cl_tnum,cl_cnum,cl_classid)