con_pris.asp

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

<!-- #include file="skin.asp" -->
<!-- #include file="jk_nsort.asp" -->
<!-- #include file="jk_page_cute.asp" -->
<%
dim pageurl,nummer,sqladd,page,rssum,thepages,viewpage,id,c_id,username,keyword,sea_type,types
nummer=5
rssum=0
n_sort="pris"
index_url="pris"
tit_fir=format_menu(index_url)
id=trim(request.querystring("id"))
c_id=trim(request.querystring("c_id"))
if not(isnumeric(id)) then id=0
call cid_sid()
keyword=joekoe_cms.code_form(request.querystring("keyword"))
sea_type=trim(request.querystring("sea_type"))
types=trim(request.querystring("types"))
m_channel=index_url
web_img_m="m_"&m_channel
web_img_h="h_"&m_channel

sub pris_put()
  response.write "<table border=0 width='98%' cellspacing=0 cellpadding=4 align=center>" & _
	    vbcrlf& "<tr><td height=10 width='98%'></td></tr>" & _
	    vbcrlf& "<tr><td align=center><a href='user_put.asp?action=pris'><img src='images/pris/pris_put.gif' alt='发布企业信息' border=0></a></td></tr>" & _
	    vbcrlf& "<tr><td height=7 width='98%'></td></tr>" & _
	    vbcrlf& "</table>"
end sub

sub pris_view()
  call joekoe_cms.exec("update pris set counter=counter+1 where id="&id,0)
  sql="select * from pris where id="&id
  set rs=joekoe_cms.exec(sql,1)
%>
<table cellspacing=1 cellpadding=4>
<tr><td class=bg_td align=center>
  <table border=0 width='100%' class=tf>
  <tr><td class=bw align=center><font size=3 class=blue><b><font class=red>[<%=rs("types")%>]</font><%response.write rs("name")%></b></font></td></tr>
  </table>
</td></tr>
<tr><td height=1 background='images/bg_dian.gif'></td></tr>
<tr><td class=bg_td align=center>
  <table border=0 width='100%'>
  <tr>
  <td width='25%' valign=top><%response.write pic_fk(rs("pic"),1,"")%></td>
 <td width='75%' valign=top>
    <table border=0 width='98%' class=tf>
	<tr>
              <td width='60%'>企业名称：<font class=red><%=rs("name")%></font></td>
              <td width='40%'>企业性质： <font class=red><%=rs("types")%></td>
            </tr>
             <tr>
              <td width='60%'>法人代表：<font class=red><%=rs("fname")%></font></td>
              <td width='40%'>注册资金：<font class=red><%=rs("price")%>万人民币 </td>
            </tr>
			<tr>
              <td width='60%'>成立时间：<font class=red><%=rs("sname")%></font></td>
              <td width='40%'>员工人数：<font class=red><%=rs("yname")%>个人</td>
            </tr>
			<tr>
              <td width='60%'>所在地区：<font class=red><%=rs("dname")%></font></td>
              <td width='40%'>发布时间： <%response.write joekoe_cms.time_type(rs("tim"),4)%></td>
            </tr>
    </table>
    <table border=0 width='98%' class=tf>
    <tr><td class=bw><font class=htd><%response.write joekoe_cms.code_html(rs("remark"),2,0)%></font></td></tr>
    </table>
    <table border=0 width='98%'>
    <tr><td height=30 align=right valign=bottom class=gray>（该信息已被浏览：<%=rs("counter")%>次）</td></tr>
    </table>
  </td>
  </tr>
  </table>
</td></tr>
<tr><td class=td>&nbsp;<%response.write img_skin(web_img_m)%>联系信息（<a href='user_mail.asp?action=msg_write&accept=<%=rs("username")%>' class=ftd target=_blank>短信联系</a>）</td></tr>
<%
if var_null(login_username)="" then
response.write "<tr><td height=40 class=bg_td align=center>"&web_nologin&"</td></tr>"
else
%>
<tr><td class=bg_td align=right>
  <table border=0 width='99%' class=tf>
  <tr>
        <td colspan=2>联系地址：<%=rs("address")%></td>
      </tr>
   <tr><td>邮政编码：<%=rs("yzbm")%></td><td>发 布 人：<a href='user_view.asp?username=<%=rs("username")%>'alt='查看 <%=rs("username")%> 详细信息' target=_blank><%=rs("username")%></td></tr>
  <tr><td>联 系 人：<%=rs("nname")%></td><td>联系电话：<%=rs("phone")%></td></tr>
  <tr><td>电子邮件：<a href='mailto:<%=rs("email")%>'><%=rs("email")%></a></td><td>相关网址：<a href='<%=rs("url")%>'><%=rs("url")%></a></td></tr>
  </table>
</td></tr>
<%
end if
rs.close
%>

<tr><td class=td>&nbsp;<%response.write img_skin(web_img_m)%>相关评论</td></tr>
</table>
<%
end sub

sub pris_list_type()
dim t_color:t_color=" class=tims"
if DateDiff("d",rs("tim"),joekoe_cms.now_time)<3 then t_color=" class=blue"
if DateDiff("d",rs("tim"),joekoe_cms.now_time)<1 then t_color=" class=red"
%>
<tr><td colspan=2 height=23  background="images/pris/bar.gif">
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr><td>&nbsp;
<%response.write img_skin(web_img_h)%>
<b>&nbsp;<a href="pris_view.asp?c_id=<%response.write cid%>&s_id=<%response.write sid%>&id=<%=rs("id")%>" target=_blank><%response.write rs("name")%></a></b><%if rs("pic")<>"" then response.write "&nbsp;<img border=0 src='"&joekoe_cms.web_dir_skin&"small/img.gif' align=absmiddle alt='有图片'>"%></td>
<td align=right class=tims><font<%response.write t_color%>><%response.write joekoe_cms.time_type(rs("tim"),4)%></font>&nbsp;&nbsp;</td></tr>
    </table>
  </td></tr>
  <tr><td colspan=2 align=center class=bg_td>
    <table border=0 width='99%' class=bw>
    <tr><td class=tf><font class=htd><%response.write joekoe_cms.code_html(rs("remark"),1,150)%> <font class=gray>[<a href='javascript:;' onclick="javascript:open_view('pris_view.asp?c_id=<%response.write cid%>&s_id=<%response.write sid%>&id=<%=rs("id")%>',1);" alt='点击浏览更详细的企业信息'>详细企业信息</a>]</font></font></td></tr>
    </table>
  </td></tr>
  <tr class=bg><td colspan=2 align=center>
    <table border=0 width='99%'>
    <tr>
 <td align=right>联系人：<a href='user_view.asp?username=<%=rs("username")%>'alt='查看 <%=rs("username")%> 详细信息' target=_blank><%=rs("nname")%></a>&nbsp;
 <%if var_null(login_username)="" then%>
 <font class=gray>注册登陆后查看更详细的企业信息</font>
 <%else%>
 电子邮件：<a href='mailto:<%=rs("email")%>'><%=rs("email")%></a>&nbsp;电话：<%=rs("phone")%>
 <%end if%>
 </td></tr>
</table></td></tr>
<tr><td background="images/bg_dian.gif" height=1></td></tr>
<%
end sub

sub pris_main(f_title,ft,c_num,f_num)
dim i,ii:ii=0
  select case ft
  case "hot"
    sql=" order by counter desc,id desc"
  case "good"
    sql=" and isgood=1 order by id desc"
  case else
    sql=" order by id desc"
  end select
%>
<table class=table>
<tr><td class=td>&nbsp;<%response.write img_skin(web_img_m)%>&nbsp;<%response.write f_title%></td></tr>
<tr class=bg_td><td>
<table border=0 cellspacing=0 cellpadding=2 width='100%'>
<%
  sql="select top "&c_num&" id,c_id,name,counter from pris where hidden=1"&sql
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof 
  response.write "<tr>"
  for i=1 to 2
  if rs.eof then exit for
%>
<td>
<%response.write img_skin(web_img_h)%>
<a href="pris_view.asp?c_id=<%response.write rs("c_id")%>&s_id=<%response.write sid%>&id=<%response.write rs("id")%>" alt='<%response.write joekoe_cms.code_js(joekoe_cms.code_html(rs("name"),1,0),1)%>' target=_blank>
<%response.write joekoe_cms.code_js(joekoe_cms.code_html(rs("name"),1,f_num),1)%></a></td>
<%
  ii=ii+1
  rs.movenext
  next
  response.write "</tr>"
  loop
  rs.close
%>
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr><td align=right><a href="pris_list.asp?action=<%response.write ft%>">浏览更多…</a>&nbsp;</td></tr>
</table></td></tr></table>
<%
end sub

sub pris_search()
%>
<table cellspacing=1 cellpadding=2 width='98%'>
<tr><td width=288 height=25 align=left background='<%response.write joekoe_cms.web_dir_skin%>/bg_td.gif' border=0><b><font color=ffffff>&nbsp;<img src='<%response.write joekoe_cms.web_dir_skin%>small/m_pris.gif'> 企业搜索</font></b></td></tr>
</table>
      <table cellspacing=0 cellpadding=2 width="100%" border=0 class=bg_td>
        <tr align=middle>