asp 获取异常信息,以ASP 使用ADO 调用存储过程 示例
function GolfChkHasSet(GolfID,y,m,d)
On Error Resume Next '运行发生异常错误时继续运行,必须开启这行
set cmd = server.CreateObject("ADODB.Command")
cmd.CommandType = 4'调用存储过程方式
cmd.CommandTimeout = 30
cmd.CommandText="Golf_chkHasSet" '要调用的存储过程名称
'创建Parameter对象
cmd.Parameters.Append(cmd.CreateParameter("@RETURN",3,4)) '声明返回值
cmd.Parameters.Append(cmd.CreateParameter("@GolfID",3,1,4,GolfID))
cmd.Parameters.Append(cmd.CreateParameter("@y",3,1,4,y))
cmd.Parameters.Append(cmd.CreateParameter("@m",3,1,4,m))
cmd.Parameters.Append(cmd.CreateParameter("@d",3,1,4,d))
'调用UpDateSetUseCommand()执行此 cmd
objSql.UpDateSetUseCommand(cmd) 'objSql 是数据库公共操作类
'检查是否发生了异常,有就输出错误信息
If Err.Number <> 0 Then
Response.Clear
response.write"发生错误:<br/>"
response.write Err.Number
response.write "错误信息:"& Err.Description &"<br/> "
response.write "出错文件:"& Err.Source &"<br/> "
response.write "出错行: "& Err.Line &"<br/> "
end if
'方法返回
GolfChkHasSet = cmd.Parameters(0) ' cmd.Parameters(0) 是存储过程的返回值
End function