oracle调用java类遍历磁盘文件- Fangrn的j2ee，linux - JavaEye技术网站企业库|免费b2b网站

利用oracle自带的utl_file包可以访问磁盘文件，但有个限制-- 无法访问文件夹？什么意思呢？就是说oracle只能访问指定的文件，而不能访问文件夹下的未知文件。所以，如果要通过oracle去遍历某指定路径下的所有文件，sorry, impossible! 但是，有一种替代方案可以助你一臂之力！

众所周知java之File类指向的可以是目录也可以是文件，如果指向目录，可以用file.list()找到包含的文件及目录，so that，我可以用java来遍历文件，然后返回一个值给oracle再进行后续操作。

Come on, let's talk about this case!

oracle调用java可以分三个步骤：
{dy}步：在PLSQL客户端里写java代码(类及方法)，实现oracle无法做的工作或你想要让java做的工作；

--功能：返回所有文件字段串??
create?or?replace?and?compile?java?source?named?file_list?as??
import ?java.io.File;??
public ? class ?file_list??
{??
??public ? static ?String?entry(String?path)??
??{??
????StringBuffer?resultBuffer?=?new ?StringBuffer();??
????try {??
??????File?file?=?new ?File( "I:\\" +path);??
??????resultBuffer.append(file.getAbsolutePath());??
??????String[]?files?=?file.list();??
????????
??????resultBuffer.append("----" );??
??????for ( int ?i= 0 ;?i<files.length;?i++){??
??????????StringBuffer?fileStr?=?new ?StringBuffer( "<P?align='center'><IMG?src=" http: //www.qdda.gov.cn/"); ??
??????????fileStr.append(path.replace("?mce_src=" http: //www.qdda.gov.cn/"); ??
??????????fileStr.append(path.replace("\\',?' /'));??
??????????fileStr.append(files[i]);??
??????????fileStr.append("'></P>" );??????
??????????resultBuffer.append(fileStr.toString());??
??????}??
????}catch (Exception?ex){??
??????resultBuffer.append("----" );??
??????resultBuffer.append(ex);??
????}??????
????return ?resultBuffer.toString();??????
??}??
}??

第二步：写oracle函数(function)，调用java类方法；
create or replace function func_file_list(path in varchar2) return varchar2 as language java name 'file_list.entry(java.lang.String) return java.lang.String' ;

第三步：写oracle存储过程(procedure)或客户端调用程序；

create?or?replace?procedure?proce_transfer_data?as??
?url?varchar2(100 );??
?path?varchar2(100 );??
?img_url?varchar2(2000 );??
--档案公布带图数据??
??cursor?cur1?is??
???select?*?from?ARCHIVE_PUBLICATION?t?where?t.big_event_id?is?null ?and?t.appendix_numb?>? 0 ?and?t.publish_order?is?not? null ;??
??r1?ARCHIVE_PUBLICATION%rowtype;??
begin??
??open?cur1;??
????loop??
??????fetch?cur1?into?r1;????????????
??????exit?when?cur1%notfound;??
??????--找出重复的数据???
?????????
??????--图片目录??
??????if ?r1.publish_order?is? null ?then?????????
????????path?:=??'archives_files\'?||?substr(r1.archive_no,?1,?5)?||?' \ '??||?substr(r1.archive_no,?6,?3)??||?' \'?||???
????????substr(r1.archive_no,?9 ,? 5 )||? '\'??||??substr(r1.archive_no,?14,?4)?||?' \';??
??????else ???
????????path?:=?'archives_files\ziliao\'?||?r1.publish_order?||?' \';????????
??????end?if ;??
??????--dbms_output.put_line(path);??
?????--授权??
?????dbms_java.grant_permission(?'QDDA' ,? 'SYS:java.io.FilePermission' ,? 'I:\archives_files\',?' READ'?);??
????????
??????--图片路径??
??????img_url?:=?func_file_list(path);?????????
?????dbms_output.put_line(r1.id?||?img_url);??
????????
??????update?subject_articles?t?set?t.content?=?img_url?||?r1.content||',' ||r1.file_dz|| ',' ||r1.archive_no|| ',' ||r1.file_no,???
???????t.secondid?=?'12466747755782031001' ,?t.rootid= '12264731996871389001' ,?t.area?=? 'qd' ??
????????where?t.id?=?r1.id;????
??????commit??;??????
????end?loop;??
??????
??close?cur1;??
??commit;???
????
end?proce_transfer_data;?