ASP 프로그램에서 미개한 문자를 필터링하는 기능 <% 함수 cutbadchar(str) badstr = 미개한 문자 | 열 형식 | 나쁜 단어=분할(badstr,|) i=0에서 Ubound(badword)까지 instr(str,badword(i)) > 0이면 str=바꾸기(str,badword(i),***) 종료 조건 다음 cutbadchar=str 기능 종료 %>