ASPÈçºÎ¼ÆËãÖÐÓ¢ÎÄ»ìºÏ×Ö·û´®³¤¶ÈºÍ½ØÈ¡×Ö·û´®
ÓÃASP×öÍøÕ¾µÄʱºò¾³£»áÅöµ½Òª½ØÈ¡×Ö·û´®µÄÇé¿ö¡£ASPÖеÄLenº¯Êý²»¹ÜÊÇÖÐÎÄ×Ö·û£¬»¹ÊÇÓ¢ÎÄ×Ö·û£¬Í³Í³°´Ò»¸öµ¥Î»À´¼ÆË㣬ÓÉÓÚÒ»¸öÖÐÎÄ×Ö·ûµÄ¿í¶ÈÊÇÒ»¸öÓ¢ÎÄ×Ö·û¿í¶ÈµÄÁ½±¶£¬ÔÚÖÐÓ¢ÎÄ»ìºÏµÄÇé¿öÏÂ×Ö·û´®Êµ¼ÊÕ¼ÓõĿí¶È¾Í²»ºÃ¼ÆËãÁË£¬Èç¹û°´ÕÕLenº¯Êý¼ÆËãµÄ³¤¶ÈÀ´½ØÈ¡×Ö·û´®½Ø³öÀ´µÄЧ¹ûÒ²»á³¤¶Ì²»Ò»£¬ÏÂÃæÊÇ°´ÕÕÒ»¸öºº×ÖÏ൱ÓÚÁ½¸öÓ¢ÎÄ×Ö·ûÀ´¼ÆËã×Ö·û´®³¤¶ÈºÍ½ØÈ¡×Ö·û´®µÄ´úÂë
¼ÆËãÖÐÓ¢ÎÄ»ìºÏ×Ö·û´®µÄ³¤¶È£º
function getStringLen(str)
on error resume next
dim l,c,i,t
l=len(str)
t=l
for i=1 to l
c=asc(mid(str,i,1))
if c>=128 or c<0 then t=t+1
next
getStringLen=t
if err.number<>0 then err.clear
end function
½ØÈ¡×Ö·û´®£º
function getSubString(str,Length)
on error resume next
dim l,c,i,hz,en
l=len(str)
if l<length then
getSubString=str
else
hz=0
en=0
for i=1 to l
c=asc(mid(str,i,1))
if c>=128 or c<0 then
hz=hz+1
else
en=en+1
end if
if en\2+hz>=length then
exit for
end if
next
getSubString=left(str,i) & "…"
end if
if err.number<>0 then err.clear
end function
Ïà¹ØÎĵµ£º
Ö±±¼Ö÷Ìâ.
Ä¿Ç°ÔÚά»¤Ò»Ì×´óÐ͵ÄASPÊÛºóϵͳ(2000¶à¸öasp page),´úÂëÊÇ2001Äê³öÀ´µÄ,ÆÚ¼ä¶àÄêδ×ö¸üÐÂ,´úÂëÖвÎÔÓ¶à¸ö³ÌÐòÔ±µÄ·ç¸ñ,½á¹¹ÉÏÖ»ÊǼòµ¥µÄ½«main function ¼¯ÖÐÆðÀ´,½«¸´ÔÓµÄsql¼¯ÖÐÆðÀ´. Ò³ÃæÉÏÏ൱»ìÂÒ.
ûÓмòµ¥µØȥתÏò.net»·¾³,ÒòΪÕâ¸öÏµÍ³Ê¹Ó ......
1 Ç°ÑÔ
2 ¼òÊöÈý²ã¼Ü¹¹
3 ½¨Á¢Õ¾µãµÄ´óÌå½á¹¹
3.1 ´úÂëĿ¼
3.2 Ê× ......
ÔÚ ASP ÖÐʹÓà Request.ServerVariables("REMOTE_ADDR") À´È¡µÃ¿Í»§¶ËµÄ IP µØÖ·£¬µ«Èç¹û¿Í»§¶ËÊÇʹÓôúÀí·þÎñ
Æ÷À´·ÃÎÊ£¬ÄÇÈ¡µ½µÄ¾ÍÊÇ´úÀí·þÎñÆ÷µÄ IP µØÖ·£¬¶ø²»ÊÇÕæÕýµÄ¿Í»§¶Ë IP µØÖ·¡£ÒªÏë͸¹ý´úÀí·þÎñÆ÷È¡µÃ¿Í»§¶ËµÄÕæʵ
IP µØÖ·£¬¾ÍҪʹÓÃ& ......
ÔÚ¶àÏîÑ¡ÔñµÄһЩӦÓÃÖУ¬¿ÉÒÔÓöþ½øÖÆ1´ú±íÑ¡ÖУ¬0´ú±í²»Ñ¡¡£ÀýÈç¸øijÓû§½ÇÉ«·ÖÅäȨÏÞabcdefg£¬Ñ¡ÖÐÇé¿öÊÇ1001101£¬ÄÇô´Ë½ÇÉ«°üº¬ËÄÏîȨÏÞ£¬ÓÃÒ»¸ö±äÁ¿±íʾ£¬ÏàÓ¦µÄÊ®½øÖÆÊýÊÇ77¡£
µ«ÊÇ£¬ÔÚASPÖеĶàÏîÑ¡Ôñ£¬¾Í²»ÊʺÏÕâÖÖÒÔÊýÖµµÄÐÎʽ¼Ç¼ѡÖÐÇé¿ö¡£ÒòΪ£¬µ±ÏîÄ¿ÊýºÜ¶àʱ£¨ÀýÈç6 ......
1.ÊýÖµÐͺ¯Êý£º abs(num): ·µ»Ø¾ø¶ÔÖµ sgn(num): num>0 1; num=0 0; num<0 -1;ÅжÏÊýÖµÕý¸º hex(num): ·µ»ØÊ®Áù½øÖÆÖµ Ö±½Ó±íʾ£º&Hxx ×î´ó8λ oct(num): ·µ»Ø°Ë½øÖÆÖµ Ö±½Ó±íʾ£º&Oxx ×î´ó8λ sqr(num): ·µ»Øƽ·½¸ù num>0 int(num): È¡Õû int(99.8)=99; int(-99.2)=100 fix(num): È¡Õû fix(99.8)=99; fix ......