<%'過濾sql注入代碼及HTML代碼防護
function nosql(str)
if not isnull(str) then
str=trim(str)
str=replace(str,";","&#59;")		'分號
str=replace(str,"'","&#39;")		'單引號
str=replace(str,"""","&quot;")		'雙引號
str=replace(str,"chr(9)","&nbsp;")	'空格
str=replace(str,"chr(10)","<br>")	'回車
str=replace(str,"chr(13)","<br>")	'回車
str=replace(str,"chr(32)","&nbsp;")	'空格
str=replace(str,"chr(34)","&quot;")	'雙引號
str=replace(str,"chr(39)","&#39;")	'單引號
str=Replace(str, "script", "&#115cript")'script
str=replace(str,"<","&lt;")	        '左<
str=replace(str,">","&gt;")	        '右>
str=replace(str,"(","&#40;")	        '左(
str=replace(str,")","&#41;")	        '右)
str=replace(str,"--","&#45;&#45;")	'SQL注釋符
nosql=str
end if
end function
%>