📄 user_center.asp

📁 直接附加数据库！修改 Include/ Class_Main.asp 为自己信息后台admin admin 绍兴人才网程序
💻 ASP
字号:
<!--#include file="../Include/Class_Conn.asp" -->
<!--#include file="../Include/Class_Main.asp" -->
<!--#include file="../Public/Educate_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("Educate")(0)
Schid     = Session("Educate")(2)
'//调用存储过程
Set Cmd = Server.CreateObject("ADODB.Command")
Cmd.ActiveConnection = Conn
Cmd.CommandText = "Edu_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_EducateType(Properity)

'//课程数目
SudCount = 0
Set Rs = Conn.Execute("Select Count(*) From [pH_Educate_Lesson] Where Schid='"&Schid&"'")
If Not Rs.eof Then SudCount = Rs(0)
Rs.Close

'获取会员的类别
Level_Str = ""
If VipFlag <> 0 Then
Level_Str = "<font color=#009900>已审核</font>"
Else
Level_Str = "<font color=#ff0000>未审核</font>"
End If
%>
<!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/Educate_Left.asp" -->
</td>
<td width="5">&nbsp;</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">&nbsp;帐号信息</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>
<%= Click_Str %>
<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">&nbsp;培训课程</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> 条课程信息 ;</td>
</tr>
<tr>
<td height="25"><img src="../Images/icon2.gif" width="12" height="16">
<a href="Sch_Lesson.asp"><u>快速管理课程</u></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 + -