ORACLE920与ASP的连接问题的解决办法

代码如下： ``` 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.lastServerErrtext&"
" closeDatabase displayerror Response.end end if '关闭数据库 sub closeDatabase() oradatabase.close 'set oradatabase=nothing orasession.close set orasession=nothing end sub function displayerror() if err.number <>0 then Response.Write "

数据库连接失败，请与系统管理员联系！

" Response.End end if end function