在之前有提供一些生成文本文件的FORM例子
但用戶往往是再用EXCEL等工具去進行編輯
現提供一直接可以從FROM中生成EXCEL文件的事例
現提供一簡單實例
說明怎樣使用FORM實現與EXCEL的應用程序的DDE
要實現該演示功能
. 安裝好EXCEL
. 按照程序中的路經說明建立一個相應的
XLS文件
. 主要的程序單元如下
:invd
dh為塊中的一field
DECLARE
AppID PLS_integer;
ConvID PLS_INTEGER;
server varchar
(
);
BEGIN
server :=
c:\progra~
\micros~
\office
;
begin
AppID := DDE
App_Begin(server||
\excel
exe
||current_form_path||
book
xls
DDE
App_Mode_Maximized);
exception when others then
message(
Can not Find Your Office Path
Please Try Again
);
raise form_trigger_failure;
end;
DDE
App_Focus(AppID);
ConvID := DDE
Initiate(
EXCEL
current_form_path||
book
xls
);
begin
DDE
Poke(ConvID
R
C
:invd
dh
DDE
CF_TEXT
);
exception when others then null;
end;
DDE
Terminate(ConvID);
END;
From:http://tw.wingwit.com/Article/program/Oracle/201311/18959.html