首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

询问将excel数据导入oracle的方法解决办法

2012-04-11 
询问将excel数据导入oracle的方法寻求方法 ,最好带代码顺便问下如果要每过几秒钟就要批量导入新增量又有什

询问将excel数据导入oracle的方法
寻求方法 ,最好带代码

顺便问下如果要每过几秒钟就要批量导入新增量又有什么好的建议

[解决办法]

SQL code
PROCEDURE get_from_xls ISCONVID PLS_INTEGER;APPID PLS_INTEGER;i number;x number;v_name VARCHAR2(100);v_BRN varchar2(10);v_NO varchar2(10);OUT_FILR TEXT_IO.FILE_TYPE;BEGINsynchronize;-- Appid := dde.app_begin('C:\Program Files\Microsoft Office\Office\excel.exe C:\ora_xls\creadit.xls',dde.app_mode_minimized);Appid := dde.app_begin('E:\Program Files\Microsoft Office\Office11\excel.exe C:\oracle_excel\EMP_ALL.xls',dde.app_mode_minimized);dde.app_focus(appid);convid := dde.initiate('EXCEL',/*:BLOCK2.SHEET_NAME*/'Sheet1' );x := 0;FOR I IN 2..100000 loopdde.request(convid,'R' || to_char(i) ||'C1',v_brn,dde.cf_text,100000);dde.request(convid,'R' || to_char(i) ||'C2',v_no,dde.cf_text,100000);dde.request(convid,'R' || to_char(i) ||'C3',v_name,dde.cf_text,100000);if substr(v_no,1,length(v_no)-2) is null then exit;end if;insert into EXCEL_TBL(CODE ,NAME )VALUES(substr(v_brn,1,length(v_brn)-2),substr(v_no,1,length(v_no)-2));x:= x + 1;end loop;COMMIT;dde.terminate(convid);dde.app_end(appid);END;
[解决办法]
自己写个ETL小程序定时读取EXCEL插入ORACLE。

热点排行