แนะนำ: ใช้ ASP เพื่อวางแผนห้องสนทนา ฉันกลัวชาวเน็ตไม่กี่คนที่มักจะท่องอินเทอร์เน็ตไม่เคยไปที่ห้องสนทนาเพื่อแชทแบบสุ่ม เพียงแค่ให้ความสนใจเพียงเล็กน้อยและคุณจะพบว่าห้องสนทนาเหล่านี้ส่วนใหญ่ได้รับการดูแลโดยใช้โปรแกรม CGI หรือ Applets ที่พัฒนาขึ้นใน Java โปรแกรมเมอร์ที่ได้พัฒนา CGI หรือ Applet ประเภทนี้รู้ว่า
ก่อนอื่นให้ดูที่พารามิเตอร์โดยละเอียดของการแทนที่
อธิบาย
ส่งคืนสตริงที่จำนวน substrings ที่ระบุบางส่วนจะถูกแทนที่ด้วยสตริงย่อยอื่น
ไวยากรณ์
แทนที่ (นิพจน์, ค้นหา, แทนที่ด้วย [, เปรียบเทียบ [, count [, start]]]))
ไวยากรณ์ของฟังก์ชันแทนที่มีพารามิเตอร์ต่อไปนี้:
คำอธิบายพารามิเตอร์
จำเป็นต้องมีการแสดงออก นิพจน์สตริงประกอบด้วยสตริงย่อยที่จะถูกแทนที่
ค้นหาตัวเลือกที่ต้องการ สตริงย่อยกำลังค้นหา
ตัวเลือกที่ต้องการแทน Substring ที่ใช้ในการเปลี่ยน
เริ่มเป็นทางเลือก เริ่มค้นหาตำแหน่งของสายเลือดในนิพจน์ หากละเว้นค่าเริ่มต้นคือ 1. ต้องใช้เมื่อเชื่อมโยงกับการนับ
นับเป็นตัวเลือก จำนวนการเปลี่ยนสายย่อยที่ดำเนินการ หากละเว้นค่าเริ่มต้นคือ -1 ซึ่งระบุว่าการเปลี่ยนที่เป็นไปได้ทั้งหมดจะเกิดขึ้น ต้องใช้เมื่อเกี่ยวข้องกับการเริ่มต้น
เปรียบเทียบตัวเลือก ระบุค่าของประเภทการเปรียบเทียบที่ใช้เมื่อคำนวณ substring สำหรับค่าดูส่วนการตั้งค่า หากละเว้นค่าเริ่มต้นคือ 0 ซึ่งหมายความว่าจะต้องทำการเปรียบเทียบแบบไบนารี
ตั้งค่า
พารามิเตอร์เปรียบเทียบสามารถมีค่าต่อไปนี้:
คำอธิบายค่าคงที่
VBBinaryCompare 0 ทำการเปรียบเทียบไบนารี
VBTextCompare 1 ทำการเปรียบเทียบข้อความ
ค่าส่งคืน
แทนที่ส่งคืนค่าต่อไปนี้:
หากแทนที่ผลตอบแทน
นิพจน์คือความยาวศูนย์สตริงความยาวศูนย์ ()
นิพจน์เป็นข้อผิดพลาดโมฆะ
ค้นหาเป็นสำเนาของนิพจน์ความยาวเป็นศูนย์
Replacewith เป็นสำเนาของนิพจน์ที่มีความยาวเป็นศูนย์ซึ่งเนื้อหาทั้งหมดที่ระบุโดยพารามิเตอร์การค้นหาจะถูกลบ
เริ่ม> len (นิพจน์) สตริงความยาวเป็นศูนย์
นับเป็นสำเนาของ 0 นิพจน์
อธิบาย
ค่าส่งคืนของฟังก์ชั่นการแทนที่คือสตริงที่ถูกแทนที่ (เริ่มต้นจากตำแหน่งที่ระบุโดยเริ่มต้นจนถึงจุดสิ้นสุดของสตริงนิพจน์) แทนที่จะเป็นสำเนาของสตริงต้นฉบับตั้งแต่ต้นจนจบ
ตัวอย่างต่อไปนี้ใช้ฟังก์ชันแทนที่เพื่อส่งคืนสตริง:
การคัดลอกรหัสมีดังนี้:
หรี่
MyString = แทนที่ (XXPXXPXXP, P, Y) 'การเปรียบเทียบไบนารีเริ่มต้นที่ปลายด้านซ้ายของสตริง ส่งคืน xxyxxpxxy
mystring = แทนที่ (xxpxxpxxp, p, y, 'การเปรียบเทียบข้อความเริ่มต้นด้วยอักขระที่สามส่งคืน yxxyxxy. 3, -1, 1)
วิธีที่ 1: ใช้ฟังก์ชั่นของ ASP เพื่อแทนที่ นี่เป็นวิธีที่ง่ายที่สุด
title = แทนที่ (ชื่อ, df, sd, 1, -1,1)
คำอธิบายโดยละเอียดของพารามิเตอร์ของฟังก์ชันแทนที่:
พารามิเตอร์ 1: สตริงต้นทาง
พารามิเตอร์ 2: อักขระที่จะเปลี่ยน
พารามิเตอร์ 3: อักขระใหม่ คุณต้องแทนที่อักขระบางตัวในสตริงต้นทางด้วยอักขระที่ระบุใหม่
พารามิเตอร์ 4: ค่าคือ 1. ระบุการค้นหาสตริงที่เริ่มต้นจากอักขระแรก
พารามิเตอร์ 5: ค่าคือ -1 ระบุว่าต้องเปลี่ยนสตริงย่อยแต่ละอัน
พารามิเตอร์ 6: ค่า 1 การเปรียบเทียบสตริงที่ระบุคือตัวพิมพ์ใหญ่
สองฟังก์ชั่น (ไฮไลต์คำหลัก)
วิธีที่ 2: แทนที่อักขระที่ระบุด้วย case case insensitive ปกติ
ต่อไปนี้เป็นรหัสที่มาของฟังก์ชั่น:
การคัดลอกรหัสมีดังนี้:
'// ฟังก์ชั่น: การเปลี่ยนสตริง
'// บทความ: นิพจน์ทั่วไป, แทนที่สตริง, แทนที่สตริง
ฟังก์ชั่นสาธารณะ replacetest (Patrn, MSTR, Replst)
regex หรี่
ตั้งค่า regex = ใหม่ regexp
regex.pattern = Patrn
regex.ignorecase = true
regex.global = true
replacetest = regex.replace (mstr, replstr)
ตั้งค่า regex = ไม่มีอะไร
ฟังก์ชันสิ้นสุด
แบ่งปัน: ฟังก์ชั่นการใช้ ASP สำหรับการพิมพ์เครือข่าย %@ language = vbscript % % ตัวเลือกที่ชัดเจน dim strsubmit 'ค่าที่ใช้ในรูปแบบเพื่อบันทึกปุ่มส่ง dim strprinterpath' ค่าของเส้นทางเครื่องพิมพ์เครือข่ายในรูปแบบ dim strusername 'ค่าของชื่อผู้ใช้ในรูปแบบ dim strpassword' ค่าของรหัสผ่าน