用err.raise自定义错误信息
2005-06-23 13:23
429 查看
我想大多数的人在编写ASP程序的时候,都碰到过类似的错误信息:
Error Number -> -2147467259
Error Source -> Microsoft OLE DB Provider for ODBC Drivers
Error Desc -> [Microsoft][ODBC Driver Manager] Data source name not found and no default driver
可时间上,这个错误信息对我们并不怎么有用,或者说错误信息不怎么友好,让我们换种处理方式看看。
<%
Option Explicit
On Error Resume Next
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
'这个DSN实际上不存在,所以返回错误信息
Conn.Open "foo"
If Err.Number <> 0 then
Err.Clear
Err.Raise vbObjectError + 7, _
"etest.asp", "Connection Open Method Failed"
End If
If err.Number <> 0 then
Response.Write("Error On line -> " & Err.Number - vbObjectError)
Response.write("<BR>Error Source -> " & Err.Source)
Response.Write("<BR>Error Desc -> " & Err.Description)
Err.Clear
End If
%>
这样,我们就自己定义了错误信息,有兴趣的朋友可以试试
下面是该错误信息的输出结果:
Error On line -> 7
Error Source -> etest.asp
Error Desc -> Connection Open Method Failed
这样子看上去是舒服多了,我觉得总比原先的好。
要注意的是定义错误号的时候不能跟系统原先已经定义的错误号重复,所以这里加上了一个常数。
Error Number -> -2147467259
Error Source -> Microsoft OLE DB Provider for ODBC Drivers
Error Desc -> [Microsoft][ODBC Driver Manager] Data source name not found and no default driver
可时间上,这个错误信息对我们并不怎么有用,或者说错误信息不怎么友好,让我们换种处理方式看看。
<%
Option Explicit
On Error Resume Next
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
'这个DSN实际上不存在,所以返回错误信息
Conn.Open "foo"
If Err.Number <> 0 then
Err.Clear
Err.Raise vbObjectError + 7, _
"etest.asp", "Connection Open Method Failed"
End If
If err.Number <> 0 then
Response.Write("Error On line -> " & Err.Number - vbObjectError)
Response.write("<BR>Error Source -> " & Err.Source)
Response.Write("<BR>Error Desc -> " & Err.Description)
Err.Clear
End If
%>
这样,我们就自己定义了错误信息,有兴趣的朋友可以试试
下面是该错误信息的输出结果:
Error On line -> 7
Error Source -> etest.asp
Error Desc -> Connection Open Method Failed
这样子看上去是舒服多了,我觉得总比原先的好。
要注意的是定义错误号的时候不能跟系统原先已经定义的错误号重复,所以这里加上了一个常数。
相关文章推荐
- 用err.raise自定义错误信息
- 用err.raise自定义错误信息
- cxf自定义返回错误信息
- asp.net web.config 自定义错误信息
- Django Form 自定义字段错误信息
- 自定义Struts2表单验证后的错误信息显示格式
- asp.net mvc3 数据验证(二)——错误信息的自定义及其本地化
- 怎样在出现错误的时候输出提示信息Err,然后清空对象
- PHP自定义错误处理器处理出错信息
- ASP.NET MVC2 AJAX调用JsonResult方法并返回自定义错误信息
- Dev的GridControl自定义设置行和单元格的错误信息
- 服务器上出现应用程序错误。此应用程序的当前自定义错误设置禁止远程查看应用程序错误的详细信息(出于安全原因)。
- 如何自定义Struts2表单验证后的错误信息显示格式/样式
- ASP.NET MVC3 AJAX调用JsonResult方法并返回自定义错误信息
- CAS之5.2x版本自定义错误信息-yellowcong
- 如何自定义Struts2表单验证后的错误信息显示格式/样式
- 如何自定义Struts2表单验证后的错误信息显示格式/样式
- Jquery ajax执行顺序 返回自定义错误信息(实例讲解)
- Asp.net MVC 2 自定义错误信息
- asp.net mvc3 数据验证(二)——错误信息的自定义及其本地化