ORACLE数据导出到XML文件中-CSDN博客

Normal 0 7.8 磅 0 2 false false false MicrosoftInternetExplorer4 Normal 0 7.8 磅 0 2 false false false MicrosoftInternetExplorer4

ORACLE导出到XML文件中

以下操作在oracle9i、10g版本成功

步骤一：创建存放XML文件的目录对象

SQL>create or replace directory exp_dir as '/opt';
/

--注意此目录要有oracle用户的写权限

步骤二：创建过程生成xml文件的主过程

SQL>create or replace procedure table2xml(result   in out nocopy clob,
                                         filename in varchar2) is
xmlstr varchar2(32767);
line    varchar2(2000);
fhandle utl_file.file_type;
begin
fhandle := utl_file.fopen('EXP_DIR', filename, 'w');
xmlstr := dbms_lob.substr(result, 32767);
loop
    exit when xmlstr is null;
    line := substr(xmlstr, 1, instr(xmlstr, chr(10)) - 1);
    dbms_output.put_line('| ' || line);
    utl_file.put_line(fhandle, line);
    xmlstr := substr(xmlstr, instr(xmlstr, chr(10)) + 1);
end loop;
utl_file.fclose(fhandle);
end;
/

步骤三：调用此过程

declare
queryctx dbms_xmlquery.ctxType;
result clob;
begin
queryctx := dbms_xmlquery.newContext( 'select user_id,user_name from lq_xml_test' );-- 存放查询记录集的 SQL
result := dbms_xmlquery.getXML(queryctx);
table2xml(result, 'table2xml.xml' );
dbms_xmlquery.closeContext(queryctx);
end;
/

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/13234423/viewspace-588858/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/13234423/viewspace-588858/