使用vba與Oracle資料庫連線

2021-07-03 15:17:59 字數 1661 閱讀 3288

什麼最實用先學什麼,什麼最簡潔就用什麼。這幾天使用vba與oracle資料庫連線測試。 使用vba進行資料庫操作,簡單方便,直接使用excel就可以操作。下面**為初步的連線**,增刪改查還沒有測試好,僅作記錄。

'ado控制項與oracle資料庫連線

public

sub conora()

onerror

goto errmsg:

dim conndb as adodb.connection

set conndb = new adodb.connection

dim connstr as

string

dim dbrst as adodb.recordset

set dbrst = new adodb.recordset

dim sqlrst as

string

dim oraopen as

boolean

oraopen = false

oraid = ""

'oracle資料庫的相關配置

orausr = ""

orapwd = ""

connstr = "provider = oraoledb.oracle.1;password=" & orapwd & ";user id=" & orausr & ";data source=" & oraid & ";persist security info=true"

conndb.cursorlocation = aduseserver

conndb.open connstr

oraopen = true

'成功執行後,資料庫即被開啟

msgbox "connect to the oracle database successful!", vbinformation, "connect successful"

dbrst.activeconnection = conndb

dbrst.cursorlocation = aduseserver

dbrst.locktype = adlockbatchoptimistic

sqlrst = "select count(*) from user_tables"

dbrst.open sqlrst, conndb, adopenstatic, adlockbatchoptimistic

dbrst.movefirst

sheets.add after:=sheets(sheets.count)

activesheet.name = "temp"

sheets("temp").select

range("a1").select

activecell.copyfromrecordset dbrst

set dbrst = nothing

set conndb = nothing

oraopen = false

dbrst.close

exit

suberrmsg:

oraopen = false

msgbox "connect to the oracle database fail ,please check!", vbcritical, "connect fail!"

endsub

openfire使用oracle資料庫

openfire本身支援oracle資料庫,也提供了相關sql,這裡主要解決的問題是,openfire雖然提供了這些,但是本身沒有提供oracle的jdbc驅動,這是由於oracle的版權問題造成的,解決方法是 d develop workspace idea openfire target ope...

Oracle記憶體資料庫使用

摘要 查詢是否為記憶體表,enabled 記憶體表 disabled 非記憶體表 普通當前使用者執行 t.table name,t.inmemory,t.inmemory priority,t.inmemory distribute,t.t.table name,t.inmemory,t.inmem...

Oracle資料庫基本使用

oracle建立使用者 角色 授權 建表 oracle資料庫的許可權系統分為系統許可權與物件許可權。系統許可權 database system privilege 可以讓使用者執行特定的命令集。例如,create table許可權允許使用者建立表,grant any privilege 許可權允許使...