تقدم هذه المقالة بشكل أساسي تقييد بعض الأحرف في التعليقات في ASP. المبدأ هو البحث من خلال وظيفة instr. يبدو الأمر بسيطًا للغاية، لكن الكتابة لا تزال محرجة بعض الشيء، وأشعر وكأنني من هوينان
Sub CheckCanSubmit(str) Dim connt,connts connt="Mark Six Lottery، أفلام مجانية، Amway، http، www،<a" connts = Split(connt,"،") لكل كلمة gl في conntsif instr(str,glword)< >0 ثمResponse.Write("<script>alert('عملية غير قانونية');window.history.go(-1);</script>") Response.End() ينتهي إذا النهاية الفرعية التالية