ASP中使用Oracle Object For Ole连接Oracle数据库

最新推荐文章于 2021-04-16 10:00:13 发布

原创最新推荐文章于 2021-04-16 10:00:13 发布 · 1.7k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#oracle #object #asp #session #application #subroutine

博客介绍了在global.asa中创建Oracle连接池的方法，包括设置连接池大小、超时时间等，还说明了在其他页面引用连接池进行数据库操作的方式，同时提及了事务的用法，如BeginTrans、RollBack、CommitTrans，最后强调需在WEB服务器安装Oracle客户端组件。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1、在global.asa中创建连接池
<OBJECT RUNAT=Server SCOPE=Application ID=OraConnection PROGID="OracleInProcServer.XOraSession"></OBJECT>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_OnStart
     'Get an instance of the Connection Pooling object and create a pool of OraDatabase     OraConnection.CreateDatabasePool 1,40,200,"(DESCRIPTION=(ADDRESS=(PROTOCOL=TCP)(HOST=10.8.6.205)(PORT=1521))(CONNECT_DATA=(SID=WYX)))", "bii/12345", 0 '
    '1-----init pool size
    '40---max pool size
    '200-timeout seconds
End Sub

Sub Session_OnStart
    Session.Timeout=60
    Server.ScriptTimeout=999999
    set Session("OraDataBase")=OraConnection.GetDatabaseFromPool(10) '
    '10----wait time seconds
End Sub

Sub Session_OnEnd
    Session("OraDataBase").Close
    set Session("OraDataBase")=nothing
End Sub

Sub Application_OnEnd
    OraConnection.DestroyDatabasePool
End Sub
</SCRIPT>
2、在其它页面中进行引用
dim OraDynaset,sql
sql="select * from tablename"
set OraDynaset=Session("OraDataBase").DbCreateDynaset(sql,0)
do while not OraDynaset.Eof
    ……
    OraDynaset.DbMoveNext
loop

事务用法：
Session("Oradatabase").BeginTrans
Session("Oradatabase").RollBack
Session("Oradatabase").CommitTrans

注：在WEB服务器上在确保安装有ORACLE客户端组件------》Oracle Object For OLE