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>
Ïà¹ØÎĵµ£º
Macromedia Dreamweaver MX ÊÇÒ»¿îרҵµÄ HTML ±à¼Æ÷£¬ÓÃÓÚ¶Ô Web Õ¾µã¡¢Web Ò³ºÍ Web Ó¦ÓóÌÐò½øÐÐÉè¼Æ¡¢±àÂëºÍ¿ª·¢¡£ÎÞÂÛÄúÔ¸ÒâÏíÊÜÊÖ¹¤±àд HTML ´úÂëʱµÄ¼ÝÔ¦¸Ð»¹ÊÇÆ«°®ÔÚ¿ÉÊÓ»¯±à¼»·¾³Öй¤×÷£¬Dreamweaver ¶¼»áΪÄúÌṩÓÐÓõŤ¾ß£¬Ê¹ÄúÓµÓиü¼ÓÍêÃÀµÄ Web ´´×÷ÌåÑé¡£ Dreamweaver ʹÄú¿ÉÒÔʹÓ÷þÎñÆ÷¼¼Êõ(ÀýÈç CFML ......
Ó¦ÓóÌÐòÓòÊÇͨ¹ýCLRÇ¿ÖÆ½ç¶¨µÄÈ·±£Ó¦ÓóÌÐò¼ä²»Ï໥ӰÏìµÄµØÖ·¿Õ¼ä£¬Ëü¾ßÓÐÒÔÏÂÌØÕ÷
1£®Ò»¸ö¶ÀÁ¢µÄWebÓ¦ÓóÌÐòµÄËùÓÐWebÒ³¹²ÏíÏàͬµÄÄÚ´æ×ÊÔ´£¬ÀýÈçÈ«¾ÖµÄÓ¦ÓóÌÐòÊý¾Ý£¬Ã¿¸öÓû§µÄSessionÊý¾ÝÒÔ¼°»º´æÊý¾Ý¡£ÕâЩÐÅÏ¢²»Äܱ»ÆäËûµÄASP.Net»òASPÓ¦ÓóÌÐòÖ±½Ó·ÃÎÊ¡£
2£®Ò»¸ö¶ÀÁ¢µÄWebÓ¦ÓóÌÐòËùÓÐWebÒ³¹² ......
ASP¡£NETÖй²Óм¸ÖÖÀàÐ͵Ŀؼþ
========================================
Á½ÖÖ£º
1. ¿Í»§¶Ë¿Ø¼þ£¬Ò²¾ÍÊÇÎÒÃÇÔÚHTMLÖо³£Óõ½µÄ
2. ·þÎñ¶Ë¿Ø¼þ£¬ÀýÈç: <asp:TextBox ID="txt" runat="server" />
¿Í»§¶Ë¿Ø¼þÒ²¿ÉÒÔת³É·þÎñ¶Ë¿Ø¼þ
<input type="text" id="txt" runat="server" />
HTML ºÍ WEB
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É× ......
ÔÚasp¿ª·¢Öо³£ÐèÒªÓõ½µ±Ç°Ò³ÃæµÄ·¾¶£¬Ïà¶ÔµÄ£¬¾ø¶ÔµÄ£¬ÓвÎÊýµÄ£¬Ã»ÓвÎÊýµÄ£¬ÕâÀïÕûÀíһϣ¬¸öÈ˸оõºÜÈ«µÄasp»ñÈ¡Ò³ÃæÂ·¾¶Óï¾ä´óÈ«£¬ÀýÈ磺request.servervariables script_name SERVER_SOFTWARE
Îļþip·¾¶£º<%="http://" & request.servervariables("server_name")& request.servervariables("script_ ......