首先在global.asa中定义连接池:
Sub Application_OnStart
'初始创建应用时,建立数据库连接池
OraSession.CreateDatabasePool 4,40,600,"数据库别名", "用户名/密码", 0
End Sub
Sub Application_OnEnd
'Destroys global pool of connections.
OraSession.DestroyDatabasePool
End Sub
Sub session_OnStart
'创建会话超时值
Session.Timeout = 500
End Sub
sub session_OnEnd
end sub
==================================================================
然后,在页面中要访问数据库的时候,是这样用的:
sqlstr1= "select ……from……where……";
'得到database对象
set OraDatabase = OraSession.getDatabaseFromPool(100)
'得到记录集
Set OradynSet1 = OraDatabase.CreateDynaset(SQLstr1,0)
……