function SuperFilter(txt)'检测非法字符
SuperFilter=txt
chrtxt="33|34|35|36|37|38|39|40|41|42|43|44|47|58|59|60|61|62|63|91|92|93|94|96|123|124|125|126|128"
chrtext=split(chrtxt,"|")
for c=0 to ubound(chrtext)
SuperFilter=replace(SuperFilter,chr(chrtext(c)),"")
next
end function
%>