เมื่อใช้ ASP เพื่อประมวลผลข้อความ ฟังก์ชั่นการตรวจจับความยาวสายอักขระที่มาพร้อมกับระบบบางครั้งอาจไม่มีประโยชน์มากนัก ตัวอย่างเช่น อักขระจีนจะนับเป็นหนึ่งไบต์เท่านั้น หากเป็นอักขระจีนทั้งหมดในระหว่างการเรียงพิมพ์ ก็อาจกล่าวได้ง่ายว่าไม่มีความแตกต่างกันอยู่แล้ว อย่างไรก็ตาม หากสตริงที่จะจัดการมีทั้งอักขระจีนและตัวอักษรภาษาอังกฤษ มันจะไม่สะดวก ฟังก์ชันสามรายการต่อไปนี้สามารถแทนที่ฟังก์ชันที่เกี่ยวข้องซึ่งมาพร้อมกับ ASP
นอกจากนี้ยังมีสิ่งที่ควรทราบ หากใช้ในลูป ค่าคงที่ i ก็เป็นตัวแปรที่ใช้กันทั่วไปในลูปเช่นกัน เมื่อดำเนินการฟังก์ชันต่อไปนี้ ค่าของ i จะเปลี่ยนไป หากใช้ตัวแปรเดียวกันในลูปที่เรียกใช้ ค่าที่ไม่รู้จักจะเกิดขึ้นหากพบผลลัพธ์โปรดใช้ชื่อตัวแปรอื่น
การใช้งานต่อไปนี้เหมือนกับ len(), left(), right()
รหัสโปรแกรม
คัดลอกรหัสรหัสดังต่อไปนี้:
ฟังก์ชั่นStrlength(Str)
Temp_Str=เลน(Str)
สำหรับ I=1 ถึง Temp_Str
Test_Str=(กลาง(Str,I,1))
ถ้า Asc(Test_Str)>0 แล้ว
ความยาวยืด=ความยาวยืด+1
อื่น
ความยาวยืด=ความยาวยืด+2
สิ้นสุดถ้า
ต่อไป
ฟังก์ชันสิ้นสุด
ฟังก์ชัน Strleft(Str,L)
Temp_Str=เลน(Str)
สำหรับ I=1 ถึง Temp_Str
Test_Str=(กลาง(Str,I,1))
Strleft=สเตรเลฟท์&Test_Str
ถ้า Asc(Test_Str)>0 แล้ว
เลนส์=เลนส์+1
อื่น
เลนส์=เลนส์+2
สิ้นสุดถ้า
ถ้าเลนส์>=L ให้ออกเพื่อ
ต่อไป
ฟังก์ชันสิ้นสุด
ฟังก์ชั่นStrright(Str,L)
Temp_Str=เลน(Str)
สำหรับ i = Temp_Str ถึง 1 ขั้นตอน -1
Test_Str=(กลาง(Str,I,1))
Strright=Test_Str&Strright
ถ้า Asc(Test_Str)>0 แล้ว
เลนส์=เลนส์+1
อื่น
เลนส์=เลนส์+2
สิ้นสุดถ้า
ถ้าเลนส์>=L ให้ออกเพื่อ
ต่อไป
ฟังก์ชันสิ้นสุด