⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 admin_error.asp

📁 1] 校友多种方式注册认证[直接注册,答问注册,认证注册] 2] 校友论坛 小巧而实用的论坛,支持UBB标签,快速回复,帖子搜索,灵活的将帖子置顶,设置精华 3] 校友相册 相片上传[方便上传
💻 ASP
字号:
🔍 
<%
'===================================================================
'= ASP FILENAME	: /result/admin_error.asp
'= CREATED TIME : MAY,4,2003
'= LAST MODIFIED: AUG,10,2003
'= VERSION INFO : CCASP Framework Ver 2.0.1 ALL RIGHTS RESERVED BY www.cclinux.com
'= DESCRIPTION  : 后台系统错误信息提示页面和相应函数
'===================================================================
%>
<!-- #include file = "../inc/admin/include_admin_action_view.asp" -->
<!-- #include file = "../main_func.asp" -->

<%
'========================================================
'==   Action参数设置
'========================================================
'== 页面名
Const CONST_PAGE_FILE	= "result/admin_error.asp"

'== 页面标题/功能
Const CONST_PAGE_TITLE	= "异常提示"

'== 功能函数名字空间
Const CONST_ACTION_FUNC	= "ShowErr"

'== 相对根目录路径 
GBL_strHomeURL			= "../"

'页面应用构造
Call ActionBuild()

'== 在模板中引用的标签变量
Dim TAG_strErrStr

'== 请求校验与过滤
Call ActionFilter(CONST_PAGE_FILE,CONST_ACTION_FUNC)

'html页面包含
%>
<!-- #include file = "../template_a/page_admin_error.html.asp" -->
<%
'页面应用析构
Call ActionOver()
%>

<%
 '=============== FUNCTION BODY BEGIN ===============================
 '===================================================================
 '= Function    : ShowErr()
 '= Time	    : Created At May,4,2003
 '= Input       : 错误号(intErrId),附加信息(strAddInfo)
 
 '= Description : 错误分类(错误号和错误的中文信息)
 '===================================================================
 Function ShowErr()

	Dim strErrStr
	Dim intErrId
	Dim strAddInfo

	'== Get error id
	intErrId = Trim(Request("intErrId"))
	If intErrId = "" Then
		intErrId = 1
	End If
	'== Check error whether or not is integer
	If Not IsNumeric(intErrId) Then
		intErrId = 13
	End If
	intErrId = CLng(intErrId)

	'== Get error's add-ons information
	strAddInfo = Trim(Request("strAddInfo"))

	Select Case intErrId
	'== ErrId 1--50 for system and user
		Case	1		strErrStr = "本错误类型尚未登记"
		Case	2		strErrStr = "对不起，找不到该用户"
		Case	3		strErrStr = "对不起，您的密码不正确"
		Case	4		strErrStr = "对不起，该用户名已被注册"
		Case	5		strErrStr =  "对不起，该中文姓名已被使用<br>请重新填写"
		Case	6		strErrStr = "对不起，该邮件地址已被人使用"
		Case	7		strErrStr = "错误的" & strAddInfo & "记录ID参数"
		Case	8		strErrStr = "错误的页面请求,该页面不存在：<br>" & strAddInfo
		Case	9		strErrStr = "错误的页面数据请求,该处理异常"
		Case	10		strErrStr = "错误的页面栏目请求:<br>" & strAddInfo
		Case	11		strErrStr = "系统错误,找不到该用户ID"
		Case	12		strErrStr = "系统错误,该显示栏目未被建立：<br>" & strAddInfo
		Case	13		strErrStr = "系统错误,取错误号错误：<br>" & Trim(Request("intErrId"))
		Case	14		strErrStr = "系统错误,错误成功格式化处理模式错：<br>" & strAddInfo
		Case	15 :	strErrStr = "您的原密码输入不正确<br>请重新输入"& strAddInfo & "的密码"
		Case	16 :	strErrStr = "对不起,该项功能尚未开放：<br>" & strAddInfo
		Case	17 :	strErrStr = "系统错误,管理员不存在<br>" & strAddInfo
		Case	18 :	strErrStr = "对不起,您没有<br>" & strAddInfo
		Case	19 :	strErrStr = "系统错误,表单建立错误<br>" & strAddInfo
		Case	20 :	strErrStr = "系统错误,表单校验错误<br>" & strAddInfo
		Case	21 :	strErrStr = "系统错误,该交易的SHOW_SET未指定<br>" & strAddInfo
		Case	22 :	strErrStr = "系统错误,该交易的数据库更新类型不正确<br>" & strAddInfo
	'== Errid 1000--1100 is for database error
		Case	1001	strErrStr = "数据库错误：不能打开数据库表!<br>" & strAddInfo
		Case	1002	strErrStr = "数据库错误,该数据记录请求不存在"
		Case	1003	strErrStr = strAddInfo & "： 该数据记录不存在"
		Case	1100	strErrStr = "数据库错误!"
		Case	1101	strErrStr = "您的提交包含禁止的词语"
		Case	-2147217887 strErrStr = "数据库错误：不能打开数据库表!<br>" & strAddInfo
		Case    -2147217913 : strErrStr = "数据库错误：插入记录数据有误!<br>" & strAddInfo
		Case	-2147217900 : strErrStr = "数据库错误：SQL语句错误!<br>" & strAddInfo
		Case	-2147467259 : strErrStr = "数据库错误：没有足够权限进行写操作<br>" & strAddInfo
		Case	-2147217904 : strErrStr = "数据库错误：<br>" & strAddInfo
		Case	-2147217865	: strErrStr = "数据库错误：<br>" & strAddInfo

	'== Errid 51--100 is for board error
		Case	51		strErrStr = "对不起，计发留言张数错误"
		Case	52		strErrStr = "对不起，修改留言参数错误"
		Case	53		strErrStr = "对不起，该留言不存在或已被删除"
		Case	54		strErrStr = "对不起，该留言ID参数错误"
		Case	55		strErrStr = "对不起，该留言页码参数错误"
		Case	56		strErrStr = "对不起，删除请求类型提交错误"

	'== Errid 101--150 is for personal error
		Case	101		strErrStr = "对不起，您未处于登陆状态或已超时，请重新登陆"
		Case	102		strErrStr = "对不起，您的用户数据不存在"
		Case	103		strErrStr = "对不起，您的老密码不正确"

	'== Errid 151--200 is for online error
		Case	151     strErrStr = "对不起，您的用户数据不存在"
		Case	152     strErrStr = "对不起，您的用户数据不存在"
		Case	153     strErrStr = "对不起，您的用户数据不存在"
		Case	154     strErrStr = "对不起，您的用户数据不存在"

	'== Errid 201--250 is for admin error
		Case	201		strErrStr = "对不起,网站Logo地址不能为空"
		Case	202		strErrStr = "对不起,网站首页路径不能为空"
		Case	203		strErrStr = "对不起,网站地址不能为空"
		Case	204		strErrStr = "网站地址前必须加上http://"
		Case	205		strErrStr = "网站首页路径前必须加上http://"

	'== Errid 251--350 is for data check error
		Case	251		strErrStr = "对不起," & strAddInfo & "应全为数字!<br>请重新输入"
		Case	252		strErrStr = "对不起," & strAddInfo & "<br>长度不合要求!请重新输入"
		Case	253		strErrStr = "对不起," & strAddInfo & "含有非法字符!<br>请重新输入"
		Case	254		strErrStr = "对不起," & strAddInfo & "邮件地址不正确!<br>请重新输入"
		Case	255		strErrStr = "对不起," & strAddInfo & "应全为中文字符!<br>请重新输入"	
		Case	256		strErrStr = "对不起," & strAddInfo & "您两次输入的密码不一致!<br>请重新输入"	
		Case	257	:	strErrStr = "对不起," & strAddInfo & "的提交值<br>不在允许的范围之内"
		Case	258 :	strErrStr = "对不起," & strAddInfo & "ID参数错误"
		Case	259 :	strErrStr = "对不起," & strAddInfo & "数值不在允许的范围"
		Case	260 :	strErrStr = "对不起," & strAddInfo 
		Case	346		strErrStr = "数据项：" & strAddInfo & "长度校验参数3(固定长度2)设置不正确"
		Case	347		strErrStr = "数据项：" & strAddInfo & "长度校验参数2(校验方式)设置不正确"
		Case	348		strErrStr = "数据项：" & strAddInfo & "长度校验参数1(固定长度1)设置不正确"
		Case	349		strErrStr = "数据项：" & strAddInfo & "长度校验参数不正确"
		Case	350		strErrStr = "系统错误：数据格式校验未登记：<br>" & strAddInfo

	'== Errid 351--400 is for SMS
		Case	351		strErrStr = "对不起," & "新短信目前暂无可发送对象"
		Case	352 :	strErrStr = "对不起, 请您选择要删除的短信!"
		Case	353 :	strErrStr = "对不起,站内短信提交方式错：<br>" & strAddInfo
	
	'== ErrId 401--450 is for admin
		Case	401	:	strErrStr = "系统错误,有关网站设置数据库错误!"
		Case	452	:	strErrStr = "系统错误,删除留言时更新用户表失败<br>该用户不存在<br>" & strAddInfo
		Case	453 :	strErrStr = "系统错误,所留言留言不存在或已被删除<br>" & strAddInfo
		Case	454 :	strErrStr = "系统错误,你不能删除管理员<br>" & strAddInfo
		Case	455 :	strErrStr = "系统错误,你不能更改管理员密码<br>" & strAddInfo
		Case	456 :	strErrStr = "系统错误,该相片记录不存在或已被删除<br>" & strAddInfo
		Case	457	:	strErrStr = "系统错误,你不能对管理员做此操作"
		Case	458	:	strErrStr = "系统错误,你不能对该用户做此操作<br>" & strAddInfo
		Case	459	:	strErrStr = strAddInfo

	'== intErrId 501--550 is for album
		Case	501	:	strErrStr = "对不起,上传相片失败<br>" & strAddInfo
	
	'== intErrId 600--1000 is for plusin
		'== 601--650 for poll
		Case	601	:	strErrStr = "对不起,该投票主题已存在<br>" & strAddInfo
		Case	602 :	strErrStr = "对不起,该投票已结束<br>" & strAddInfo
		Case	603	:	strErrStr = "对不起,该投票为首选项,<br>请先指定或添加新的投票调查首选项,<br>再关闭本投票调查" 
		Case	604	:	strErrStr = "对不起,该投票为首选项,<br>请先指定或添加新的投票调查首选项,<br>再删除本投票调查<br>" & strAddInfo

	'== intErrId 1000 is for all public user's error
		Case	E_USER_PUB :	strErrStr = "对不起," & strAddInfo
	'== intErrId 1001 is for all public admin's error
		Case	E_ADMIN_PUB :	strErrStr = "管理员错误," & strAddInfo
	'== intErrId 1002 is for all public system error
		Case	E_SYS_PUB :	strErrStr = "系统错误," & strAddInfo
	'== intErrId 1003 is for all public db error
		Case	E_DB_PUB :	strErrStr = "数据库错误," & strAddInfo

		Case	E_DATA_PUB :	strErrStr = "数据校验错误," & strAddInfo

		Case	Else    strErrStr = "本错误类型尚未登记：<br>" & intErrId & "<br>" 

	 End Select

	 TAG_strErrStr = strErrStr


 End Function
'=============== End of Function ShowErr() ===========================
'=============== FUNCTION BODY END ====================================
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -