user_main.asp

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

<!-- #include file="include/con_user.asp" -->
<!-- #include file="include/jk_ubb.asp" -->
<%
dim tmp1,tmp2
tit=tit_fir&"（"&login_username&"）"
tit_fir=""

call web_head(2,0,0,0,0)
'----------------------------左边 开始----------------------------
call user_left("")
'----------------------------左边 结束----------------------------
call web_center(0)
'----------------------------中间 开始----------------------------
call user_my()

response.write ukong
'----------------------------中间 结束----------------------------
call web_end(0,0)

sub user_my()
  dim lt_num
  sql="select count(id) from user_data where lentim>"&login_lentim
  set rs=joekoe_cms.exec(sql,1)
  if not rs.eof then lt_num=rs(0)+1
  rs.close
  dim tim_login
  tim_login=0
  sql="select top 1 l_tim_login from user_login where l_username='"&login_username&"'"
  set rs=joekoe_cms.exec(sql,1)
  if not rs.eof then tim_login=rs(0)
  rs.close
  sql="select top 1 * from user_data where id="&login_id
  set rs=joekoe_cms.exec(sql,1)
%>
<table cellspacing=1 cellpadding=4 class=table>
<tr><td class=td0 colspan=3>&nbsp;<%response.write img_skin("m_user")%>用户个人信息（<%response.write login_username%>）</td></tr>
<tr class=bg_td height=30>
<td width='20%'>用户名称：</td>
<td width='40%'><font class=blue><b><%response.write login_username%></b></font></td>
<td width='40%' rowspan=9 align=center><%response.write format_user_face(rs("face"),rs("face_w"),rs("face_h"))%></td>
</tr>
<tr class=bg_td height=25>
<td>用户类型：</td>
<td><font class=red_3><%response.write format_power(rs("power"),1)%></font>&nbsp;&nbsp;&nbsp;&nbsp;<%if int(rs("estate"))=1 then%><font class=blue>（过期时间：<%response.write rs("otim")%>）</font><%end if%></td>
</tr>
<tr class=bg_td>
<td>用户性别：</td>
<td><%
  tit=rs("sex")
  if tit=false then
    response.write img_skin("girl")&"&nbsp;"&web_n_girl
  else
    response.write img_skin("boy")&"&nbsp;"&web_n_boy
  end if
%></td>
</tr>
<tr class=bg_td height=25>
<td>用户头衔：</td>
<td><%
  tmp1=rs("nname")
  if var_null(tmp1)="" then
    response.write "<font class=gray>没有</font>"
  else
    response.write ""&joekoe_cms.code_html(tmp1,1,0)
  end if
%></td>
</tr>
<tr class=bg_td>
<td>注册时间：</td>
<td><%response.write joekoe_cms.time_type(rs("tim"),5)%></td>
</tr>
<tr class=bg_td>
<td>论坛发贴：</td>
<td><font class=red><%response.write rs("bbs_counter")%></font>&nbsp;贴</td>
</tr>
<tr class=bg_td>
<td>社区积分：</td>
<td><font class=red><%response.write rs("integral")%></font>&nbsp;分</td>
</tr>
<tr class=bg_td>
<td>虚拟货币：</td>
<td><%response.write img_emoney%>&nbsp;<font class=red2><%response.write rs("emoney")%></font>&nbsp;<%response.write joekoe_cms.web_unit%></td>
</tr>
<tr class=bg_td>
<td>来自哪里：</td>
<td><%response.write joekoe_cms.code_html(rs("whe"),1,0)%></td>
</tr>
<tr class=bg_td>
<td>出生年月：</td>
<td><%response.write rs("birthday")%></td>
<td align=center>您已登陆 <font class=red><% response.write DateDiff("n",tim_login,now()) %></font> 分钟</td>
</tr>
<tr class=bg_td>
<td>在线排名：</td>
<td colspan=2>用户在线时间排名为 <font color=green><b>NO.<%response.write lt_num%></b></font> 号，谢谢对本站的支持！</td>
</tr>
<tr class=bg_td>
<td>在线等级：</td>
<%response.write rank_img(rs("lentimt"),login_lentim,1)%>
 </tr>
<tr class=bg_td>
<td>用户QQ：</td>
<td colspan=2><%
  tmp1=rs("qq")
  if not isnumeric(tmp1) then
    response.write "<font class=gray>没有</font>"
  else
    response.write img_skin("qq")&"<a href='http://search.tencent.com/cgi-bin/friend/user_show_info?ln="&tmp1&"' target=_blank>"&tmp1&"</a>"
  end if
%></td>
</tr>
<tr class=bg_td>
<td>E-mail：</td>
<td colspan=2><%
  tmp1=joekoe_cms.code_html(rs("email"),1,0)
  response.write img_skin("email")&"<a href='mailto:"&tmp1&"'>"&tmp1&"</a>"
%></td>
</tr>
<tr class=bg_td>
<td>M S N：</td>
<td colspan=2><%
  tmp1=joekoe_cms.code_html(rs("msn"),1,0)
  if var_null(tmp1)="" then
    response.write "<font class=gray>没有</font>"
  else
    response.write img_skin("msn")&"<a href='mailto:"&tmp1&"' target=_blank>"&tmp1&"</a>"
  end if
%></td>
</tr>
<tr class=bg_td>
<td>联系电话：</td>
<td colspan=2><%
  tmp1=joekoe_cms.code_html(rs("phone"),1,0)
  if var_null(tmp1)="" then
    response.write "<font class=gray>没有</font>"
  else
    response.write img_skin("phone")&tmp1
  end if
%></td>
</tr>
<tr class=bg_td>
<td>联系地址：</td>
<td colspan=2><%
  tmp1=joekoe_cms.code_html(rs("address"),1,0)
  if var_null(tmp1)="" then
    response.write "<font class=gray>没有</font>"
  else
    response.write tmp1
  end if
%></td>
</tr>
<tr class=bg_td>
<td>个性签名：</td>
<td colspan=2 align=center><table border=0 width='100%' class=tf><tr><td class=bw><%response.write code_jk2(rs("remark"))%></td></tr></table></td>
</tr>
<tr class=bg_td>
<td>个人主页：</td>
<td colspan=2><%
  tmp1=joekoe_cms.code_html(rs("url"),1,0)
  if var_null(tmp1)="" then
    response.write "<font class=gray>没有</font>"
  else
     dim urll
     sql="select * from user_data where url like '%http://%' and username='"&login_username&"'" 
     set rs=joekoe_cms.exec(sql,1)
     if rs.eof then
       urll="http://"
     else
       urll=""
     end if 
    response.write img_skin("url")&"<a href='"&urll&""&tmp1&"' target=_blank>"&urll&""&tmp1&"</a>"
  end if
%></td>
</tr>
<tr><td class=td colspan=3>&nbsp;<%response.write img_skin("m_user")%>论坛最新发贴</td></tr>
<tr class=bg_td><td colspan=3 align=center>
  <table border=0 width='100%'>
<%
  rs.close
  sql="select top 10 id,forum_id,topic,tim from bbs_topic where userid="&login_id&" and forum_id<>999999999 order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
    tmp1=rs("topic")
    response.write "  <tr><td>"&img_skin("h_forum")&"<a href='forum_view.asp?forum_id="&rs("forum_id")&"&view_id="&rs("id")&"' target=_blank alt='"&joekoe_cms.code_html(tmp1,1,0)&"'>"&joekoe_cms.code_html(tmp1,1,30)&"</a>&nbsp;<font class=tims>"&joekoe_cms.time_type(rs("tim"),3)&"</font></td></tr>"
    rs.movenext
  loop
  rs.close
%>
  </table>
</td></tr>
<tr class=bg_tds><td colspan=3>
  <table border=0>
  <tr>
  <td><%response.write img_skin("h_")%><a href='forum_action.asp?action=my' target=_blank>查看我曾经发布的主题</a></td>
  <td><%response.write img_skin("h_")%><a href='forum_action.asp?action=join' target=_blank>查看我曾经参与的主题</a></td>
  </tr>
  </table>
</td></tr>
</table>
<%
end sub
%>