แนะนำ: ใช้ ASP เพื่อรับรู้หน้าที่ของการแปลบทความออนไลน์ บางครั้งฉันต้องการให้การสนับสนุนหลายภาษาสำหรับหน้าเว็บของเรา มันลำบากเกินไปที่จะใช้เว็บเพจหนึ่งหน้าสำหรับหนึ่งภาษา โชคดีที่ Google มีฟังก์ชั่นเครื่องมือภาษา ต่อไปนี้อธิบายวิธีการใช้เพื่อแปลงเว็บเพจระหว่างหลายภาษา lan.htm
คำถาม: วิธีลบคะแนนสูงสุดสามคะแนนและคะแนนต่ำสุดสามคะแนนโดยใช้ ASP?
สารละลาย:
1. เรียงลำดับอาร์เรย์ทั้งหมดและลบค่าสูงสุดสามค่าและค่าต่ำสุดสามค่าที่ปลายทั้งสอง (เสนอโดยเน็ตอื่น!)
2. เลือกตัวเลขที่ใหญ่ที่สุดสามตัวและตัวเลขที่เล็กที่สุดสามตัวและลบออก! (ความคิดของฉัน!)
ฉันคิดว่าวิธีการของฉันควรเป็นไปได้มากขึ้นเนื่องจากจำนวนที่จะถูกลบนั้นใหญ่ที่สุดสามและสามน้อยที่สุดดังนั้นจึงไม่จำเป็นต้องจัดเรียงตัวเลขทั้งหมดโดยเฉพาะอย่างยิ่งเมื่อมีข้อมูลจำนวนมากทรัพยากรจำนวนมากจะสูญเปล่า! คำสั่งที่ฉันเขียนมีดังนี้:
| ต่อไปนี้เป็นเนื้อหาที่ยกมา: <%@language = vbscript codepage = 936%> - Dim arr arr = array (91,39,46,24,14,56,31,32,56,89) โทร DELETEMAX (Ubound (arr), 3) 'ลบตัวเลขที่ใหญ่ที่สุดสามตัว! การโทร getback () 'แต่ละหมายเลขเรียกว่า -1 เปลี่ยนตัวเลขที่เล็กที่สุดเป็นจำนวนมากที่สุด! โทร DELETEMAX (Ubound (arr), 3) 'ลบตัวเลขที่ใหญ่ที่สุดสามตัวหลังจาก -1! เรียก getback () 'คืนค่าแต่ละหมายเลข สำหรับ kk = 0 ถึง ubound (arr) 'เอาต์พุตแต่ละหมายเลข Response.write (arr (kk)) Response.write (<br>) ต่อไป sub deleTemax (arr_total, Willdelete) สำหรับ m = 1 ถึง Willdelete สำหรับ i = 0 ถึง arr_total-m ถ้า arr (i)> arr (i 1) แล้ว โทรแลกเปลี่ยน (arr (i), arr (i 1)) สิ้นสุดถ้า ต่อไป Redim Preserve arr (arr_total-m) ต่อไป สิ้นสุดย่อย sub swap (num_a, num_b) 'สลับสองตัวเลข x = num_a num_a = num_b num_b = x สิ้นสุดย่อย sub getback () สำหรับ l = 0 ถึง ubound (arr) arr (l) = arr (l)*-1 ต่อไป สิ้นสุดย่อย - |
มีสามรูทีนย่อย:
1. Deletemax (arr_total, Willdelete)
ฟังก์ชั่น: ลบตัวเลขที่ใหญ่ที่สุดหลายตัว, arr_total: ตัวห้อยสูงสุดที่มีอยู่ของอาร์เรย์, Willdelete: จำนวนจำนวนมากที่สุดที่จะถูกลบ
2. swap (num_a, num_b)
ฟังก์ชั่น: สลับตัวเลขสองตัว
3. getback ()
ฟังก์ชั่น: คูณแต่ละองค์ประกอบของอาร์เรย์ด้วย -1 และเปลี่ยนตัวเลขที่เล็กที่สุดเป็นจำนวนมากที่สุด!
ประสบการณ์:
ฉันได้ลองวิธีลบองค์ประกอบอาร์เรย์!
ใช้คำสั่ง Redim และรักษาอย่างชาญฉลาดเช่น:
| ต่อไปนี้เป็นเนื้อหาที่ยกมา: สลัว () Redim A (10) 'ฉันต้องการลบองค์ประกอบที่หก A (5) สำหรับ n = 5 ถึง ubund (a) -1 a (n) = a (n 1) ต่อไป Redim Preserve A (Ubund (A) -1) |
รหัสข้างต้นสามารถเสร็จสิ้นได้ ถ้าคุณไม่เชื่อลอง ...
แบ่งปัน: ASP พื้นฐานการสอน: ส่วนประกอบอื่น ๆ ที่ใช้กันทั่วไปของ ASP เมื่อคุณเขียนแอปพลิเคชันฝั่งเซิร์ฟเวอร์โดยใช้ ASP คุณต้องพึ่งพาส่วนประกอบ ActiveX ไปยังฟังก์ชั่นเว็บแอปพลิเคชันที่ทรงพลังเช่น: คุณต้องเชื่อมต่อกับฐานข้อมูลทำงานฐานข้อมูลออนไลน์ ฯลฯ 1. ส่วนประกอบความสามารถของเบราว์เซอร์เป็นที่รู้จักกันดี