?? main.asp
字號:
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<% if session("user")="" then
response.redirect "err.asp"
else
user=session("user")%>
<%
set rs=server.createobject("ADODB.recordset")
sql="select * from user where user='"&user&"'"
rs.open sql,conn,1,1
if rs.bof or rs.eof then
err=true
errstr="<br><br><br><br><br><br><b>對不起，找不到該用戶"
else
realname=rs("realname")
sex=rs("sex")
if sex="1" then
sex="先生"
else
sex="小姐"
end if
bbscount=rs("bbscount")
photocount=rs("photocount")
logincount=rs("logincount")
usermoney=rs("usermoney")
if money>10000 then
level="<img src=image/level7.gif>"
elseif money>8000 then
level="<img src=image/level6.gif>"
elseif money>5000 then
level="<img src=image/level5.gif>"
elseif money>1000 then
level="<img src=image/level4.gif>"
elseif money>500 then
level="<img src=image/level3.gif>"
elseif money>200 then
level="<img src=image/level2.gif>"
else
level="<img src=image/level1.gif>"
end if
userimage="<img src="&rs("userimage")&">"
addinfo=rs("addinfo")
rs.close
end if%>
<!--#include file="top.asp"-->
<script language="javaScript" type="text/javascript" SRC="mynews/pz_chromeless_2.1.js"></SCRIPT>
<script language="javaScript" type="text/javascript" SRC="mynews/openScript.js"></script>
<table width=100% class=bk border="0" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#FF9999" valign="top" height="68" align="center">
<table width="96%" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFECEC">
<tr>
<td height="19" align="center" bgcolor="#FF9999"><%=realname%><%=sex%>，你好</td>
</tr>
<tr>
<td height="20">共上站：<%=logincount%>次<br>
共發表貼子：<%=bbscount%>份<br>
共上傳圖片：<%=photocount%>張<br>
總積分：<%=usermoney%><br>
等級：<%=level%></td>
</tr>
</table>
<br>
<table border=0 cellpadding=0 cellspacing=0 height=250
width="94%">
<tbody>
<tr>
<td width=42 bgcolor="#FFFFFF"> </td>
<td bgcolor=#ffffff height=40 valign=bottom width="119"><img
src="image/rido0.gif"></td>
<td bgcolor=#FFFFFF height=40 valign=bottom width="39"> </td>
</tr>
<tr>
<td height="7" width="42" bgcolor="#FFFFFF"></td>
<td align=middle background=image/rido2.gif
height=7 width="119"></td>
<td align=middle
height=7 width="39" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td height=200 width=42 bgcolor="#FFFFFF"> </td>
<td align=middle background=image/rido2.gif width="119" valign=top>
<table align=center border=0 cellpadding=2 cellspacing=0
width=136>
<tbody>
<%
set rs1=server.createobject("ADODB.recordset")
sql1="SELECT TOP 10 realname,user,logincount from user ORDER BY logincount DESC"
rs1.open sql1,conn,1,3
%>
<%
for i=1 to 10
if rs1.eof or rs1.bof then exit for
response.write "<tr class=tss><td align=middle height=18 valign=top><img src=image/number/"&i&".gif></td><td align=middle valign=center><a href='userinfo.asp?user="&rs1("user")&"' target=_blank>"&rs1("realname")&"("&rs1("logincount")&")</a></td></tr>"
rs1.movenext
next
rs1.close
%>
</tbody>
</table>
</td>
<td align=middle width="39" bgcolor="#FFFFFF"> </td>
</tr>
<tr>
<td width=42 bgcolor="#FFFFFF"> </td>
<td bgcolor=#ffffff height=15 valign=top width="119"><img
src="image/rido3.gif"></td>
<td bgcolor=#FFFFFF height=15 valign=top width="39"> </td>
</tr>
</tbody>
</table>
</td>
<td valign="top" width="404" class=z bgcolor=#ffffff align="center"> <br>
<table width="95%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class=x width="65%"><img src="image/subject.gif" width="119" height="13"></td>
<td class=x width="35%" align="right">班級公告</td>
</tr>
<tr>
<td colspan="2"><br>
<script language=javascript src="mynews/news.asp"></script><br>
<script language=javascript src="gbook/news.asp"></script><br><br>
本月過生日的同學:<br><script language=javascript src="birthday.asp"></script></td>
</tr>
</table>
</td>
<td valign="top" width="200" class=z bgcolor=#FFFFFF align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2"><img src="image/fouse.gif"></td>
</tr>
<tr>
<td height="93" valign="top" colspan="2"> </td>
</tr>
<tr>
<td align="center" class=sx colspan="2" bgcolor="#FFcccc"><img src="image/jiao.gif" width="6" height="10"> IP
地址追捕</td>
</tr>
<form name="form1" method="post" action="findwhere/find.asp" target=_blank>
<tr bgcolor="#FFECEC">
<td align="right" valign="bottom">
<input type="text" name="ipaddr" size=16 class=buttonface>
</td>
<td align="left" valign="bottom" bgcolor="#FFECEC">
<input type="image" src="image/btn_search.gif" width="61" height="15" name="image">
</td>
</tr>
</form>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#FFCCCC" align="center">網 站 導 航</td>
</tr>
<tr>
<td align="center" height="205" valign="top">
<table width="100%" border="0" cellspacing="2" cellpadding="2" bgcolor="#FFFFFF">
<tr>
<td width="17" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="41%" bgcolor="#FFECEC"><a href="http://www.163.com" target="_blank">網易</a></td>
<td width="17" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="36%" bgcolor="#FFECEC"><a href="http://www.chinaren.com" target="_blank">中國人</a></td>
</tr>
<tr>
<td width="17" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="41%" bgcolor="#FFECEC"><a href="http://www.sina.com.cn" target="_blank">新浪</a></td>
<td width="17" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="36%" bgcolor="#FFECEC"><a href="http://www.china.com" target="_blank">中華網</a></td>
</tr>
<tr>
<td width="17" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="41%" bgcolor="#FFECEC"><a href="http://www.sohu.com" target="_blank">搜狐</a></td>
<td width="17" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="36%" bgcolor="#FFECEC"><a href="http://www.newhua.com" target="_blank">華軍軟件園</a></td>
</tr>
<tr>
<td width="17" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="41%" bgcolor="#FFECEC"><a href="http://www.tg002.com" target="_blank">無限音樂空間</a></td>
<td width="17" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="36%" bgcolor="#FFECEC">人心論壇</td>
</tr>
<tr>
<td width="17" height="19" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="41%" height="19" bgcolor="#FFECEC"> </td>
<td width="17" height="19" bgcolor="#FFFFFF"><img src="image/ip.gif" width="17" height="17"></td>
<td width="36%" height="19" bgcolor="#FFECEC"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#FFCCCC" align="center">版 權 說 明</td>
</tr>
<tr>
<td height="75" align="center"><img src="image/copyright.gif" width="160" height="60"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<% end if
conn.close
set conn=nothing%>
<!--#include file="end.asp"-->?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -