<% Function CharStripper(DaString) DaString = Replace(DaString,"%","") DaString = Replace(DaString,"<","") DaString = Replace(DaString,">","") DaString = Replace(DaString,"{","") DaString = Replace(DaString,"}","") DaString = Replace(DaString,"[","(") DaString = Replace(DaString,"]",")") DaString = Replace(DaString,";",",") CharStripper = LCase(DaString) End Function %>