asp»ñȡһ¸öÎļþ¼Ð¼°Æä×ÓÎļþ¼ÐϵÄËùÓÐͼƬµØÖ·
ÔÎÄÁ´½Ó:http://www.iwapr.cn/article/daima/30.html
ASP/Visual Basic´úÂë
<%
dim picurl,all_picurl
'½ÔÊÇÈ«¾Ö±äÁ¿:·Ö±ð¶¨ÒåͼƬµÄÁ´½ÓµØÖ·;ËùÓÐÖ¸¶¨Îļþ¼Ð(°üÀ¨Ö¸¶¨Îļþ¼ÐµÄ×ÓÎļþ¼ÐÏÂͼƬurlµØÖ·)
picurl="" 'ÉèÖÃͼƬÁ´½ÓµØÖ·Ä¬ÈÏֵΪ¿Õ,ΪÏÂÃæµÄcheckfolders()º¯ÊýÖ´ÐÐpicurl=picurl&"..."×ö×¼±¸.
Function checkRegExp(strPattern,str) 'ÕýÔòÆ¥ÅäËã·¨,strPattern´ú±íÕýÔò±í´ïʽ,str´ú±íÐèÒª²éѯƥÅäµÄ×Ö·û´®
Dim Exp
if str="" or isnull(str) then '¼ì²âÄãÒª²éѯµÄ×Ö·û´®ÊÇ·ñΪ¿Õ,Èç¹ûΪ¿Õ¾Í·µ»Øfalse
checkRegExp=false
end if
Set objExp=New regExp
objExp.pattern=strPattern 'Ö¸¶¨Æ¥ÅäÄ£°å
objExp.ignoreCase=false 'ÊÇ·ñºöÂÔ´óСд,ÕâÀï²»ºöÂÔ,ÄãÒ²¿ÉÒÔÉèÖúöÂÔ
objExp.Global=True 'Ö¸¶¨ÊÇ·ñÈ«¾ÖÆ¥Åä,ÕâÀïÉèÖÃΪȫ¾ÖÆ¥Åä
checkRegExp=objExp.Test(str) '·µ»Ø²éѯ½á¹û,Ò²¿ÉÒÔÕâÑùд return objExp.Test(str)
End function
Ïà¹ØÎĵµ£º
asp classÀàÓ÷¨
asp class
ÑϸñµØËµ£¬ASP ²¢²»ÊÇÒ»Ãűà³ÌÓïÑÔ£¬ËùÒÔ²»´æÔÚÀàÕâÒ»¸ÅÄÎÒÃÇÕâÀï˵ ASP ÀàÊÇÖ¸ ASP µÄ±à³ÌÓïÑÔ VBScript ÔÚ ASP ÀïÓ¦ÓÃʱµÄÀà¡£
ASP Àà±È½Ï¼òµ¥£¬Ëü²»¾ßÓÐÕæÕýÒâÒåÀàµÄ¼Ì³Ð¡¢ÖØÔصÈÌØÐÔ£¬¾¡¹ÜÈç´Ë£¬ËüÈÔÈ»ÊǷdz£ÓÐÓõģ¬Ëü½µµÍÁËÎÒÃDZà³ÌµÄ¸´ÔÓ¶È£¬Ê¹ÎÒÃǵijÌÐòÄ£¿é¸ü¼ÓºÏÀí¡£
A ......
<%
'µ÷ÊÔ£ºJAVAÖÐÎÄÍø:www.javaweb.cc/
'×¢Ò⣬°´ÕÕËù·ÅÖõÄĿ¼²»Í¬ÇëÐÞ¸ÄobjXmlHttpºÍÉú³ÉÊ×ҳ·¾¶
dim objXmlHttp,binFileData,objAdoStream
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET","http://"&request.ServerVariables("HTTP_HOST")&"/index.asp",false ......
Ŀǰ£¬×î³£ÓõÄÈýÖÖ¶¯Ì¬ÍøÒ³ÓïÑÔÓÐASP(Active Server Pages),JSP(Java Server Pages),
PHP (Hypertext Preprocessor)¡£
¼ò ½é
¡¡¡¡ASPÈ«ÃûActive Server & ......
<%
'ÒÔÏÂÊÇÊÔÓðæ´úÂ룬Êǹ̶¨µÄ´úÂ룬ֻÓÐÕýʽ°æ²Å¿É×Ô¶¯´Óºǫ́Êý¾Ý¿âÖжÁȡͼƬ¡£
piao1="images/1.jpg"
piao1url=""
piaos1="ͼ1"
piao2="images/2.jpg"
piao2url=""
piaos2="ͼ2"
piao3="images/ ......
¡¡¡¡Ñ§Ï°Ä¿µÄ£ºÑ§»áÓÃ±íµ¥ÔªËØÏò·þÎñÆ÷´«ËͱäÁ¿£¬È»ºóÏÔʾ±äÁ¿ÔÚ¿Í»§¶ËµÄä¯ÀÀÆ÷¡£
¡¡¡¡Ê×ÏÈ£¬ÈÃÎÒÃÇÀ´¿´Ò»ÏÂDREAMWEAVERµÄ±íµ¥ÔªËØÃ«Ë¢¡£
¡¡¡¡ÏÂÃæÎÒÃÇÀ´Ò»¸öÒ»¸ö¿´±íµ¥ÔªËØ¡£1¡¢Îı¾Óò£¬Õâ¸öÊÇ×î»ù±¾µÄ£¬´«Ë͵ÄÊÇÎı¾ÐÅÏ¢£¬Ò»°ãÓû§Ãû£¬ÃÜÂë¶¼ÒªÓÃÕâ¸ö´«ËÍ£¬²»¹ýÒªÊÇÃÜÂëµÄ»°ÒªÔÚÀàÐÍÀïÃæÑ¡ÔñÃÜÂ룬ÕâÑù¾Í»áÒÔ*´úÌæÏÔʾ³ ......