ASP でよく使用される関数: BHTML()

<%
'機能: HTMLEncode2 のアップグレードと同等。文字列全体をループする必要はありません。
' 出典: http://www.downcodes.com/536459.html

関数 BHTML
BHTML = BStr(s)
BHTML = Server.HTMLEncode(BHTML)
BHTML = 置換(BHTML, " ", " ")
BHTML = 置換(BHTML, " ", " ")
BHTML = 置換(BHTML, vbCr, "<br />")
BHTML = 置換(BHTML, vbLf, "<br />")
BHTML = 置換(BHTML, vbTab, " ")
終了機能
%>