代码如下:<% on error resume next '连接数据库 Set OraSession = CreateObject("OracleInProcServer.XOraSession") set oradatabase=orasession.dbopendatabase("数据库名","用户名/密码",0) '出错处理 if err.number >0 then Response.Write "asp 错误控制" Response.Write "asp 错误来源:"&err.Source &"
" Response.Write "asp 错误代码:"&err.number &"
" Response.Write "asp 错误说明:"&err.Description &"
" err.Clear Response.Write "ORACLE OLE 错误控制" Response.Write "ORACLE 错误代码"&OraSession.lastServerErr&"
" Response.Write "ORACLE 错误说明"&OraSession.lastServerErrt...[ 查看全文 ]