📄 showuser2.asp
字号:
<!-- #include file="share.asp" -->
<!-- #include file="top.asp" -->
<html>
<head>
<title>[xframe]查看成员资料</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="blue.css" type="text/css">
<style type="text/css">
<!--
.hand { cursor: hand }
-->
</style>
</head>
<body bgcolor=#ffffff leftmargin="0" topmargin="0" background="images/bbs_06bg.gif">
<table width="758" border="0" align="center" cellpadding="0" cellspacing="3">
<tr align="left" valign="top">
<td width="100%">
<%
dim rs
dim sql
dim isonline
dim action
sql="select * from online where uid='"&request("uid")&"'"
set rs=conn.execute(sql)
if not rs.eof then
isonline="yes"
action=rs("action")
else
isonline="no"
end if
rs.close
set rs=nothing
sql="select * from userinfo where uid='"&request("uid")&"'"
'opendb
set rs=conn.execute(sql)
if rs.eof then
response.redirect "error.asp?emsg=没这个人!"
response.end
else
%>
<table width="83%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td align="left" height="20" valign="middle"><div align="right"><img src="images/frame_forum2.gif" align="absmiddle"></div></td>
<td align="left" height="20" valign="middle" background="images/frame_bg.gif"><font class="subtitle">成员资料</font></td>
</tr>
<tr>
<td colspan="2" align="center"> </td>
</tr>
<tr>
<td width="32%" align="right" valign="top">成员id: </td>
<td width="68%" align="left" valign="top"> <%=rs("uid")%></td>
</tr>
<tr>
<td width="32%" align="right" valign="top">登录次数: </td>
<td width="68%" align="left" valign="top"> <%=rs("sn")%></td>
</tr>
<tr>
<td width="32%" align="right" valign="top">发贴次数: </td>
<td width="68%" align="left" valign="top"> <%=rs("pos")%>/
<%
pos=rs("pos")
if pos>=0 and pos<10 then
response.write "石头"
elseif pos>=10 and pos<50 then
response.write "玻璃"
elseif pos>=50 and pos<200 then
response.write "水晶"
elseif pos>=200 then
response.write "金刚石"
else
response.write "error!"
end if
%>
</td>
</tr>
<tr>
<td width="32%" align="right" valign="top">权限: </td>
<td width="68%" align="left" valign="top">
<%
authority=rs("authority")
if authority=0 then
response.write "普通"
elseif authority=1 then
response.write "板主"
elseif authority>1 then
response.write "站点负责人"
else
response.write "error!"
end if
%>
</td>
</tr>
<tr>
<td width="32%" align="right" valign="top">电子邮件: </td>
<td width="68%" align="left" valign="top"> <%=rs("email")%></td>
</tr>
<tr>
<td width="32%" align="right" valign="top">个人主页: </td>
<td width="68%" align="left" valign="top"> <a href="<%=rs("homepage")%>" target="_blank"><%=rs("homepage")%></a></td>
</tr>
<tr>
<td width="32%" align="right" valign="top">联系方法: </td>
<td width="68%" align="left" valign="top"> <%=rs("contact")%></td>
</tr>
<tr>
<td width="32%" align="right" valign="top">个人签名: </td>
<td width="68%" align="left" valign="top"> <%=rs("sign")%></td>
</tr>
<tr>
<td width="32%" align="right" valign="top">在线状况: </td>
<td width="68%" align="left" valign="top">
<%
if isonline="yes" then
response.write "在线："&action
else
response.write "离线"
end if
%>
</td>
</tr>
<tr>
<td width="32%" align="right" valign="top" height="120"> </td>
<td width="68%" align="left" valign="top" height="120"> </td>
</tr>
</table>
<%
end if
rs.close
set rs=nothing
'closedb
%>
</td>
</tr>
</table>
<iframe border="0" frameborder="0" width="0" height="0" name="onlineframe" id="onlineframe" src="keep.asp?act=查看成员资料" scrolling="false"></iframe>
<div align="center">
<input type="button" value=" Close " onclick="window.close();">
<table width="760" border="0" align="center" cellspacing="0">
<tr>
<td height="35" colspan="2" background="images/footbg.gif"> <div align="center">3鸟设社[v1.2色彩连视]T恤论论坛
www.3niao.com</div></td>
</tr>
<tr>
<td width="392" background="http://www.3niao.com/v2/down1/images/footgb1.gif"> </td>
<td width="362"><div align="right"><img src="http://www.3niao.com/v2/down1/images/foot.jpg"></div></td>
</tr>
</table>
</div>
</body>
</html>
<% closedb %>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -