¹ØÓÚASPÌá½»¼ì²âÊý¾ÝÎÊÌâ
ÏÖÔÚÎÊÌâÊÇÕâÑùµÄ
ÔÚÎı¾ÓòÀïÓÐÕâÑùÒ»ÌõÄÚÈÝ
°ÂÔË2009
µ±½øÐÐÌá½»²¢Ð´ÈëÊý¾Ý¿âʱ Ôõô°ÑÊý×Öɾ³ý Ö»ÌáÈ¡ÎÄ×ÖÄÚÈÝ£¿
Íû¸÷λ´óϺָ¶¨Ò»µã~~±¾È˲ËÄñ
¶¥ÉÏÏÈ
VBScript code:
s = "°ÂÔË2009"
Set re = New RegExp
With re
.Global = True
.Pattern = "\d"
s = .Replace(s, "")
End With
Response.Write s
ÕâÑùŪ²»¶Ô°¡
ÕâÑùÖ»ÊÇÒ»ÌõÊý¾Ý
¶øÕâÀïÊǽá¹ûÊä³öµÄµØ·½
²½ÖèÊÇÕâÑùµÄ£º
²éÑ¯Ò³Ãæ------½á¹ûÊä³öÒ³Ãæ------Ìá½»Õâ¸ö½á¹û
ÔÚ½á¹ûÊä³öÒ³ÃæÀï ¾ÍÓÐÊý×Ö ¶øÎÒÏëÌύʱ Ö±½Ó°ÑÊý×Ö¹ýÂ˵ô
2Â¥ÒѾ¸ø³öÁË˼·£¬¾ßÌåÔõôʵÏÖÂ¥Ö÷¿ÉÒÔ×Ô¼º¸Ä¸Ä×öÁË
¶¥ÉÏ¡£¡£¡£Íû¸ßÈËÖ¸µã¡£¡£
dim i
dim getChar
getChar=""
for i=0 to len(×Ö¶Î)-1
if not isNum(mid(×Ö¶Î,i,1)) then
getChar=getChar&isNum(mid(×Ö¶Î,i,1))
end if
next
¼òµ¥½éÉÜÒ»ÏÂËã·¨£º
ÏȶÁÈ¡×Ö¶ÎÖеÄ×Ö·û´®£¬È»ºó°Ñ×Ö·û´®·Ö¸î³É×Ö·ûÀ´±È½Ï£¬Èç¹ûÊÇÊý×ֵľͲ»¹Ü£¬²»ÊÇÊý×ֵľÍÖØÐ¸³Öµ¸øgetCharÕâ¸ö±äÁ¿£¬È»ºóÓÃgetCharÕâ¸ö±äÁ¿¸üÐÂ×ֶξͺÃÁË£¬Ò²Ðí»¹ÓбÈÕâ¸üºÃµÄËã·¨£¬Íû´ó¼Ò´Í½Ì£¡
¶¥Ò»Ï£¬Ôø¾Ò²Óöµ½¹ýÕâ¸öÎÊÌâ¡£
Ïà¹ØÎÊ´ð£º
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
ÎÒÔ±¾ÊÇѧjspµÄ¿ÉÕÒÁËÒ»¸öASPµÄ¹«Ë¾£¡ÎÒÒªÖØÐÂѧϰ£¡ ѧϰASP£¡ Ï£Íû´ó¼ÒÍÆ¼öÒ»±¾ºÃÊ鏸ÎÒлл
<ASP3.0¸ß¼¶±à³Ì> ÍøÉÏÓеç×Ó°æµÄ
·¢ÏÖÍøÉÏaspÐÅϢʱ×î¶àµÄ ±ÈÆäËûµÄ¶¼¶àºÃ¶à
yun
ÕÒ±¾ÓÐÓ¦ÓÃÊÂÀýµÄA ......
ÓÐÄÄλ¸ßÊÖÓùýASP FCKÔÚÏß±à¼Æ÷ѽ£¬ËüÄǸöͼƬÉÏ´«¹¦ÄÜÔõôÅäÖÃѽ
ÄܸøÎÒ·¢¸öÄÜÓÃFCKÔÚÏß±à¼Âð£¿Ò»¶¨ÄÜÉÏ´«Í¼Æ¬¹¦ÄܵÄѽ£¬¼±Ñ½
Ö±½Óµ½¹Ù·½ÍøÕ¾È¥Ï¸ö¾Í¿ÉÒÔÁË£¬¹ØÓÚÉèÖÃô£¬Ö±½ÓGOOGLEÒ»ÏÂÄãµÄ°æ±¾ºÅ¾Í¿ÉÒÔÕÒµ ......
ÎÒÕÒÁËÒ»¸öα¾²Ì¬´úÂ룬ÈçÏ£º
index.asp
<!--#include file="config.asp"-->
<ol>
<%
Set rs=server.CreateObject("adodb.recordset") & ......
Ò»¶Îʱ¼äºó ¾Í²»ÄÜÓõÄÄÇÖÖ
¿ÉÒÔÓÃ×é¼þдÂð?
×é¼þ ÊDz»ÊDZØÐëÏÈÔÚ·þÎñÆ÷°²×° ²ÅÄÜʹÓÃ?
ÄÇÓÃÐéÄâÖ÷»úµÄ ²»¾ÍûϷÁË....
ewebeditor¾ÍÊÇҪע²á²ÅÄÜÓõÄ
Ã²ËÆÊÇûɶÓõ ......