問題:如何在FORM的程序中實現Oracle與Access表之間的導入和導出。
解答:
准備工作:
1.安裝OCA。運行Developer的安裝盤,選擇自定義安裝,選擇Oracle Open Client Adapter for ODBC安裝。
2.在數據源(ODBC)中添加DSN。控制面板->管理工具->數據源(ODBC),選擇“用戶DSN”,添加要進行操作的Access的文件。在“高級”選項裡,填上“登錄名稱”和“密碼”(很重要,在程序中會用到)。
下面以實際例子來說明:
假設在Oracle中和Access中都有一個student表,表中字段相同(name char(10) ,age number(2)),在准備工作2中的“數據源名”為test,“登錄名稱”和“密碼”都為user。
下面為從Oracle導出到Access的procedure:
引用片段:
PROCEDURE oracle_to_access IS
connection_id EXEC_SQL.ConnType;
action_cursor EXEC_SQL.CursType;
ignore PLS_INTEGER;
t_name student.name%type;
t_age student.age%type;
cursor temp_cursor is select * from student;
BEGIN
connection_id:= EXEC_SQL.OPEN_CONNECTION('user/user@odbc:test');
action_cursor := EXEC_SQL.OPEN_CURSOR(connection_id);
EXEC_SQL.PARSE(connection_id, action_cursor,'delete * from student');
ignore := EXEC_SQL.EXECUTE(connection_id, action_cursor);
EXEC_SQL.CLOSE_CURSOR(connection_id,action_cursor);
open temp_cursor;
export_count := 0;
action_cursor := EXEC_SQL.OPEN_CURSOR(connection_id);
EXEC_SQL.PARSE(connection_id, action_cursor,'INSERT INTO student(name,age) values(:1,:2)');
loop