如何分析XML节点属性但保护节点属性文本格式？

Question

1。我的XML文件使用GB2312编码，我已将其修改为UTF-8。 2.修改完XML节点属性后，嵌入节点属性中的VB片段完全混乱，导致VB无法正常工作

我已经尝试将其读取并保存为UTF-8编码

<?xml version="1.0" encoding="GB2312" ?>
<ztpage rect="0,0,8000,800" layer="1073741823" version="2" mag="100,100" zoom="100,400" pagetitle="0EOCCSIGZCT" refreshrate="1000" pagepos="0,100,3840,900" script='Sub page_OnLoad()
    &apos;page.SetPos 0,180,10000,800
    &apos;page.GetPos EOCCSIGZCT,a,b,c,d
    &apos;MsgBox a
    &apos;page.ZoomPan 
    page.EnableZoom = 2
    page.ShowScrollBar = 1
    page.ZoomStepPercent = 10
    &apos;
    sys.WriteValue  "$DJS", 0 
    &apos; 

 <?xml version='1.0' encoding='GB2312'?>
<ztpage layer="1073741823" mag="100,100" pagepos="0,100,3840,900" pagetitle="0EOCCSIGZCT" rect="0,0,8000,800" refreshrate="1000" script="Sub page_OnLoad()     'page.SetPos 0,180,10000,800     'page.GetPos EOCCSIGZCT,a,b,c,d     'MsgBox a     'page.ZoomPan    page.EnableZoom = 2     page.ShowScrollBar = 1     page.ZoomStepPercent = 10          sys.WriteValue  &quot;$DJS&quot;, 0            sys.WriteValue  &quot;$DCHXY&quot;, 1     sys.WriteValue  &quot;$WLQDXY&quot;,1     sys.WriteValue  &quot;$LJQDXY&quot;,1       sys.WriteValue  &quot;$LXHXY&quot;, 1   '   sys.WriteValue  &quot;$MDDMXY&quot;,1  '     sys.WriteValue  &quot;$LIECHEXIANSHI&quot;,1        sys.WriteValue  &quot;$beishu&quot;,1       'sys.WriteValue  &quot;$FWHXY&quot;, 0          End Sub  Sub page_OnLButtonUp(lFlag, lPointX, lPointY)     page.ZoomPan End Sub  Dim a,c  Sub Timer2_OnTimer() Dim b sys.ReadValue &quot;OCC.AAA.F_CV&quot;,c If a&lt;&gt;c Then sys.ReadValue &quot;OCC.AAA.F_CV&quot;,a  sys.WriteValue &quot;OCC.BBB.F_CV&quot;, a  End If sys.ReadValue &quot;OCC.BBB.F_CV&quot;,b b = b-1 If  b&gt;-1 Then  sys.WriteValue  &quot;OCC.BBB.F_CV&quot;, b sys.WriteValue  &quot;$DJS&quot;,b  End If  End Sub 

1。最初，为了方便起见，我想用Python解决它，如何保存XML格式呢？