ÕßÕßÈí¼þ ASPÈçºÎ»ñÈ¡ÕæʵIPµØÖ·
ÔÚ ASP ÖÐʹÓà Request.ServerVariables("REMOTE_ADDR") À´È¡µÃ¿Í»§¶ËµÄ IP µØÖ·£¬µ«Èç¹û¿Í»§¶ËÊÇʹÓôúÀí·þÎñ
Æ÷À´·ÃÎÊ£¬ÄÇÈ¡µ½µÄ¾ÍÊÇ´úÀí·þÎñÆ÷µÄ IP µØÖ·£¬¶ø²»ÊÇÕæÕýµÄ¿Í»§¶Ë IP µØÖ·¡£ÒªÏë͸¹ý´úÀí·þÎñÆ÷È¡µÃ¿Í»§¶ËµÄÕæʵ
IP µØÖ·£¬¾ÍҪʹÓà Request.ServerVariables("HTTP_X_FORWARDED_FOR") À´¶ÁÈ¡¡£
¡¡¡¡²»¹ýҪעÒâµÄÊ£¬²¢²»ÊÇÿ¸ö´úÀí·þÎñÆ÷¶¼ÄÜÓà Request.ServerVariables("HTTP_X_FORWARDED_FOR") À´¶ÁÈ¡¿Í»§¶Ë
µÄÕæʵ IP£¬ÓÐЩÓô˷½·¨¶ÁÈ¡µ½µÄÈÔÈ»ÊÇ´úÀí·þÎñÆ÷µÄ IP¡£
¡¡¡¡»¹ÓÐÒ»µãÐèҪעÒâµÄÊÇ£ºÈç¹û¿Í»§¶ËûÓÐͨ¹ý´úÀí·þÎñÆ÷À´·ÃÎÊ£¬ÄÇôÓà Request.ServerVariables
("HTTP_X_FORWARDED_FOR") È¡µ½µÄÖµ½«Êǿյġ£Òò´Ë£¬Èç¹ûÒªÔÚ³ÌÐòÖÐʹÓô˷½·¨£¬¿ÉÒÔÕâÑù´¦Àí£º
......
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")
......
¡¡¡¡¼´£ºÈç¹û¿Í»§¶Ëͨ¹ý´úÀí·þÎñÆ÷£¬ÔòÈ¡ HTTP_X_FORWARDED_FOR µÄÖµ£¬Èç¹ûûͨ¹ý´úÀí·þÎñÆ÷£¬¾ÍÈ¡ REMOTE_ADDR µÄÖµ¡£
Ïà¹ØÎĵµ£º
·½·¨Ò» : ½ûÓÃHTML
×î¼òµ¥µÄ·½·¨ÊÇÖ±½Ó½ûÓÃhtml±êÇ©¶ø²»ÓÃÒƳýËüÃÇ. ¿ÉÒÔʹÓÃReplace()º¯Êý. ÀýÈç:
strText = Replace(strText, "<script", "<script", 1, -1, 1)
»òÕßÖ±½Ó½ûÓÃËùÓеÄhtml:
strText = Replace(strText, "<", "<")
ÕâÑù×öËäÈ»ºÜ°²È«,µ«ÏԵò»¹»ÓѺÃ.(Óû§Ìá½»µÄÎı¾»á±äµ ......
Ö»ÄÜÊäÈë1¸öÊý×Ö
±í´ïʽ ^\d$
ÃèÊö Æ¥ÅäÒ»¸öÊý×Ö
Æ¥ÅäµÄÀý×Ó 0,1,2,3
²»Æ¥ÅäµÄÀý×Ó
Ö»ÄÜÊäÈën¸öÊý×Ö
±í´ïʽ ^\d{n}$ ÀýÈç^\d{8}$
ÃèÊö Æ¥Åä8¸öÊý×Ö
Æ¥ÅäµÄÀý×Ó 12345678,22223334,12344321
²»Æ¥ÅäµÄÀý×Ó
Ö»ÄÜÊäÈëÖÁÉÙn¸öÊý×Ö
±í´ïʽ ^\d{n,}$ ÀýÈç^\d{8, ......
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = false '²»ÏÔʾ¾¯¸æ
'xlApp.Application = false ......
'--------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<script>
function checkAll(){
for (i=0;i<document.forms[1].length;i++){
if (document.forms[1][i].tagName= ......
<%
Function Zodiac(birth)
If IsDate(birth) Then
birthyear = Year(birthday)
ZodiacList = Array("ºï", "¼¦", "¹·", "Öí", "Êó", "Å£", "»¢", "ÍÃ", "Áú", "Éß", "Âí", "Ñò")&nbs ......