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

我們提供的服務(wù)有：網(wǎng)站設(shè)計(jì)制作、成都網(wǎng)站建設(shè)、微信公眾號(hào)開(kāi)發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、贛縣ssl等。為超過(guò)千家企事業(yè)單位解決了網(wǎng)站和推廣的問(wèn)題。提供周到的售前咨詢和貼心的售后服務(wù)，是有科學(xué)管理、有技術(shù)的贛縣網(wǎng)站制作公司

步驟一：創(chuàng)建存放XML文件的目錄對(duì)象

SQL>createorreplacedirectoryexp_diras'/opt';/

--注意此目錄要有oracle用戶的寫權(quán)限

步驟二：創(chuàng)建過(guò)程生成xml文件的主過(guò)程

SQL>createorreplaceproceduretable2xml(result  inoutnocopyclob,
filenameinvarchar2)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
   exitwhenxmlstrisnull;
   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);
 endloop;
 utl_file.fclose(fhandle);
end;
/

步驟三：調(diào)用此過(guò)程

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;
/

【編輯推薦】

1. 詳解Oracle的幾種分頁(yè)查詢語(yǔ)句
2. 實(shí)戰(zhàn)Oracle數(shù)據(jù)庫(kù)備份與恢復(fù)
3. Oracle DBA職責(zé)及日常工作分析

分享文章：淺談如何將Oracle導(dǎo)出到XML文件
網(wǎng)頁(yè)鏈接：http://uogjgqi.cn/article/dpddcos.html