asp ÈçºÎ×öÄÜÌá¸ßÁ´½Ó´«µÝ²ÎÊýµÄ°²È«ÐÔ
Âé·³´ó¼Ò¸øÌáÌáÒâ¼ûÈçºÎ×ö²ÅÄÜ×öµ½Á´½Ó²ÎÊýµÄ°²È«ÐÔ
ûÓз־ÍûÈËÀí£¿
ÊÔÊÔÕâÖÖ¡£¡£
VBScript code:
Dim Query_Badword,Form_Badword,i,Err_Message,Err_Web,name
'------¶¨Ò岿·Ý Í·----------------------------------------------------------------------
Err_Message = 1 '´¦Àí·½Ê½£º1=ÌáʾÐÅÏ¢,2=תÏòÒ³Ãæ,3=ÏÈÌáʾÔÙתÏò
Err_Web = "Err.Asp" '³ö´íʱתÏòµÄÒ³Ãæ
Query_Badword="'¡Îand¡Îselect¡Îupdate¡Îchr¡Îdelete¡Î%20from¡Î;¡Îinsert¡Îmid¡Îmaster.¡Îset¡Îchr(37)¡Î="
'ÔÚÕⲿ·Ý¶¨Òåget·Ç·¨²ÎÊý,ʹÓÃ"¡Î"ºÅ¼ä¸ô
Form_Badword="'¡Î%¡Î&¡Î*¡Î#¡Î(¡Î)¡Î=" 'ÔÚÕⲿ·Ý¶¨Òåpost·Ç·¨²ÎÊý,ʹÓÃ"¡Î"ºÅ¼ä¸ô
'------¶¨Ò岿·Ý β-----------------------------------------------------------------------
'
On Error Resume Next
'----- ¶Ô get query Öµ µÄ¹ýÂË.
if request.QueryString<>"" then
Chk_badword=split(Query_Badword,"¡Î")
FOR EACH Query_Name IN Request.QueryString
for i=0 to ubound(Chk_badword)
If Instr(LCase(request.QueryString(Query_Name)),Chk_badword(i))<>0 Then
Select Case Err_Message
Case "1"
Response.Write "<Script Language=JavaScript>alert('´«²Î´íÎ󣡲ÎÊý "&name&" µÄÖµÖаüº¬·Ç·¨×Ö·û´®£¡\n\nÇë²»ÒªÔÚ²ÎÊýÖгöÏÖ£ºand update delete ; insert mid master µÈ·Ç·¨×Ö·û£¡');window.close();</Script
Ïà¹ØÎÊ´ð£º
ÓÐÄÄλ¸ßÊÖÓùýASP FCKÔÚÏß±à¼Æ÷ѽ£¬ËüÄǸöͼƬÉÏ´«¹¦ÄÜÔõôÅäÖÃѽ
ÄܸøÎÒ·¢¸öÄÜÓÃFCKÔÚÏß±à¼Âð£¿Ò»¶¨ÄÜÉÏ´«Í¼Æ¬¹¦ÄܵÄѽ£¬¼±Ñ½
Ö±½Óµ½¹Ù·½ÍøÕ¾È¥Ï¸ö¾Í¿ÉÒÔÁË£¬¹ØÓÚÉèÖÃô£¬Ö±½ÓGOOGLEÒ»ÏÂÄãµÄ°æ±¾ºÅ¾Í¿ÉÒÔÕÒµ ......
ÏÖÔÚÕâÉç»á»ù±¾Éϲ»ÐèÒªASP³ÌÐòÔ±ÁË,Ò»ÃæÊÔ,¶¼Òª.NET»òÕßPHP,JSPµÄ,°¥,,,,ASPÕâô²»ÖµÇ®Âð,ѧϰASPÊǸö´íÎóÂð
ûɶ´íÎó Ò»¾ä»°£º¼¼¶à²»Ñ¹Éí
¿¿ASP¶¼»ì²»µ½·¹³ÔÁË ÔÎ ÔÎ
ÎÒµÄÒâ˼ÊǶàѧһÃż¼Êõûɶ´íÎó ......
ÓÐËÄܸø½²½²£¬Ôõô×öÂð£¿
ллÀ²£¡
¸ÊÌØÍ¼ ÊÇɶ£¿
½âÌâ˼·.¿´Ò»Ï½ø¶ÈÌõµÄÏÔʾ..
ÆäʵÄã¾ÍŪһ¶Ñtable ÿ¸ötableµÄ¿í¶È²»Í¬.µ×É«²»Í¬¼´¿É
µ±È»ÓÃdiv¿ØÖÆÎ»ÖøüºÃ
ÄãŪ100¸ötable¸ù¾Ý½ø¶ÈÆäÖÐǰ20¸ö·Ö¸øµ ......
²»ÊÇÖ±½Ó´ò¿ª£¬¶øÊǶÁÈ¡ÄÚÈÝ£¬È»ºó¿ÉÒÔ²Ù×÷µÄÊý¾Ý£¬¿ÉÒÔ´æ´¢µ½Êý¾Ý¿â»òÕßÏÔʾÔÚÒ³ÃæÉÏ¡£
wordÎļþÔÚ·þÎñÆ÷¶Ë¡£
¿ÉÒÔ¿¼ÂÇÓõÚÈý·½×é¼þ
http://officewriter.softartisans.com/officewriter-372.aspx
ÓÐÖÐÎÄ˵ ......
¸÷λ¸ßÊÖ£¬¾ÈÃü°¡¡£
ǰ¼¸Ì쵥λÁìµ¼ÈÃÎÒ±àÁËÒ»¸öÐ¡ÍøÕ¾£¬ÓÃASP±àµÄ£¬¹¦Äܼܺòµ¥£º¾ÍÊÇÓɼ¸¸öÁìµ¼·¢Í¨Öª£¬ÆäËûÈËÖ»Äܹۿ´¡£
ÎÊÌâ³öÀ´ÁË£¬µ¥Î»ÀïÓÐЩÈËÄþ¿ÉÈ¥ÍæÓÎÏ·£¬Ò²²»¿Ï³é¿Õ¿´¿´Õâ¸öÍøÕ¾¡£
Áìµ¼Ë ......