แนะนำ: วิธีการใช้รูปขนาดย่อที่ปราศจากองค์ประกอบ ASP มีองค์ประกอบ ASP มากมายที่สร้างภาพขนาดย่อบนอินเทอร์เน็ต หากพื้นที่เสมือนของคุณไม่สนับสนุนการลงทะเบียนส่วนประกอบใหม่คุณอาจรู้สึกว่าเว็บไซต์ของคุณสูญเสียสี Xinqing ไม่ได้มีความสามารถและรวมกับแหล่งข้อมูลออนไลน์เธอเขียนโปรแกรมภาพย่อที่ปราศจากองค์ประกอบเพื่ออ้างอิงเท่านั้น มาดูพื้นฐานก่อน ก่อนอื่นเรารู้ว่ารหัสต่อไปนี้จะปรากฏบนหน้า: img src = pic.gif border = 0 ความกว้าง
บทความนี้สอนคำสั่งวนสคริปต์ ASP:
ลักษณะของสภาพแวดล้อมหน้าเซิร์ฟเวอร์ ASP Dynamic คือการเขียนผ่านภาษาสคริปต์หนึ่งหรือหลายภาษา ภาษาสคริปต์ถือได้ว่าเป็นภาษาการเขียนโปรแกรมเวอร์ชันที่ง่ายขึ้น เป็นเรื่องง่ายที่จะเรียนรู้และเชี่ยวชาญซึ่งให้ความสะดวกสบายแก่นักออกแบบเว็บไซต์ไดนามิก อาจกล่าวได้ว่าการใช้ภาษาสคริปต์ที่เหมาะสมนั้นเกี่ยวข้องโดยตรงกับข้อดีและข้อเสียของแอปพลิเคชัน ASP หลังจากเรียนรู้ฟังก์ชั่นและคำสั่งแบบมีเงื่อนไขของภาษาสคริปต์ VBScript ในบทความก่อนหน้านี้วันนี้เราจะดูคำสั่งลูปใน VBScript ต่อไป
ฟังก์ชั่นของคำสั่งลูปคือการเรียกใช้รหัสโปรแกรมซ้ำ ๆ ลูปสามารถแบ่งออกเป็นสามหมวดหมู่: ประเภทหนึ่งซ้ำคำสั่งก่อนที่เงื่อนไขจะกลายเป็นเท็จประเภทหนึ่งซ้ำคำสั่งก่อนที่เงื่อนไขจะเป็นจริงและประเภทอื่น ๆ ซ้ำคำสั่งตามจำนวนครั้งที่ระบุ คำสั่งลูปต่อไปนี้สามารถใช้ใน VBScript:
ทำ ... ลูป: วนซ้ำเมื่อ (หรือจนกว่า) เงื่อนไขจะเป็นจริง
ในขณะที่ ... Wend: วนรอบเมื่อเงื่อนไขเป็นจริง
สำหรับ ... ถัดไป: ระบุจำนวนลูปและทำซ้ำคำสั่งโดยใช้ตัวนับ
สำหรับแต่ละ ... ถัดไป: สำหรับแต่ละรายการในชุดหรือแต่ละองค์ประกอบในอาร์เรย์ให้ทำซ้ำชุดของคำสั่ง
ก่อนอื่นดู Do ... Loop ซึ่งสามารถเรียกใช้บล็อกคำสั่งหลายครั้ง (หลายครั้ง) ทำซ้ำบล็อกคำสั่งเมื่อเงื่อนไขเป็นจริงหรือก่อนที่เงื่อนไขจะเป็นจริง โปรดดูตัวอย่างต่อไปนี้: <html> <head>
<title> doloop.asp < /title> <body bgcolor =#fffff> </head> <p> </p>
<p> กรุณากรอกบันทึกการชำระยอดขายสำหรับแต่ละเดือนนับตั้งแต่ปีนี้ถึงเดือนนี้ในหน้านี้ <p>
-
เคาน์เตอร์ = 1
Thismonth = เดือน (ตอนนี้ ())
ทำในขณะที่เคาน์เตอร์ <Thismonth + 1
Response.write & Counter & Month:
Response.write _______________________________________ & <br> <br>
ถ้าตอบโต้> 13 แล้ว
ออก
สิ้นสุดถ้า
เคาน์เตอร์ = เคาน์เตอร์+1
วง
-
<hr> </body> </html>
โปรแกรม ASP นี้ใช้คำสั่ง LOOP เพื่อสร้างตารางบันทึกการขายการขายคลิปรหัสข้างต้นไปยัง Notepad และบันทึกเป็น doloop.asp และเรียกดูในเบราว์เซอร์ใน HTTP ขึ้นอยู่กับเดือนปัจจุบันคุณจะเห็นผลลัพธ์ในรูปด้านล่าง
มาวิเคราะห์โปรแกรมนี้กันเถอะ จุดประสงค์ของเราคือการพิมพ์ตารางตามเดือนปัจจุบัน ก่อนอื่นเราตั้งค่านับนับและตั้งค่าเป็น 1 จากนั้นเราใช้ฟังก์ชั่นเดือน () และตอนนี้ () เพื่อรับเดือนปัจจุบันและในที่สุดก็สร้างลูป เมื่อค่าของการนับน้อยกว่าค่าของเดือนปัจจุบันค่าเดือนและเส้นแนวนอนจะแสดงและค่าของการนับเพิ่มขึ้น 1 คำสั่งวนซ้ำจะทำซ้ำจนกว่าเงื่อนไขข้างต้นจะเป็นเท็จ หากการนับมากกว่า 13 การออกจะใช้เพื่อออกจากลูปทันที
คำสั่งลูปสามารถใช้ไวยากรณ์ต่อไปนี้:
ทำ
[งบ] [ออกจากทำ]
[คำสั่ง] วนซ้ำ [{ในขณะที่ | จนกว่า} เงื่อนไข]
ในขณะที่ ... มีคำสั่งซื้อสำหรับผู้ใช้ที่คุ้นเคยกับการใช้งาน อย่างไรก็ตามเนื่องจากในขณะที่ ... Wend ขาดความยืดหยุ่นขอแนะนำให้ใช้คำสั่ง DO ... มาดูคำสั่งต่อไป สำหรับ ... คำสั่งถัดไปใช้เพื่อเรียกใช้บล็อกคำสั่งตามเวลาที่ระบุโดยใช้ตัวแปรตัวนับในลูปซึ่งค่าเพิ่มขึ้นหรือลดลงในแต่ละลูป
ตัวอย่างต่อไปนี้ทำซ้ำขั้นตอน myProc 50 ครั้ง คำสั่งสำหรับระบุตัวแปรตัวนับ X และค่าเริ่มต้นและสิ้นสุด คำสั่งถัดไปเพิ่มตัวแปรตัวนับ 1 ในแต่ละครั้ง sub domyproc50times ()
สลัว x
สำหรับ x = 1 ถึง 50
MyProc
ต่อไป
สิ้นสุดย่อย
ขั้นตอนคำหลักใช้เพื่อระบุค่าของตัวแปรตัวนับแต่ละการเพิ่มหรือลดลง ในตัวอย่างต่อไปนี้ตัวแปรตัวนับ j จะเพิ่มขึ้น 2 ครั้งในแต่ละครั้ง หลังจากลูปสิ้นสุดลงค่ารวมคือผลรวมของ 2, 4, 6, 8 และ 10
sub twostotal ()
สลัว J, ทั้งหมด
สำหรับ j = 2 ถึง 10 ขั้นตอนที่ 2
ทั้งหมด = ทั้งหมด + j
ต่อไป
ผลรวมของ msgbox คือ & ทั้งหมด &
สิ้นสุดย่อย
หากต้องการลดตัวแปรตัวนับให้ตั้งค่าขั้นตอนเป็นค่าลบ ในเวลานี้ค่าการเลิกจ้างของตัวแปรตัวนับจะต้องน้อยกว่าค่าเริ่มต้น ในตัวอย่างต่อไปนี้ตัวแปร Mynum จะลดลง 2 ครั้งในแต่ละครั้ง หลังจากลูปเสร็จสิ้นค่ารวมคือผลรวมของ 16, 14, 12, 10, 8, 6, 4 และ 2. sub total ()
Dim Mynum ทั้งหมด
สำหรับ mynum = 16 ถึง 2 ขั้นตอน -2
Total = Total + mynum
ต่อไป
ผลรวมของ msgbox คือ & ทั้งหมด &
สิ้นสุดย่อย
คำสั่งทางออกจะใช้เพื่อออกจากคำสั่งสำหรับ ... คำสั่งถัดไปก่อนที่ตัวนับถึงมูลค่าการเลิกจ้าง เนื่องจากลูปมักจะออกจากบางกรณีพิเศษ (เช่นเมื่อเกิดข้อผิดพลาด) คุณสามารถใช้ทางออกสำหรับคำสั่งในบล็อกคำสั่งจริงของ IF ... จากนั้น ... หากเงื่อนไขเป็นเท็จลูปจะทำงานตามปกติ
ในที่สุดลองดูที่แต่ละ ... คำสั่งถัดไปสำหรับแต่ละ ... ลูปถัดไปจะคล้ายกับสำหรับ ... ลูปถัดไป สำหรับแต่ละ ... ถัดไปแทนที่จะเรียกใช้คำสั่งตามที่ระบุจะทำซ้ำชุดของคำสั่งสำหรับแต่ละองค์ประกอบในอาร์เรย์หรือแต่ละรายการในการรวบรวมวัตถุ สิ่งนี้มีประโยชน์มากเมื่อคุณไม่ทราบจำนวนองค์ประกอบในคอลเลกชัน ไวยากรณ์ของมันมีดังนี้: สำหรับแต่ละองค์ประกอบในกลุ่ม
[งบ]
[ออกสำหรับ]
[คำสั่ง] ถัดไป [องค์ประกอบ]
แชร์: ASP บันทึกไฟล์ระยะไกลไปยัง Local % function saveremotefile (localfilename, remotefileurl) saveremotefile = โฆษณาสลัวจริง, การดึง, getremotedata set retrieval = server.createObject (Microsoft.xmlhttp)