1£®Æô¶¯Îı¾±à¼Æ÷»òEditplus£¬£¬È»ºóÑ¡ÔñÒѽ¨Á¢µÄ¡°ASPʵÑéÕ¾µã¡±£¬ÔÚÆäϽøÐд´½¨¡¢±à¼ºÍÔËÐÐÎļþ£¬Í¼Æ¬×ÔÑ¡¡£
2£®ÔÚÕ¾µãĿ¼ÏÂн¨Ò»¸öÃûΪmyfrist.htmlÎļþ£¬Ð§¹ûͼÈçÏÂ×óͼËùʾ£º¸ÃÒ³Ãæ·ÖΪÁ½¸ö²¿·Ö£¬Ò»ÊDZêÌâ¡°»¶Ó¹âÁÙÎҵĵÚÒ»¸öÒ³Ãæ¡±£¬¶þÊÇÕýÎIJ¿·Ö£¬ÕýÎı³¾°ÑÕɫΪ»ÆÉ«¡£ÕýÎÄÖÐÒÔбÌåºÍ´ÖÌåÏÔʾÎÄ×Ö¡°ÕâÊÇÎÒÖÆ×÷µÄµÚÒ»¸öÒ³Ãæ£¬Çë´ó¼Ò¶à¶à¹ØÕÕ¡±£¬Ò»¼¶±êÌâ¡°¸öÈ˼ò½é¡±£¬ÄÚÈݰüÀ¨¡°ÐÕÃû¡±¡¢¡°ÄêÁ䡱ºÍÒ»ÕÅÕÕÆ¬£¬¶ÎÂä¸ñʽΪ¾ÓÖУ¬×ÖÌåΪ¡°Á¥Ê顱¡¢´óСΪ¡°30¡± ¡¢×ÖÌåÑÕɫΪ¡°×ØÉ«£¨#990000£©¡±£¬ÕÕÆ¬´óСΪ¡°200*200¡±£¬µ¥»÷ÕÕÆ¬½øÈëmysecond.htmlÒ³Ãæ¡£
ͼƬ×ÔÑ¡
3£®ÔÚÕ¾µãĿ¼ÏÂн¨Ò»¸öÃûΪmysecond.html¿ò¼Ü¼¯Îļþ£¬Ð§¹ûͼÈçÈçÉÏͼÓÒËùʾ£¬¸Ã¿ò¼Ü¼¯Îļþ´°¿Ú°üº¬2¸ö¿ò¼Ü£¬×ó²à¿ò¼ÜÕ¼µ½Õû¸ö´°¿ÚµÄ30%£¬¿ò¼ÜÃû³ÆÎª¡°leftFrame¡±£¬¸Ã´°¿ÚÖÐÏÔʾleft.htmlÎļþ£¬´°¿Ú²»³öÏÖ¹ö¶¯Ìõ£¬Ò²²»ÄÜÊÖ¶¯¸Ä±ä´óС£»ÓÒ²à¿ò¼ÜÃû³ÆÎª¡°mainFrame¡±£¬¸Ã´°¿ÚÖÐÏÔʾmain.htmlÎļþ£¬´°¿Ú³öÏÖ¹ö¶¯Ìõ¡£
left.html£º¸ÃÒ³ÃæÓÐ2ÐÐÎÄ×Ö£¬·Ö±ðÊÇ¡°±í¸ñ¡±£¬¡°ÁÐ±í¡±£¬µ¥»÷¡°±í¸ñ¡±ÔÚmainFrame ÖÐÏÔʾ¡°biaoge.html¡±£¬µ¥»÷¡°ÁÐ±í¡±ÔÚmainFrame ÖÐÏÔʾ¡°liebiao.html¡± ¡£
main.html£ºÖ»ÓÐ1ÕÅͼÏñ¡£
ͼƬ×ÔÑ¡ ËÄ¡¢ÊµÑé˼¿¼Ìâ
1£®Ä³Í¬Ñ§¿ª·¢ÁËÒ»¸öÏÔʾÀ´·Ãʱ¼äµÄ ASP Îļþ£¬´æ·ÅÔÚ C:\\inetpub\\wwwroot Ï£¬È»ºóÔÚ×ÊÔ´¹ÜÀíÆ÷ÖÐË«»÷¸ÃÎļþ£¬È´²»ÄÜÕý³£ÏÔʾ£¬ÇëÎÊÊÇʲôÔÒò£¿ 2£®ÏëÒ»Ï룬°ÑÒ»¸ö HTML ÍøÒ³ÎļþÖ±½Ó¸ü¸ÄÀ©Õ¹ÃûΪ.asp Ðв»ÐУ¿ 3£®Çë¸ù¾Ý×Ô¼ºµÄʵ¼ÊÇé¿ö´î½¨ ASP µÄÔËÐл·¾³¡£
4£®ÇëÔÚ C:\\Inetpub\\wwwroot Ï ½¨Á¢×ÓÎļþ ¼Ð asptemp£¬²¢ÎªÆäÉèÖÃÐéÄâĿ¼Ϊasptemp£¬²¢ÉèÖÃĬÈÏÎĵµÎª index.asp ºÍ index.htm¡£
5£®Çë²Î¿¼ IIS µÄרÃÅÊé¼®ºÃºÃÑо¿Ò»Ï£¬²¢Ë¼¿¼ÊÇ·ñÒ»¶¨ÒªÔÚ C:\\Inetpub\\ wwwroot Ï¿ª·¢ ASP Îļþ£¿¿É²»¿ÉÒÔ·ÅÔÚ±ðµÄÎļþ¼ÐÏ£¿ ×¢Ò⣺
²»¹ÜʲôÓïÑÔÂÒÂëÎÊÌâ¶¼´æÔÚÔÚaspÖнâ¾öÂÒÂë·½·¨ÓÐÒÔϼ¸ÖÖ£º Èç¹ûÒ³ÃæÏÔʾÕý³££¬¶ø´ÓÊý¾ÝÖлñÈ¡µÄÊý¾ÝΪÂÒÂë UTF-8±àÂëµÄ»°£ºÔÚASP½Å±¾¶¥²¿¼ÓÈë <%@Language=\
ÒÔ¼°ÔÙÔÚ
ÇøÓòÖмÓÈëÒÔ¼°ÔÙÔÚ
ÇøÓòÖмÓÈë
ʵÑé¶þ VBScript³ÌÐòÉè¼Æ
Ò»¡¢ÊµÑéÄ¿µÄ¼°ÒªÇó
1£®ÁË½â²¢ÕÆÎÕVBScript½Å±¾³ÌÐòÉè¼ÆÓïÑԵĻù±¾Ó﷨֪ʶ¼°¼òµ¥³ÌÐòÉè¼Æ·½·¨£» 2£®ÊìÁ·ÕÆÎÕASP»·¾³ÖеÄÊä³ö·½·¨£»
3£®ÊìÁ·ÕÆÎÕVBScriptµÄIfÓï¾äºÍSelect CaseÓï¾äµÄ±à³Ì¼¼Êõ£»
4£®ÊìÁ·ÕÆÎÕVBScriptµÄFor¡Next¡¢Do¡LoopºÍFor each¡InµÈÑ»·Óï¾äµÄ±à³Ì¼¼Êõ£»
¶þ¡¢ÊµÑéÄÚÈÝ
¢± ÀûÓÃVBScriptÔÚÍøÒ³ÖÐÊä³öµ±Ç°µÄʱ¼äºÍÈÕÆÚ¡£
¢² ÉÏ»úÑéÖ¤½Ì²ÄÉϵÄVBScript¸÷¸öº¯ÊýµÄ¹¦ÄÜ£¬ÊìϤÆäÓ÷¨¡£ ¢³ ÉÏ»úÑéÖ¤½Ì²ÄÉϵÄÀý3-1ÖÁÀý3-8¡£
¢´ ÊÔÓÃVBScript±à³Ì£¬ÊµÏÖ¼ÆËã²¢Êä³ö1µ½10µÄ½×³ËÖ®ºÍ¡£ ¢µ ÊÔÓÃVBScript±à³Ì£¬ÊµÏÖ¼ÆËã²¢Êä³ö100µ½500µÄÖ®¼äµÄË®ÏÉ»¨Êý£¨Ë®ÏÉ»¨ÊýÊÇÖ¸¸ÃÊýµÄÖµµÈÓÚ¸÷λÊý×ÖµÄÁ¢·½ºÍ£©¡£
¢¶ ÊÔÓÃVBScript±à³Ì£¬ÀûÓÃÊý×éʵÏÖ¾ØÕó³Ë·¨¡£
Èý¡¢ÊµÑéÖ¸µ¼
£¨Ò»£©VBScriptº¯Êý º¯ÊýÊÇÒ»ÖÖÌØ¶¨µÄÔËË㣬ÔÚ³ÌÐòÖÐҪʹÓÃÒ»¸öº¯Êýʱ£¬Ö»Òª¸ø³öº¯ÊýÃû²¢¸ø³öÒ»¸ö»ò¶à¸ö²ÎÊý£¬¾ÍÄܵõ½ËüµÄº¯ÊýÖµ¡£VBScriptÄÚ²¿º¯Êý¿É·ÖΪ£º×ª»»º¯Êý¡¢×Ö·û´®º¯Êý¡¢ÈÕÆÚºÍʱ¼äº¯Êý¡¢Êýѧº¯ÊýºÍ¼ìÑ麯Êý¡£
1£®×ª»»º¯Êý
VBScript¶ÔVariant±äÁ¿Ò»°ã»á¸ù¾ÝÐèÒª×Ô¶¯×ª»»³ÉºÏÊʵÄÊý¾ÝÀàÐÍ£»µ«ÓÐʱ£¬×Ô¶¯×ª»»ÓпÉÄÜÔì³ÉÊý¾ÝÀàÐͲ»Æ¥Åä´íÎó¡£´Ëʱ£¬¾ÍӦʹÓÃVBScriptµÄת»»º¯ÊýÀ´Ç¿ÖÆ×ª»»Êý¾ÝµÄ×ÓÀàÐÍ¡£
³£ÓõÄת»»º¯Êý¼ûÏÂ±í£º º¯Êý ¹¦ÄÜ CStr(Variant) CDate(Variant) CInt(Variant) CLng(Variant) CSng(Variant) CDbl(Variant) CBool(Variant) ½«±äÁ¿Variantת»¯Îª×Ö·û´®ÀàÐÍ ½«±äÁ¿Variantת»¯ÎªÈÕÆÚÀàÐÍ ½«±äÁ¿Variantת»¯ÎªÕûÊýÀàÐÍ ½«±äÁ¿Variantת»¯Îª³¤ÕûÊýÀàÐÍ ½«±äÁ¿Variantת»¯ÎªSingleÀàÐÍ ½«±äÁ¿Variantת»¯ÎªDoubleÀàÐÍ ½«±äÁ¿Variantת»¯Îª²¼¶ûÀàÐÍ
2£®×Ö·û´®º¯Êý
³£ÓÃ×Ö·û´®º¯Êý¼°¹¦ÄÜÈçÏÂ±í£º º¯Êý È¡×Ö·û´®³¤¶È ´ó¡¢Ð¡Ð´×Öĸת»» ½ØÈ¡×Ó×Ö·û´® ɾ³ý¿Õ¸ñ ÖØ¸´ ¿Õ¸ñ È¡´ú×Ö·û´® Len(string) ¹¦ÄÜ Lcase(String)£¬ Ucase(String) Mid(string,start[,length]) Left(string,length) Right(string,length) Trim(string)£¬ Ltrim(string)£¬ Rtrim(string) String(num1,str1) Space(num1) Replace(str1,str2,str3)
×Ö·û´®²ð·ÖΪ1άÊý×é ·µ»Ø×Ö·û´®Î»ÖÃ
3£®Ê±¼äºÍÈÕÆÚº¯Êý º¯Êý Now() Date() Time() Month(Date) Day(Date) WeekDay(Date) Year(Date) DateDiff(¡°Var¡±,Var1,Var2) Split(str1,delimiter) InStr(str1,str2) ¹¦ÄÜ È¡µÃϵͳµ±Ç°ÈÕÆÚºÍʱ¼ä È¡µÃϵͳµ±Ç°ÈÕÆÚ È¡µÃϵͳµ±Ç°Ê±¼ä È¡µÃ¸ø¶¨ÈÕÆÚµÄÔÂ·Ý È¡µÃ¸ø¶¨ÈÕÆÚÊǼ¸ºÅ È¡µÃ¸ø¶¨ÈÕÆÚÊÇÐÇÆÚ¼¸ £¨ÐÇÆÚÌ죬1µ½6·Ö±ðΪ1~7£© È¡µÃ¸ø¶¨ÈÕÆÚµÄÄê·Ý ¼ÆËãÈÕÆÚ»òʱ¼äVar1ÓëVar2µÄ¼ä¸ô ¡°Var¡±:Ϊʱ¼ä¼ä¸ôÒò×Ó ¶Ôʱ¼ä/ÈÕÆÚnum×÷¼Ó·¨ ÏÔʾ¶ÌÈÕÆÚ¸ñʽ ÏÔʾ³¤ÈÕÆÚ¸ñʽ ÏÔʾ¶Ìʱ¼ä¸ñʽ ÏÔʾ³¤Ê±¼ä¸ñʽ DateAdd(¡°Var¡±,num,date) num:¼ä¸ô±¶Êý£»date:ÔʼÈÕÆÚ»òʱ¼ä FormatDateTime(Date,2) FormatDateTime(Date,1) FormatDateTime(Date,4) FormatDateTime(Date,3) 4£®Êýѧº¯Êý º¯Êý Abs(number) Sqr(number) Int(number) FormatNumber(num1,num2) Rnd() Ubound(Êý×éÃû£¬Î¬Êý) Lbound(Êý×éÃû£¬Î¬Êý) 5£®¼ìÑ麯Êý º¯Êý VarType(Variant) IsEmpty(Variant) IsNull(Variant) IsObject(Variant) IsArray(Variant) IsDate(Variant) £¨¶þ£©VBScript½Å±¾ÓïÑÔÓï¾ä 1£®Ìõ¼þÓï¾ä
¢Å If Then End If
If Ìõ¼þÓï¾ä Then Ö´ÐÐÓï¾ä
¹¦ÄÜ ·µ»ØÒ»¸öÊýµÄ¾ø¶ÔÖµ ·µ»ØÒ»¸öÊýµÄƽ·½¸ù È¡numberµÄ×î´óÕûÊý²¿·Ö ½«num1ת»¯ÎªÖ¸¶¨Ð¡Êýλnum2µÄÊý ·µ»Ø0µ½1µÄËæ»úÊý ·µ»Ø×î´óϱêÊý ·µ»Ø×îСϱêÊý ¹¦ÄÜ ·µ»Ø±äÁ¿VariantµÄÊý¾Ý×ÓÀàÐÍ ¼ì²é±äÁ¿VariantÊÇ·ñΪEmpty ¼ì²é±äÁ¿VariantÊÇ·ñΪNull ¼ì²é±äÁ¿VariantÊÇ·ñΪ¶ÔÏóÀàÐÍ ¼ì²é±äÁ¿VariantÊÇ·ñΪÊý×éÀàÐÍ ¼ì²é±äÁ¿VariantÊÇ·ñΪÈÕÆÚÀàÐÍ IsNumeric(Variant) ¼ì²é±äÁ¿VariantÊÇ·ñΪÊýÖµÀàÐÍ
End If
¢Æ If Then Else End If£¨µ¥Ìõ¼þ£©
If Ìõ¼þÓï¾ä Then Ö´ÐÐÓï¾ä1 Else
Ö´ÐÐÓï¾ä2 End If
¢Ç If Then Else End If£¨¶àÌõ¼þ£©
If Ìõ¼þÓï¾ä1 Then Ö´ÐÐÓï¾ä1
ElseIf Ìõ¼þÓï¾ä2 Then
Ö´ÐÐÓï¾ä2 ¡¡..
Else
Ö´ÐÐÓï¾än+1
End If
¢È Select Case Óï¾ä
Select Case ±äÁ¿»ò±í´ïʽ Case ½á¹û1
Ö´ÐÐÓï¾ä1 Case ½á¹û2
Ö´ÐÐÓï¾ä2 ?? Case ½á¹û n
Ö´ÐÐÓï¾än Case Else
Ö´ÐÐÓï¾än+1 End Select 2£®Ñ»·Óï¾ä
¢Å For ¡¡ NextÑ»·
For counter=start To end [Step number]
Ö´ÐÐÓï¾ä Next
¢Æ Do ¡¡ LoopÑ»· Do While Ìõ¼þ1
Ö´ÐÐÓï¾ä Loop »ò Do
Ö´ÐÐÓï¾ä
Loop While Ìõ¼þ1 ¢Ç For Each¡InÑ»·
For Each <ÔªËØ> In <¼¯ºÏ>
<Óï¾ä> Next
˵Ã÷£º¶Ô<¼¯ºÏ>ÖеÄÿһ¸ö<ÔªËØ> ÒÀ´ÎÖ´ÐÐ<Óï¾ä>Ò»´Î¡£Æä¼¯ºÏÔªËØÎªÀëÉ¢Ð͵ġ£ £¨Èý£©VBScript¹ý³Ì
ÔÚVBScriptÖУ¬¹ý³ÌÓÐÁ½ÖÖ£ºSub×Ó³ÌÐòºÍFunctionº¯Êý¡£(1) Sub×Ó³ÌÐò ¡ñ ¡ñ Sub×Ó³ÌÐòµÄÓï·¨£º
Sub ×Ó³ÌÐòÃû£¨²ÎÊý1£¬²ÎÊý2£¬¡£© Óï¾ä¡¡End Sub ¡ñ ¡ñ µ÷ÓÃ×Ó³ÌÐò