OraSession 对象

Set oo4oSession = CreateObject("OracleInProcServer.XOraSession")
Dim oo4oSession as New OraSessionClass '引用库:"Oracle InProc Server 5.0 Library"
属性/方法 描述
CreateDatabasePool(...) 建立一个数据库池,每个对象只能建立一个池
GetDatabaseFromPool(long waitTime) 返回下一个有效的 OraDatabase 对象,失败时产生错误

waitTime 等待时间(毫秒)

BeginTrans() 开始事务
CommitTrans() 提交事务
Rollback() 回滚事务

CreateDatabasePool 方法

CreateDatabasePool (long initialSize, long maxSize, long timeoutValue, BSTR connectString, BSTR usernamePassword, long options)
参数 描述
initialSize 池的最初尺寸
maxSize 池在最大尺寸
timeoutValue 连接在池中空闲时的保持时间,超过时将断开(秒)
connectString 连接名称
usernamePassword 用户名密码,(格式"username/password")
options 参数