Fungsi ASP yang umum digunakan: BHTML()

<%
'Fungsi: Setara dengan peningkatan HTMLEncode2. Tidak perlu mengulang seluruh string.
'Sumber: http://www.downcodes.com/536459.html

Fungsi BHTML
BHTML = BStr(s)
BHTML = Server.HTMLEncode(BHTML)
BHTML = Ganti(BHTML, " ", " ")
BHTML = Ganti(BHTML, " ", " ")
BHTML = Ganti(BHTML, vbCr, "<br />")
BHTML = Ganti(BHTML, vbLf, "<br />")
BHTML = Ganti(BHTML, vbTab, " ")
Fungsi Akhir
%>