访问其他电脑的Oracle设想

时　间:2011-11-08 16:43:33
作　者:马喜立   ID：16184  城市：丰台
摘　要:在实际工作中,用Access做了一些工具供同事们使用,所有产品都是离线版本的,其中一些资料需数据支持,每只基金净值每个交易日都会有1个净值,这些资料在一台 Oracle的服务器上存放.   设想,如果我的Access 工具中嵌入了连接Oracle数据库的功能,
正　文:

在实际工作中,用Access做了一些工具供同事们使用,所有产品都是离线版本的,其中一些资料需数据支持,每只基金净值每个交易日都会有1个净值,这些资料在一台 oracle的服务器上存放.   设想,如果我的Access 工具中嵌入了连接Oracle数据库的功能,

Global oOraSess As Object
Global oOraDb   As oraDatabase
Global Const orADB_ORAMODE = &H1&

Set oOraSess = CreateObject("OracleInProcServer.XOraSession")
Set oOraDb = oOraSess.OpenDatabase(DSN, UID & "/" & PWD, orADB_ORAMODE)

或者可以
db = "Provider=MSDAORA.1;Password=chun;User ID=chun;Data Source=chun;Persist Security Info=True"
    conn.CursorLocation = adUseClient
    conn.Open db
'chun  是数据库名 密码 连接数据源

但是这些都只能是连接到本电脑的Oracle,而不是想ADO DAO 连接 Access /Excel那么简单,所以,我设想如果有一种办法能够实现外网的 Access连接 oracle ,让同事们在全国各地,一登陆我的Access 文件就能实现自动更新.这是我的远程设想,不知道能否实现.高手们如果能实现,补充些代码上来. 不知道谁有现实的Oracle服务器,给予只读权限给访问一下试试.