รีบป่าวครับรอพุ่งเน้นะเด๋วส่งไห้ asp หรือ ไรอ่ะครับ
Date :
11 ส.ค. 2551 18:52:37
By :
terayut
No. 2
Guest
รอได้ครับ aspครับ
ขอบคุณครับ
Date :
13 ส.ค. 2551 11:45:42
By :
manches
No. 3
Guest
ใช้ array แล้ว รีเพลส เอา ง่ายๆ งิ
ในบทเรียนก็มี
Date :
13 ส.ค. 2551 14:50:09
By :
กิด เวบพยากอน
No. 4
Guest
เหอะๆ ว่าจะเอามาไห้มัวแต่ทำงานซะจนลืม โทดทีค๊าพพพ
Date :
14 ส.ค. 2551 18:34:56
By :
terayut
No. 5
Guest
<%
Sub CheckbadWord(sTxt)
dim badword , i
badword = array("เลว","ชั่ว","โว้ย","ผึ้งน้อย")
For i=0 To Ubound(badword)
if InStr(sTxt , badword(i)) <> 0 then 'เปรียบเทียบระหว่างตัวแปรกับข้อมูลในอาร์เรย์
Response.Write("<script>alert('พบคำหยาบ ');history.back();</script>")
response.End()
end if
Next
End Sub
%>
Load balance : Server 03
