Часто используемые функции ASP: BHTML().

<%
'Функция: эквивалент обновления HTMLEncode2. Нет необходимости зацикливать всю строку.
'Источник: http://www.downcodes.com/536459.html

Функция BHTML(ы)
BHTML = BStr(ы)
BHTML = Server.HTMLEncode(BHTML)
BHTML = Заменить(BHTML, " ", " ")
BHTML = Заменить(BHTML, " ", " ")
BHTML = Заменить(BHTML, vbCr, "<br />")
BHTML = Заменить(BHTML, vbLf, "<br />")
BHTML = Заменить(BHTML, vbTab, " ")
Конечная функция
%>