¹ØÓÚ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Õâ¸ö±äÁ¿¸üÐÂ×ֶξͺÃÁË£¬Ò²Ðí»¹ÓбÈÕâ¸üºÃµÄËã·¨£¬Íû´ó¼Ò´Í½Ì£¡
¶¥Ò»Ï£¬Ôø¾Ò²Óöµ½¹ýÕâ¸öÎÊÌâ¡£
Ïà¹ØÎÊ´ð£º
conn.asp
<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.MapPath("Connt ......
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
½¨ÁËÒ»¸öÕ¾µã£¬ÀïÃæÓÐ login.aspx. events.aspx µÈµÈ ÆäËûµÄÒ³Ãæ¡£
µ«ÊÇÎÒµ÷ÊÔ ÆäËûÒ³ÃæµÄʱºò£¬±Ä³öÀ´µÄ×ÜÊÇ login.aspx Ò³Ãæ¡£
¸Õѧasp ÇëÖ¸½Ì
ÄãÉèÖÃÆðʼҳÁ˰ɡ£¡£
¶÷ÔõôȡÏûÄØ£¿
Òªµ ......
ÓÐÄÄλ¸ßÊÖÓùýASP FCKÔÚÏß±à¼Æ÷ѽ£¬ËüÄǸöͼƬÉÏ´«¹¦ÄÜÔõôÅäÖÃѽ
ÄܸøÎÒ·¢¸öÄÜÓÃFCKÔÚÏß±à¼Âð£¿Ò»¶¨ÄÜÉÏ´«Í¼Æ¬¹¦ÄܵÄѽ£¬¼±Ñ½
Ö±½Óµ½¹Ù·½ÍøÕ¾È¥Ï¸ö¾Í¿ÉÒÔÁË£¬¹ØÓÚÉèÖÃô£¬Ö±½ÓGOOGLEÒ»ÏÂÄãµÄ°æ±¾ºÅ¾Í¿ÉÒÔÕÒµ ......
ÎÒÓÐÒ»¸öÎļþÃû aaa.bbb.rar»òÕßa.b.c.d.html»òÕßaa.b.dd.shtml
ÎÒÔõÑù½ØÈ¡ÎļþµÄºó׺Ãûѽ¡£¡£¡£
<%
aa="aaa.bbb.rar"
bb=split(aa,".")
response.write bb(ubound(bb)) ......