函数:
5 q' W0 C4 u: h6 u<%
" q0 v$ Z4 g4 zfunction HTMLEncode(fString)
: q8 ?3 c# g1 l6 P fString = replace(fString, ">", ">")
& ]2 |- {) g4 K3 i1 O fString = replace(fString, "<", "<")
: G/ B' d3 S* v/ v. ?6 M fString = Replace(fString, CHR(32), " ")
) o2 U4 [* f$ v" R fString = Replace(fString, CHR(13), "")# c: D* O7 k, Y0 ]4 _
fString = Replace(fString, CHR(10) & CHR(10), "</P><P>"); x5 x* D9 A4 M
fString = Replace(fString, CHR(10), "<BR>")
+ L: a# o6 F; Q. [" p4 \5 m6 j HTMLEncode = fString1 a/ g6 ~* J' ?1 L9 o X: @
end function
: x/ n4 F( S2 a- q( \' _%>* B0 m: _' w5 ~* ^$ `
调用:
4 J+ N2 b. z( [6 n% {$ v& L$ c" X<%=HTMLEncode(rs("*"))%> |