ฟังก์ชันในการกรองอักขระที่ไม่อารยะในโปรแกรม asp
-
ฟังก์ชั่น cutbadchar(str)
badstr = อารยธรรม | . อักขระ |
badword=แยก(badstr,|)
สำหรับ i=0 ถึง Ubound(badword)
ถ้า instr(str,badword(i)) > 0 แล้ว
str=แทนที่(str,badword(i),***)
สิ้นสุดถ้า
ต่อไป
ตัดแบดชาร์=str
ฟังก์ชันสิ้นสุด
-