Es wird häufig bei der Ausgabe von RSS und XML verwendet und ist nicht genau das gleiche wie HTMlencode
Prinzip:
| Charakter | Konvertiert zu |
| " | |
| '' | '' |
| & | & |
| < | < |
| > | > |
Code
<%
Funktion xmlencode (Byval -Stufe)
STEXT = Ersetzen (STEXT, "&", "&")
stext = ersetzen (stext, "<", "<")
STEXT = SEVED (STEXT, ">", ">")
STEXT = Ersetzen (STEXT, "'", "'")
STEXT = Ersetzen (STEXT, "" "," ")
Xmlencode = STEXT
Endfunktion
%>
Ein anderer:
<%
Öffentliche Funktion xmlencode (Byval Strtext als Zeichenfolge) als String
Schwacher Arychars () als Variante
Arychars = Array (38, 60, 62, 34, 61, 39)
Dim ich als Ganzzahl
Für i = 0 bis Ubound (Arychars)
strtext = ersetzen (strtext, chr (arychars (i)), "&#" & arychars (i) & ";")
Nächste
Xmlencode = strtext
Endfunktion
%>