¹ØÓÚ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Õâ¸ö±äÁ¿¸üÐÂ×ֶξͺÃÁË£¬Ò²Ðí»¹ÓбÈÕâ¸üºÃµÄËã·¨£¬Íû´ó¼Ò´Í½Ì£¡
¶¥Ò»Ï£¬Ôø¾Ò²Óöµ½¹ýÕâ¸öÎÊÌâ¡£
Ïà¹ØÎÊ´ð£º
ÎÒÃÇÓÐÒ»¸öÍøÕ¾Ä£°å£¬www.c111.com.cn,Ï£ÍûÐÞ¸ÄһЩµØ·½£º
1£©µã»÷×ó²à¡°·þÎñÆ·ÅÆ¡±µÄÆäÖÐÒ»¸öС·ÖÀ࣬Èç¡°×ãÇò¡±£¬½çÃæµÄÓÒ²à¾Í³öÏÖÈçwww.c111.com.cn/1.jpg£¬µã»÷1.jpgÉÏ·½µÄÆäÖÐÒ»¸öÆ·ÅÆlogo£¬ÏÂÃæ¾Í³öÏÖÏà¹ØµÄÍ ......
µ±½áÊøÊ±¼ä´óÓÚ¿ªÊ¼Ê±¼äÔòÏÔʾδÍê³É
µ±½áÊøÊ±¼äСÓÚ¿ªÊ¼Ê±¼äÔòÏÔʾδ´ïµ½ÈÎÎñ
ûÓÐʱ¼äÔòÏÔʾÕýÔÚ½øÐÐÖÐ
asp´úÂëÓ¦¸ÃÔõôд
Èç:¿ªÊ¼Ê±¼ä ½áÊøÊ±¼ä & ......
ÎÒÏëÓÃaspд¸öÒ³ÃæÒÔǰûÓнӴ¥¹ý£¬ÎÒ¿´ÍøÉÏ˵aspµÄÔËÐл·¾³Ö»ÄÜÊÇwindows£¬»¹±ØÐëҪװIIS¡£
Çë½Ì¸÷λ¸ßÊÖ£¬asp»¹ÓÐÆäËûµÄÔËÐл·¾³Âð?
²î²»¶à¾ÍÕâЩÁË£¬¾ÍÊÇIISÒ»¶¨Òª×°ºÃ
»¹ÓÐÒªÊÇÓÃVS2005µÄ»°ºÃÏñ¿ÉÒÔÖ±½ÓÔ ......
<%
Sql="select top 8 * from NewsData where d_classid in (select classid from NewsClass where ParentID=16)"
Rs.Open Sql, conn, 1,1
Do Until Rs.Eof
......
ÏÖÔÚÕâÉç»á»ù±¾Éϲ»ÐèÒªASP³ÌÐòÔ±ÁË,Ò»ÃæÊÔ,¶¼Òª.NET»òÕßPHP,JSPµÄ,°¥,,,,ASPÕâô²»ÖµÇ®Âð,ѧϰASPÊǸö´íÎóÂð
ûɶ´íÎó Ò»¾ä»°£º¼¼¶à²»Ñ¹Éí
¿¿ASP¶¼»ì²»µ½·¹³ÔÁË ÔÎ ÔÎ
ÎÒµÄÒâ˼ÊǶàѧһÃż¼Êõûɶ´íÎó ......