📄 user_center.asp
字号:
<!--#include file="../Include/Class_Conn.asp" -->
<!--#include file="../Include/Class_Main.asp" -->
<!--#include file="../Public/School_Cookies.asp" -->
<%
Dim Schid,Username,Tmp
Dim Cmd,Rs,Action
Dim SchoolName,BannerFile
Action = Request.QueryString("action")
If Action <> "" Then
Select Case Action
Case "dellogo"
Call Del_Submit() '//跳转到删除的函数
End Select
End if
'//获取会员登陆的标记
Username = Session("School")(0)
Schid = Session("School")(2)
'//调用存储过程
Set Cmd = Server.CreateObject("ADODB.Command")
Cmd.ActiveConnection = Conn
Cmd.CommandText = "Sch_UserCenter"
Cmd.CommandType = 4
Cmd.Parameters.Append Cmd.CreateParameter("@Schid",200,1,30)
Cmd.Parameters("@Schid") = Schid
Set Rs = Cmd.Execute
If Rs.Eof Then
CloseRs
Set Cmd = Nothing
CloseDB
Response.write "没有找到会员资料！"
Response.End()
End if
Tmp = Rs.GetRows() '//将数据填充到数组
'SchoolName,Properity,RegDate,Lastip,LastDate,LoginCount,VipFlag,VipDate,VipEndDate,ViewClicks
CloseRs
Set Cmd = Nothing
'//功能代码
SchoolName = Tmp(0,0)
Properity = Tmp(1,0)
RegDate = Tmp(2,0)
Lastip = Tmp(3,0)
LastDate = Tmp(4,0)
LoginCount = Tmp(5,0)
VipFlag = Tmp(6,0)
VipDate = Tmp(7,0)
VipEndDate = Tmp(8,0)
ViewClicks = Tmp(9,0)
SchoolType = Cls_SchoolType(Properity)
'获取会员的类别
Level_Str = ""
If VipFlag <> 0 Then '已经通过审核
If VipFlag = 1 Then '是高级会员
If DateDiff("d",VipDate,Date()) >= 0 And DateDiff("d",VipEndDate,Date()) <= 0 Then
Level_Str = "<font color=#ff0000>高级收费会员</font>["&FormatDateTime(VipDate,2)&" 至 "&FormatDateTime(VipEndDate,2)&"]"
Else
Level_Str = "<font color=#ff0000>过期收费会员</font>[过期时间："&FormatDateTime(VipEndDate,2)&"]"
End if
Else '免费会员
Level_Str = "<font color=#ff0000>免费会员</font>[部分功能受到限制]"
End if
Else
Level_Str = "<font color=#ff0000>未审核会员</font>[暂时不能推荐毕业生]"
End if
'//毕业生数目
SudCount = 0
Set Rs = Conn.Execute("Select Count(*) From [pH_School_Student] Where Schid='"&Schid&"'")
If Not Rs.eof Then SudCount = Rs(0)
Rs.Close
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../Css/Style.css" type=text/css rel=stylesheet>
<title><%= Cls_WebName %> -- 院校会员管理中心</title>
</head>
<body>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center" bgcolor="#FFFFFF">
<!--#include file="../Include/Header.asp" -->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td height="4"></td>
</tr>
<tr>
<td height="1" bgcolor="#eeeeee"></td>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="175" valign="top">
<!--#include file="../Public/School_Left.asp" -->
</td>
<td width="5"> </td>
<td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25"><img src="../Images/icon.gif" width="11" height="11" align="absmiddle">
尊敬的<%= Cls_WebName %>用户：<font color=#ff0000><%= SchoolName %></font>，欢迎您进入高校就业管理中心</td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="eeeeee">
<tr>
<td height="25" bgcolor="f5f5f5"><b><font color="#000000"> 帐号信息</font></b></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
会员类别：<%= Level_Str %> ;</td>
</tr>
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
您的院校资料和推荐毕业生信息已被显示 <u><%= ViewClicks %></u> 次 ;
</td>
</tr>
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
上次登录时间：<u><%= LastDate %></u> , 登录次数： <u><%= LoginCount %></u> 次 ;</td>
</tr>
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
如果您对<%= Cls_WebName %>有任何问题或者建议,请<a href="../Club/club_list.asp?classid=15" target="_blank">点击这里</a>发表您的看法
.</td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="eeeeee">
<tr>
<td height="25" bgcolor="f5f5f5"><b><font color="#000000"> 推荐毕业生</font></b></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
推荐毕业生 <u><%= SudCount %></u> 位, <a href="Info/Student.asp?Param=<%= Schid %>" target="_blank"><u>点此查看</u></a>
;</td>
</tr>
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
<a href="Sch_SudManage.asp"><u>快速管理毕业生</u></a>;</td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="eeeeee">
<tr>
<td height="25" bgcolor="f5f5f5"><b><font color="#000000"> 提醒信息</font></b></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
<a href="http://www.chsi.com.cn/xlcx/" target="_blank">全国高等教育学历查询</a>;
</td>
</tr>
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
如果您在使用过程遇到任何问题欢迎随时<a href="../Public/Contact.asp">联系我们</a> .</td>
</tr>
</table></td>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1" bgcolor="#eeeeee"></td>
</tr>
</table></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center" bgcolor="#FFFFFF">
<!--#include file="../Include/Footer.asp" -->
</td>
</tr>
</table>
</body>
</html>
<%
'//关闭数据库连接
CloseDB
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -