📄 user.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% userid=request("userid")
If userid="" then %>
<script language="javascript">
alert("该用户未注册,没有用户信息！");
//document.location.href="index.asp"
history.go(-1);
</script>
<% End If %>
<!--#include file="opendb.asp" -->
<%
'管理员改变用户类型-----------
if Request("lx")<>"" and session("level")="3" then
'updatesql="update users set level="&Request("lx")&" where userid="&userid
'Response.Write updatesql
'Response.end
'conn.execute(updatesql)
set rs=server.createobject("adodb.recordset")
rs.open "select * from users where userid="&userid&"",conn,1,3
rs("level")= Request("lx")
rs.update
set rs=nothing
end if
'结束---------------
set rs=server.createobject("adodb.recordset")
rs.open "select * from users where userid="&userid,conn,1,3
%>
<html>
<head>
<title>用户注册</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="bbs.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0">
<table width="100%" border="0">
<tr>
<td align="center" bgcolor="#0065CA" class="px14"><font color="#FFFFFF">用户信息</font></td>
</tr>
<tr>
<td align="center"><table width="760" border="1" align="center" cellspacing="0" bordercolorlight="#666666" bordercolordark="#FFFFFF">
<tr>
<td width="30%" align="right" bgcolor="#BBDDFF">用户名</td>
<td width="70%" bgcolor="#f0f0f0"><%= rs("nickname") %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">真实姓名</td>
<td bgcolor="#f0f0f0"> <%= rs("truename") %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">性别</td>
<td bgcolor="#f0f0f0"> <%If abs(rs("sex"))=1 then%>
先生
<% Else %>
小姐/女士
<% End If %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">生日</td>
<td bgcolor="#f0f0f0"><%= rs("birthday") %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">婚姻状况</td>
<td bgcolor="#f0f0f0"> <%If abs(rs("marriage"))=1 then%>
已婚
<% Else %>
未婚
<% End If %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">身份证号码</td>
<td bgcolor="#f0f0f0"> <%= rs("idcard") %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">工作行业</td>
<td bgcolor="#f0f0f0"> <%if rs("job")<>"" then%> <%sql1="select * from job where jid="&rs("job")
set rs1=Server.Createobject("ADODB.Recordset")
rs1.open sql1,conn,1,3%> <%= rs1("job")%> <% end if %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">学历</td>
<td bgcolor="#f0f0f0"> <%if rs("education")<>"" then%> <%sql1="select * from education where eid="&rs("education")
set rs1=Server.Createobject("ADODB.Recordset")
rs1.open sql1,conn,1,3%> <%= rs1("education")%> <% end if %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">电子邮箱</td>
<td bgcolor="#f0f0f0"><%= rs("email") %> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">即时网络通信</td>
<td bgcolor="#f0f0f0"> <%if rs("net_msg_name")<>"" then%> <%sql1="select * from net_msg_name where nid="&rs("net_msg_name")
set rs1=Server.Createobject("ADODB.Recordset")
rs1.open sql1,conn,1,3%> <%= rs1("net_msg_name")%> <% end if %>
： <font face="宋体"><%= rs("net_msg_no") %></font> </td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">网址</td>
<td bgcolor="#f0f0f0"> <font face="宋体"><%= rs("url") %> </font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">电话</td>
<td bgcolor="#f0f0f0"> <font face="宋体"><%= rs("tel") %> </font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">传真</td>
<td bgcolor="#f0f0f0"> <font face="宋体"><%= rs("fax") %> </font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">手机</td>
<td bgcolor="#f0f0f0"> <font face="宋体"><%= rs("mobile") %> </font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">所在省/市</td>
<td bgcolor="#f0f0f0"><font face="宋体"><%= rs("area") %> </font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">通信地址</td>
<td bgcolor="#f0f0f0"> <font face="宋体"><%= rs("address") %> </font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">邮政编码</td>
<td bgcolor="#f0f0f0"> <font face="宋体"><%= rs("zipcode") %> </font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">经验值</td>
<td bgcolor="#f0f0f0"><font face="宋体"><%= rs("fenshu") %></font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">发帖数</td>
<td bgcolor="#f0f0f0"><font face="宋体"><%= rs("fatie") %></font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">最近一次登录时间</td>
<td bgcolor="#f0f0f0"><font face="宋体"><%= rs("lasttime") %></font></td>
</tr>
<tr>
<td align="right" bgcolor="#BBDDFF">最近一次登录IP</td>
<td bgcolor="#f0f0f0"><font face="宋体"><%= rs("lastip") %></font></td>
</tr>
</table>
<p> </p></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -