ASPÑ»·Óï¾äÖ®do...loopÓï¾ä
±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/830.html
do ... loop Óï¾äÁ½ÖÖ¸ñʽµÄʾÀý
do whil ... loop £º
ÒÔÏÂΪÒýÓÃÄÚÈÝ£º
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title> VBscript Ñ»·Óï¾äÖ® do ... loop Óï¾ä </title>
</head>
<body>
<%
dim i 'ÉùÃ÷Ò»¸ö±äÁ¿
i=1 '¸ø±äÁ¿¸³Öµ
do while i<10
response.Write "VBscript Ñ»·Óï¾äÖ® do ... loop Óï¾ä <br/>"
i=i+1
loop
%>
</body>
</html>
do ... loop while:
ÒÔÏÂΪÒýÓÃÄÚÈÝ£º
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title> VBscript Ñ»·Óï¾äÖ® do ... loop Óï¾ä </title>
</head>
<body>
<%
dim i 'ÉùÃ÷Ò»¸ö±äÁ¿
i=1 '¸ø±äÁ¿¸³Öµ
do
response.Write "VBscript Ñ»·Óï¾äÖ® do ... loop Óï¾ä <br/>"
i=i+1
loop while i<6
%>
</body>
</html>
Ïà¹ØÎĵµ£º
ÉÏ´Îдµ½asp£¬php¿Õ¼äÓйØÊý¾Ý¿âÑ¡ÔñµÄÎÊÌâ¡£¶ÔÓÚÊý¾Ý¿âµÄ´îÅä Ò»°ãÊÇÕâÑù asp+access/ asp+sql server,È»ºóÊÇphp+mysql¡£accessÊÇ¿ÉÒÔºÍÍøÒ³¿Õ¼ä¹²Ïí´óСµÄ£¬¶øsql server ºÍmysqlÊÇÒªµ¥¶À¹ºÂòµÄ¡£¶ÔÓÚÒ»°ãµÄСӦÓã¬ÓÃasp+access¾Í¿ÉÒԸ㶨ÁË¡£»òÕßÊÇ.net+access¡£ ÕâЩ ¼¸ºõ¾Í²»Òª¿¼ÂÇÊý¾Ý¿â³É±¾ÁË¡£µ«ÊÇʹÓÃphpµÄ»°£¬¾Í ......
ASP.NET±à³ÌÄ£ÐÍÖÐASP.NETÒ³ÃæÉúÃüÖÜÆÚÊÇÖ¸Ê²Ã´ÄØ£¿Ëü°üÀ¨Ê²Ã´ÄØ£¿ASP.NET±à³ÌÄ£ÐÍÖ®ASP.NETÒ³ÃæÉúÃüÖÜÆÚ¾ßÌåµÄ¹ý³ÌÓÐÄÄÐ©ÄØ£¿ÏÂÃæ¾Í¿ªÊ¼ÎÒÃǵĽ²½â°É£º
ASP.NET Ò³ÔËÐÐʱ£¬´ËÒ³½«¾ÀúÒ»¸öÉúÃüÖÜÆÚ£¬ÔÚÉúÃüÖÜÆÚÖн«Ö´ÐÐһϵÁд¦Àí²½Öè¡£ÕâЩ²½Öè°üÀ¨³õʼ»¯¡¢ÊµÀý»¯¿Ø¼þ¡¢»¹ÔºÍά»¤×´Ì¬¡¢ÔËÐÐʼþ´¦Àí³ÌÐò´úÂëÒÔ¼°½øÐгÊÏÖ ......
Ö÷Ŀ¼,ÅäÖÃϱðÍüÁËÆôÓø¸Ä¿Â¼
ÎÊÌâÖ¢×´£º
ADODB.Connection ´íÎó '800a0ea9' δָ¶¨Ìṩ³ÌÐò£¬Ò²Ã»ÓÐÖ¸ÅɵÄĬÈÏÌṩ³ÌÐò¡£
ÎÊÌâ·ÖÎö£º
Windows 64λµÄϵͳÉÏ£¬ÔËÐÐÏÂÁÐ32bit(λ)Ó¦ÓóÌÐò£¬²»Äܹ»ÍêÈ«¼æÈÝ£¬ÐèÒª¶ÀÁ¢²Ù×÷½â¾ö¡£³ÌÐòÁбíÈçÏ£º
Internet·þÎñAPIÀ©Õ¹
ISAPI¹ýÂËÆ÷
ASPÓ¦ÓóÌÐò
ASP.NETÓ¦ÓóÌÐò
½ ......
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Option Explicit
Response.Buffer = True '»º´æÍ¼Æ¬
Dim objXMLHTTP, XML
Set XML = Server.CreateObject("Microsoft.XMLHTTP") '½¨Á¢ÏÂÔØ¶ÔÏó
XML.Open "GET","http://www.google.cn/images/nav_logo7.png",False '¿ªÊ¼»ñȡͼƬ,http://xxx/pngÕâ½Ú¿ÉÒԸijÉ× ......
±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/827.html
Ìõ¼þÓï¾äÖ® if ... then ... else Óï¾ä
ÓÃÀ´ÅжÏÌõ¼þÊÇ true »ò false £¬²¢¸ù¾ÝÅжϽá¹ûÀ´Ö´ÐÐÖ¸¶¨µÄÓï¾ä£¬Í¨³£Ìõ¼þÊÇÓñȽÏÔËËã·û¶ÔÖµ»ò±äÁ¿½øÐбȽÏÀ´±í´ï¡£
if ... then ... else ¿ÉÒÔ¸ù¾ÝÐèÒª½øÐÐǶÌ×ʹÓ㬿ÉÒÔд³É elseif ¡£
ʾÀý£º
ÒÔÏÂÎ ......