?? 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 + -