📄 userinfo.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="function/userview.asp"-->
<%
UserID=Request.QueryString("ID")
SQL="SELECT * FROM 注册信息 WHERE ID=" & UserID
Set UserRS=Server.CreateObject("ADODB.Recordset")
UserRS.Open SQL,Conn,3,2
If UserRS.Eof Then
Response.Redirect "error.asp"
End IF
IF USerRS("性别")="没有填写" Then
Response.Redirect "error.asp"
End IF
ClassID=Cint(UserRS("班别"))'Request.QueryString("ID")
SQL="SELECT * FROM 班级设置 WHERE ID=" & Cint(ClassID)
Set ClassRS=Server.CreateObject("ADODB.Recordset")
ClassRS.Open SQL,Conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<!--#include file="inc/css.asp"-->
<title><%=WebSiteName%></title>
</head>
<body topmargin="0" background="images/bg.gif">
<!--#include file="top.asp"-->
<div align="center">
<center>
<table border="0" width="755" cellspacing="0" cellpadding="0">
<tr>
<td width="189" style="background-color: #FFFFFF; border-left: 1 solid #000000; border-top: 1 solid #000000; border-bottom: 1 solid #000000" valign="top">
<!--#include file="left.asp"-->
</td>
<td width="562" style="background-color: #FFFFFF; border: 1 solid #000000" valign="top">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<!--#include file="navigation.asp"-->
<tr>
<td width="100%" valign="top">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td height="10">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="78%"><p style="line-height: 130%; margin-left: 20; margin-top: 10; margin-bottom: 10"><b><%=ClassRS("班级名称")%>班级信息<br>
</b>班 主 任：<%=ClassRS("班主任")%><b><br>
</b>班级管理：<%=UserView (ClassRS("管理员"))%><b><br>
</b>所属专业：<%=ViewPro (ClassRS("专业类型"))%><b><br>
</b>班级人数：<font color="#FF0000"><%=ClassUserS(ClassRS("ID"))%></font> 人<b><br>
</b>班级主页：<a href="<%=ClassRS("班级主页")%>"><%=ClassRS("班级主页")%></a></p></td>
<td width="22%">
<%IF UserRS("小图片")<>"" Then%><p align="center"><a href="picdisplay.asp?id=<%=UserRS("ID")%>&typeid=big" target="_blank"><img border="0" src="picdisplay.asp?id=<%=UserRS("ID")%>&typeid=small" width="85" height="105"></a><%End IF%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="25" bgcolor="#EDEDED" style="border-top: 1 solid #cccccc; border-bottom: 1 solid #cccccc;">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="7%">
<p align="right"><img border="0" src="images/class.gif" width="16" height="16"></td>
<td width="98%" valign="bottom"> <font color="#545454">以下是<%=ViewPro (ClassRS("专业类型"))%>专业<%=ClassRS("班级名称")%>班
</font><font color="#FF0000"><%=UserRS("姓名")%></font><font color="#545454">
详细信息：</font></td>
</tr>
</table>
</td>
</tr>
<%
UserRS("人气")=UserRS("人气")+1
UserRS.Update
%>
<tr>
<td height="10">
<div align="center">
<table border="0" width="93%" cellspacing="0" cellpadding="0">
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc">
<p align="center">姓
名：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("姓名")%></font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">学
号：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("学号")%></font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">性
别：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454">
<%=CheckSex(UserRS("性别"))%><img border="0" src="<%=CheckSexImg(UserRS("性别"))%>" width="20" height="14"></font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">生
日：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("出生日期")%></font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">昵
称：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("昵称")%></font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">所 属 专 业：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=ViewPro (ClassRS("专业类型"))%></font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">所 属 班 级：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=ClassRS("班级名称")%>班</font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">通
信 地 址：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("家庭地址")%></font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">邮 政 编 码：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("邮政编码")%></font></td>
</tr>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">电 话 号 码：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("电话号码")%></font></td>
</tr>
<%If UserRS("手机号码")<>"" Then%>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">其 他 电 话：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("手机号码")%></font></td>
</tr>
<%End IF%>
<%IF UserRS("OICQ")<>"" Then%>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">腾
讯 OICQ：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("OICQ")%></font></td>
</tr>
<%End IF%>
<%If UserRS("MSN")<>"" Then%>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">微
软 MSN：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("MSN")%></font></td>
</tr>
<%End IF%>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">电 子 邮 件：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("电子邮件")%></font></td>
</tr>
<%If UserRS("个人主页")<>"" Then%>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">个 人 主 页：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("个人主页")%></font></td>
</tr>
<%End IF%>
<%If UserRS("留言")<>"" Then%>
<tr>
<td width="25%" height="22" style="border-bottom: 1 solid #cccccc" align="center">人
生 格 言：</td>
<td width="75%" height="22" style="border-bottom: 1 solid #cccccc"><font color="#545454"><%=UserRS("留言")%></font></td>
</tr>
<%End IF%>
<tr>
<td width="100%" height="5" colspan="2"></td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td height="10">
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<!--#include file="bottom.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -