📄 show_error.asp
字号:
<%
dim finderror '为全局变量
finderror=false
dim errmsg
errmsg=""
sub error(message)
errmsg=errmsg & "<br><li>" & message & "</li>"
finderror=true
end sub
sub Iserror()
if finderror=true then
call show_error()
'response.write"c"
'else
'target=action & target
'server.execute(target)
'response.write"d"
end if
end sub
sub show_error_end()
call error("出现未知错误，请与<a href='mailto:mlzboy@yahoo.com.cn'>我们联系</a>！")
call error("<a href='http://jjxy.zj.com'>前往-->Eric工作室</a>")
call Iserror()
response.end
end sub
sub show_error()
%>
<html><head>
<title>！错误提示:</title>
<link href="../eric.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="300" border="0" align="center" cellpadding="4" cellspacing="1" id="table_01">
<tr>
<td class="white_bold_blue">错误提示:</td>
</tr>
<tr>
<td><%=errmsg%><p></td>
</tr>
<tr>
<td class="center"><input name="back" type="button" id="back" value="<<返回" onclick="history.go(-1)"></td>
</tr>
</table>
</body>
</html>
<%end sub%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -