有朋友问到关于XMLDOM无法正确设置字符集的问题,也就是xmldom.setCharset无效的问题。
查询一下Metalink,参考Note:251011.1,这是Oracle的一个Bug,可以通过dbms_output来绕过这个问题。
在Oracle Databsae 10g中测试:
SQL> select * from v$version
2 /
BANNER
—————————————————————-
Oracle Database 10g Enterprise Edition Release 10.2.0.2.0 – Prod
PL/SQL Release 10.2.0.2.0 – Production
CORE 10.2.0.2.0 Production
TNS for Linux: Version 10.2.0.2.0 – Production
NLSRTL Version 10.2.0.2.0 – Production
效果如下,这是一个普遍性问题,在9i、10g中都存在:
SQL> create or replace procedure test_SETCHARSET
2 is
3 doc xmldom.DOMDocument;
4 main_node xmldom.DOMNode;
5 root_node xmldom.DOMNode;
6
7 item_node xmldom.DOMNode;
8 root_elmt xmldom.DOMElement;
9 item_elmt xmldom.DOMElement;
10 item_text xmldom.DOMText;
11
12
13
14 buffer_problem varchar2(2000);
15 buffer_root_node varchar2(2000);
16 buffer_doc_header varchar2(80);
17 buffer_doc varchar2(2000);
18 reqRootNode xmldom.DOMNode;
19
20 BEGIN
21 —
22 — the problem :
23 —
24 dbms_output.put_line(‘=========== ‘);
25 dbms_output.put_line(‘ PROBLEM: setCharSet ISO-8859-1 has no effect’ );
26
27 doc := xmldom.newDOMDocument;
28 main_node := xmldom.makeNode(doc);
29 xmldom.setversion(doc,’1.0′);
30 xmldom.setCharset(doc,’ISO-8859-1′);
31 root_elmt := xmldom.createElement(doc, ‘A’);
32 root_node := xmldom.appendChild( main_node, xmldom.makeNode(root_elmt));
33
34 item_elmt := xmldom.createElement(doc, ‘B’);
35 item_node := xmldom.appendChild(root_node, xmldom.makeNode(item_elmt));
36 — chr (192) : LATIN CAPITAL LETTER A WITH GRAVE in ISO-8859-1
37 item_text := xmldom.createTextNode(doc, ‘X’ ||chr (192) ||’X’);
38 item_node := xmldom.appendChild(item_node, xmldom.makeNode(item_text));
39
40 xmldom.writetobuffer(doc, buffer_problem);
41 — the final document here is encoded in UTF8
42 dbms_output.put_line(buffer_problem);
43 dbms_output.put_line(‘ ‘);
44 dbms_output.put_line(‘=========== ‘);
45
46 —
47 — workaround
48 —
49
50 dbms_output.put_line(‘ WORKAROUND:’ );
51 dbms_output.put_line(‘ ‘);
52 buffer_doc_header := ‘<?xml version=”1.0″ encoding=”ISO-8859-1″?>’;
53 reqRootNode := xmldom.makeNode (xmldom.getDocumentElement(doc));
54
55 xmldom.writetobuffer(reqRootNode, buffer_root_node);
56 buffer_root_node := convert (buffer_root_node,’WE8ISO8859P1′,’UTF8′);
57 buffer_doc := buffer_doc_header || buffer_root_node;
58
59 dbms_output.put_line(buffer_doc );
60 dbms_output.put_line(‘=========== ‘);
61 —
62
63 xmldom.freeDocument(doc);
64
65 END;
66 /
Procedure created.
SQL> set serveroutput on
SQL> exec test_setcharset
===========
PROBLEM: setCharSet ISO-8859-1 has no effect
<?xml version=”1.0″?>
<A>
<B>XX</B>
</A>
===========
WORKAROUND:
<?xml version=”1.0″ encoding=”ISO-8859-1″?><A>
<B>XX</B>
</A>
===========
PL/SQL procedure successfully completed
—-想了解更多的linux相关异常处理怎么解决关注<计算机技术网(www.ctvol.com)!!>
本文来自网络收集,不代表计算机技术网立场,如涉及侵权请联系管理员删除。
ctvol管理联系方式QQ:251552304
本文章地址:https://www.ctvol.com/uncategorized/53159.html