بسم الله الرحمن الرحيم

 

السلام عليكم ورحمة الله وبركاته

 

أنا عملت custom Form ل import excel file  وبعدها يتم عمل upload  ليها بداخل الأوراكل وإظهار البيانات على ال form  قبل إدخالها في الجدول

 

​المشكلة إن ال form تشتغل local ممتازة...لكن لما أرفعها على oracle e business suit ال browes مش بيفتح ويندو جديد علشان أختار الملف

 

وكمان لما جربت أكتب ال path داخل الفورم مش بيعمل حاجة خالص ومفيش اي error 

 

وده الكود

PROCEDURE get_from_xls IS

CONVID PLS_INTEGER;
APPID  PLS_INTEGER;
i number;
x number;
v_card    varchar2(100) :=null;
v_actnum  varchar2(100) :=null;
v_amount  varchar2(100):=null;
v_path    varchar2(1000):=:path;
v_table   varchar2(4000);
V_BRANCD  VARCHAR2(3);
V_ACTYPE  VARCHAR2(3);
OUT_FILR TEXT_IO.FILE_TYPE;


BEGIN
 :progress:='Please wait...';
synchronize;
:progress:='Try To copy...';
--Appid := dde.app_begin('C:\Program Files\Microsoft Office\Office10\excel.exe G:\XLS_ORACLE\MOHUDDIN.xls',dde.app_mode_minimized);


Appid := dde.app_begin('C:\Program Files\Microsoft Office\Office12\excel.exe C:\Final_path\HALIM_DATA.xls '||v_path,dde.app_mode_minimized);


-- Appid := dde.app_begin(v_path,dde.app_mode_minimized);
:progress:='Try To copy2...';
dde.app_focus(appid);
convid := dde.initiate('EXCEL','Sheet1' );




x := 0;


FOR I IN 2..100000 loop
dde.request(convid,'R' || to_char(i) ||'C1',v_card  ,dde.cf_text,100000); 
dde.request(convid,'R' || to_char(i) ||'C2',v_actnum,dde.cf_text,100000);
dde.request(convid,'R' || to_char(i) ||'C3',v_amount,dde.cf_text,100000);


if    substr(v_card  ,1,length(v_card)-2)    is null then exit;
end if;
  
insert into timesheet_temp(COL1,COL2,COL3)
values(substr(v_card,1,length(v_card)-2),
substr(v_actnum,1,11),
to_number(substr(v_amount,1,length(v_amount)-2))
);


x:= x + 1; 
end loop;


:system.message_level:=0;
commit;
:system.message_level:=5;


dde.terminate(convid);
dde.app_end(appid);
:progress:='Data Successfully inserted...';


exception
when others then null;
END;

هل لأنه مش عارف يفتح الملف داخل السيرفر بال path  الخاص بملف ال excel  ولا إيه المشكلة

 

 

ياريت شرح خطوات تفصيلية لأني جربت حلول كتيرة ومشتغلتش

ممكن  ترفعلنا الفورمه