XML数据导入Oracle

CREATE TABLE "SCOTT"."XML_TEST"

  (    "FILEAS" VARCHAR2(100),

       "FIRSTNAME" VARCHAR2(100),

       "LASTNAME" VARCHAR2(3),

       "EMAIL" VARCHAR2(100),

       "MOBILE" NUMBER

  ) ；

declare qryctx dbms_xmlgen.ctxhandle;

result clob;

savctx dbms_xmlstore.ctxtype;

n number;

begin

 result:='

 

 

      B

      COM

         />

      JASONKE@SOHU.COM

         />

    

 

      <FILEAS>A

      <FIRSTNAME>COM

      <LASTNAME   />

      <EMAIL>JASONKE@SOHU.COM

      <MOBILE   />

    

    ';

savctx:=dbms_xmlstore.newcontext('SCOTT.XML_TEST');

DBMS_XMLSTORE.CLEARUPDATECOLUMNLIST(savctx);

dbmS_xmlstore.setupdatecolumn(savctx,'FILEAS');

DBMS_XMLSTORE.SETUPDATECOLUMN(SAVCTX, 'FIRSTNAME');

  DBMS_XMLSTORE.SETUPDATECOLUMN(SAVCTX, 'LASTNAME');

  DBMS_XMLSTORE.SETUPDATECOLUMN(SAVCTX, 'EMAIL');

  DBMS_XMLSTORE.SETUPDATECOLUMN(SAVCTX, 'MOBILE');

N:=dbms_xmlstore.insertxml(savctx,result);

dbms_xmlstore.closecontext(savctx);

end;

/

 

注意：代码中的字段名称和表名称，节点中的字段名称都应该保持大写，否则，无法插入到相应表中。

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

转载于:http://blog.itpub.net/25806858/viewspace-742246/