error.asp

一个虚拟主机代理系统

<%
'=========================================
'ScriptMate User Manager Version 2.1
'Copyright 2001 (C) ScriptMate.Com
'Admin Module
' This module helps in displaying an error message
'For any help with modification to
'this file contact [e-mail]
'=========================================

Sub Error()
	
	smumadminheader("Error")

	if not Application("smumdebugmode") then on error resume next

	if session("admin") = "" then
		Response.Redirect smumadminpage & "?action=login"
	end if

	smumFormOpenTable
	smumFormHeader "Error"
	smumFormResponse "An error is occured, please check the errorlog."
	smumFormCloseTable

End Sub%>