Line 76 Print "<text>" & XMLEscape(Cstr(value)) & "</text>"



can be replace by something like this.

                If Isarray ( value ) Then<br/>
                    ' code to hadle array goes here<br/>
                    Print &quot;&lt;text&gt;&quot; <br/>
                    Forall arrayvalue In value<br/>
                        Print  XMLEscape(Cstr(arrayvalue)) <br/>
                    End Forall  <br/>
                    Print  &quot;&lt;/text&gt;&quot;<br/>
                Else<br/>
                    Print &quot;&lt;text&gt;&quot; &amp; XMLEscape(Cstr(value)) &amp; &quot;&lt;/text&gt;&quot;<br/>
                End If              <br/>

This issue is in all versions.