index.asp

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

  dim tmp1,tmp2,tmp_title,tmp_tit,tmp_count,tmp_img,tmp_record,tmp_tab,tmp_table,tmp_whe,tmp_where,tmp_url,tmp_topic,tmp_name
  dim i:i=0
  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 "shop"
    tmp_title="shop"
	tmp_tit="商品名称"
	tmp_name="发 布 人"
	tmp_count="定购次数"
	tmp_table="shop_product"	
    tmp_record="id,name,brand,tim,counter,smallimg"
	tmp_whe=" and isgood=1"
  case "flea"
    tmp_title="flea"
	tmp_tit="市场信息"
	tmp_name="发 布 人"
	tmp_count="浏览次数"
	tmp_table="flea"	
    tmp_record="id,name,username,tim,counter,pic"
	tmp_whe=" and isgood=1"
  case "down"
    tmp_title="down"
    tmp_tit="软件名称"
	tmp_name="发 布 人"
    tmp_count="下载次数"
    tmp_table="down"
    tmp_record="id,name,username,tim,counter,pic"
	tmp_whe=" and types=5"
  case "news"
    tmp_title="news"
    tmp_tit="新闻标题"
	tmp_name="发 布 人"
    tmp_count="浏览次数"
    tmp_table="news"
    tmp_record="id,topic,username,tim,counter,pic"
    tmp_img="article"
	tmp_whe=" and ispic=1"
  case "flea"
    tmp_title="跳蚤市场"
    tmp_tit="跳蚤市场"
	tmp_name="发 布 人"
    tmp_count="浏览次数"
    tmp_table="flea"
    tmp_record="id,topic,username,tim,counter,pic"
    tmp_img="article"
    tmp_where="c_id>0"
    if cl_classid>0 then tmp_where="c_id="&cl_classid
  case "video"
    tmp_title="video"
    tmp_tit="影视名称"
	tmp_name="影片主演"
    tmp_count="浏览次数"
    tmp_table="video"
    tmp_record="id,name,role,tim,counter,pic"
    tmp_img="video"
	tmp_whe=" and star=5"
  case else
    cl_type="music_disk"
    tmp_title="music"
    tmp_tit="专辑名称"
	tmp_name="专辑歌手"
    tmp_count="浏览次数"
    tmp_table="music_disk"
    tmp_record="id,name,singer,tim,hits,pic"
    tmp_img="music_disk"
	tmp_whe=" and istop=1"
  end select
    sql="select top 1 "&tmp_record&" from "&tmp_table&" where "&tmp_where&tmp_whe&" order by id desc"
    set rs=joekoe_cms.exec(sql,1)
    if not rs.eof then
    tmp1=tmp1&vbcrlf&"<tr align=center>" & _
           vbcrlf&"<td width='35%'>"&pic_fk(rs(5),4,""&cl_type&"_view.asp?id="&rs(0))&"</td>" & _
           vbcrlf&"<td width='65%'>" & _
           vbcrlf&"<table border=0 width='100%' class=tf>" & _
           vbcrlf&"<tr><td><b><a href='"&cl_type&"_view.asp?id="&rs(0)&"' alt='"&rs(1)&"'>"&joekoe_cms.code_html(rs(1),1,cl_cnum)&"</a></b></td></tr>" & _
           vbcrlf&"<tr><td>发布时间："&joekoe_cms.time_type(rs(3),4)&"</td></tr>" & _
           vbcrlf&"<tr><td>"&tmp_name&"：<font class=red2 alt='"&joekoe_cms.code_html(rs(2),1,0)&"'>"&joekoe_cms.code_html(rs(2),1,cl_cnum)&"</font></td></tr>" & _
           vbcrlf&"</table>" & _
           vbcrlf&"</td>" & _
           vbcrlf&"</tr>"
   end if
  rs.close
  tmp1="<table border=0 cellspacing=0 cellpadding=1 width='100%'>"&tmp1&"</table>"
  sql="select top "&cl_tnum&" "&tmp_record&" from "&tmp_table&" where "&tmp_where&" 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 i mod 2=0 then tmp2=tmp2&vbcrlf&"<tr>"
    tmp2=tmp2&vbcrlf&"<td height="&dim_num(6)&">&nbsp;&nbsp;&nbsp;&nbsp;"&img_skin("h_"&tmp_img)&"<a href='"&tmp_url&"' alt='"&tmp_tit&"："&joekoe_cms.code_html(rs(1),1,0)&"<br>"&tmp_name&"："&rs(2)&"<br>"&tmp_count&"："&rs(4)&" 人次<br>整理时间："&rs(3)&"' target=_blank>"&joekoe_cms.code_html(rs(1),1,cl_cnum)&"</a></td>"
	if i+1 mod 2=0 then tmp2=tmp2&vbcrlf&"</tr>"
    if i=1 then tmp2=tmp2&vbcrlf&"<tr><td height=1></td></tr>"
    rs.movenext
	i=i+1
  loop
  rs.close
  tmp2="<table border=0 cellspacing=0 cellpadding=0 width='100%'><tr height=3><td width='50%'></td><td width='50%'></td></tr>"&tmp2&"</table>"
  response.write vbcrlf&"<table border=0 cellspacing=0 cellpadding=0 width='100%'><tr><td height=5></td></tr><tr align=center><td>"&tmp1&"</td></tr>" & _
                 vbcrlf&"<tr align=center><td>"&tmp2&"</td></tr>" & _
                 vbcrlf&" <table border=0 cellspacing=0 cellpadding=0 class=table>" & _
                 vbcrlf&"</table>"&ukong
end sub

		%><%call main_center_list_pic("video",16,8,0)%></td>
            <td width="270" align="center" valign="top" bgcolor="#EFFFA5"><%call main_center_list_pic("music_disk",16,8,0)%></td>
          </tr>
        </table></td>
        <td width="7" align="right" valign="top" background="skin/skin_1/ysright.gif"><img src="skin/skin_1/ysright.gif" width="11" height="13"></td>
      </tr>
      <tr>
        <td height="13" colspan="3" align="left" valign="top"><img src="skin/skin_1/ysdi.gif" width="569" height="16"></td>
      </tr>
    </table></td>
    <td width="356" align="left" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="13" align="left" valign="top"><a href="down.asp"><img src="skin/skin_1/000001_code.gif" width="355" height="25" border="0"></a></td>
      </tr>
      <tr>
        <td height="213" align="center" valign="top"><%call main_center_list_pic("down",20,12,0)%></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="2" height="111" align="left" valign="top"><img src="skin/skin_1/bt.gif" width="2" height="3"></td>
    <td width="559" align="left" valign="top"><table width="569" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="23" colspan="3" align="left" valign="top"><a href="gallery.asp?types=flash"><img src="skin/skin_1/dm.gif" width="569" height="46" border="0"></a></td>
      </tr>
      <tr>
        <td width="8" height="178" rowspan="2" align="left" valign="top" background="skin/skin_1/dmleft.gif"><img src="skin/skin_1/dmleft.gif" width="8" height="13"></td>
        <td width="553" height="76" align="center" valign="top" bgcolor="#E1E369">
		<%
		sub main_center_pic2(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='flash' 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>"& _
vbcrlf&"<table align=left cellpadding=0 cellspace=0 border=0>"& _
vbcrlf&"<td id=demo4 valign=top>"&tmp1&"</td>"& _
vbcrlf&"<td id=demo5 valign=top></td></tr></table>"& _
vbcrlf&"</td></tr>" & _
vbcrlf&"<table border=0 cellspacing=0 cellpadding=0 class=table>" & _
vbcrlf&"</table>"&ukong
end sub
		%><%call main_center_pic2(5,8)%></td>
        <td width="8" rowspan="2" align="right" valign="top" background="skin/skin_1/dmright.gif"><img src="skin/skin_1/dmright.gif" width="8" height="11"></td>
      </tr>
      <tr>
        <td height="100" align="center" valign="top" bgcolor="#E1E369"><%
		sub main_center_pic10(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='flash' and istop=1 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>"& _
vbcrlf&"<table align=left cellpadding=0 cellspace=0 border=0>"& _
vbcrlf&"<td id=demo4 valign=top>"&tmp1&"</td>"& _
vbcrlf&"<td id=demo5 valign=top></td></tr></table>"& _
vbcrlf&"</td></tr>" & _
vbcrlf&"<table border=0 cellspacing=0 cellpadding=0 class=table>" & _
vbcrlf&"</table>"&ukong
end sub
		%>
          <%call main_center_pic10(5,8)%></td>
      </tr>
      <tr>
        <td height="13" colspan="3" align="left" valign="top"><img src="skin/skin_1/dmdi.gif" width="569" height="13"></td>
      </tr>
    </table></td>
    <td width="356" align="left" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="13" align="left" valign="top"><a href="flea.asp"><img src="skin/skin_1/tz.gif" width="355" height="25" border="0"></a></td>
      </tr>
      <tr>
        <td height="213" align="center" valign="top"><%call main_center_list_pic("flea",22,11,0)%></td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="925" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td align="left" valign="top"><a href="links.asp"><img src="skin/skin_1/lianjie.gif" width="925" height="26" border="0"></a></td>
  </tr>
  <tr>
    <td align="left" valign="top"><script language=javascript src='style/data_link_fir.js'></script></td>
  </tr>
</table></td>
              </tr>

               </td>
          </tr>
        </table></td>
      </tr>
    </table></td>
  </tr>
</table>
<%
'---------------------------------center end-------------------------------
call web_end(0,0)
%>