บทความนี้เป็นบทความที่ฉันพบเกี่ยวกับคำอธิบายโดยละเอียดเกี่ยวกับการใช้นิพจน์ทั่วไปภายใต้ ASP ฉันแนะนำให้ทุกคนอ่าน คัดลอกรหัสรหัสดังต่อไปนี้:
ติ่มซำอีกครั้ง
ตั้งค่าใหม่ = RegExp ใหม่ 'สร้างอินสแตนซ์ RegExp
re.Pattern = ab+c 'กำหนดลิเทอรัลของนิพจน์ทั่วไป คุณสามารถแทนที่นิพจน์ทั่วไปได้ที่นี่
หรี่ myString
myString = abcefg 'กำหนดสตริงที่จะจับคู่และสามารถแทนที่ได้'
Response.write(re.Execute(myString)(0)) 'ทำการทดสอบการจับคู่และเขียนผลลัพธ์
คัดลอกรหัสรหัสดังต่อไปนี้:
-
ติ่มซำอีกครั้ง
ตั้งค่าใหม่ = RegExp ใหม่ 'สร้างอินสแตนซ์ RegExp
re.Pattern = /w+ 'กำหนดข้อความนิพจน์ทั่วไป
หรี่ myString
myString = VBScript เวอร์ชัน 5.6 มีคุณสมบัติใหม่มากมาย
'ทำการทดสอบการจับคู่และเขียนว่าการแข่งขันสำเร็จหรือไม่
ถ้า re.Test(myString) แล้ว
Response.write(จับคู่สำเร็จ!)
อื่น
Response.write (จับคู่ไม่สำเร็จ!)
สิ้นสุดถ้า
-
คัดลอกรหัสรหัสดังต่อไปนี้:
-
ติ่มซำอีกครั้ง
ตั้งค่าใหม่ = RegExp ใหม่ 'สร้างอินสแตนซ์ RegExp
re.Pattern = /s 'กำหนดข้อความนิพจน์ทั่วไป นี่คือช่องว่างที่ตรงกัน
หรี่ myString
myString = VBScript เวอร์ชัน 5.6 มีคุณสมบัติใหม่มากมาย
myString = re.replace(myString, -) 'แทนที่ช่องว่างด้วย - และส่งคืนสตริงที่ถูกแทนที่
'เขียนผลลัพธ์
Response.write (myString)
-
คัดลอกรหัสรหัสดังต่อไปนี้:
-
ติ่มซำอีกครั้ง
ตั้งค่าใหม่ = RegExp ใหม่ 'สร้างอินสแตนซ์ RegExp
re.Global = จริง
re.Pattern = /s 'กำหนดข้อความนิพจน์ทั่วไป นี่คือช่องว่างที่ตรงกัน
หรี่ myString
myString = VBScript เวอร์ชัน 5.6 มีคุณสมบัติใหม่มากมาย
myString = re.replace(myString, -) 'แทนที่ช่องว่างด้วย - และส่งคืนสตริงที่ถูกแทนที่
'เขียนผลลัพธ์
Response.write (myString)
-
คัดลอกรหัสรหัสดังต่อไปนี้:
-
ติ่มซำอีกครั้ง
ตั้งค่าใหม่ = RegExp ใหม่ 'สร้างอินสแตนซ์ RegExp
re.Global = จริง
re.Pattern = (/w+)-(/w+) 'กำหนดข้อความรูปแบบนิพจน์ทั่วไป
หรี่ myString
myString = ฟลิปฟล็อป
myString = re.replace(myString, $1-$2)
'$1 หมายถึงรายการแรก /w+, $2 หมายถึงรายการที่สอง /w+, รายการแรก /w+ พลิกกลับ และรายการที่สอง /w+ ล้มเหลว
'ดังนั้น $1-$2 จึงเทียบเท่ากับฟลิปฟล็อป
'เขียนผลลัพธ์
Response.write (myString)
-
คัดลอกรหัสรหัสดังต่อไปนี้:
-
ติ่มซำอีกครั้ง
ตั้งค่าใหม่ = RegExp ใหม่ 'สร้างอินสแตนซ์ RegExp
re.Global = จริง
re.Pattern = (/S+)(/s+)(/S+) 'กำหนดข้อความรูปแบบการแสดงออกปกติ
หรี่ myString
myString = ฟลิปฟล็อป
myString = re.replace(myString, $3$2$1)
'$1 หมายถึงอันแรก /S+, $3 แทนอันที่สอง /S+, $2 แทน /s+,
'ดังนั้น $3$2$1 จึงเท่ากับการฟล็อปพลิก'
'เขียนผลลัพธ์
Response.write (myString)
-
คัดลอกรหัสรหัสดังต่อไปนี้:
-
ติ่มซำอีกครั้ง
ตั้งค่าใหม่ = RegExp ใหม่ 'สร้างอินสแตนซ์ RegExp
re.Global = จริง
re.Pattern = /w+ 'กำหนดข้อความรูปแบบนิพจน์ทั่วไป
หรี่ myString
myString = VBScript เวอร์ชัน 5.6 มีคุณสมบัติใหม่มากมาย
Set Matches = re.Execute(myString) 'ดำเนินการค้นหา คอลเลกชันนี้ใช้เพื่อบันทึกผลลัพธ์ที่ตรงกัน
'ทำการทดสอบจับคู่และเขียนผลลัพธ์
'ทำซ้ำคอลเลกชันการแข่งขัน
สำหรับการแข่งขันแต่ละครั้งในการแข่งขัน
'เขียนผลลัพธ์
Response.write(Match.FirstIndex & - & (Match.FirstIndex + Match.Length) & & Match.Value & <br />)
ต่อไป
-
คัดลอกรหัสรหัสดังต่อไปนี้:
-
ติ่มซำอีกครั้ง
ตั้งค่าใหม่ = RegExp ใหม่ 'สร้างอินสแตนซ์ RegExp
're.Global = แสดงความคิดเห็นจริงในบรรทัดนี้
re.Pattern = /w+ 'กำหนดข้อความรูปแบบนิพจน์ทั่วไป
หรี่ myString
myString = VBScript เวอร์ชัน 5.6 มีคุณสมบัติใหม่มากมาย
Set Matches = re.Execute(myString) 'ดำเนินการค้นหา คอลเลกชันนี้ใช้เพื่อบันทึกผลลัพธ์ที่ตรงกัน
'ทำการทดสอบจับคู่และเขียนผลลัพธ์
'ทำซ้ำคอลเลกชันการแข่งขัน
สำหรับการแข่งขันแต่ละครั้งในการแข่งขัน
'เขียนผลลัพธ์
Response.write(Match.FirstIndex & - & (Match.FirstIndex + Match.Length) & & Match.Value & <br />)
ต่อไป
-
คัดลอกรหัสรหัสดังต่อไปนี้:
<%@ภาษา=เพจรหัส vbscript=65001%>
-
'สร้างการเชื่อมต่อและสร้าง ADODB.Command เพื่อดำเนินการ
Dim oCmd, oConn
ตั้งค่า oConn = Server.CreateObject (ADODB.Connection)
ตั้งค่า oCmd = Server.CreateObject(ADODB.Command)
oConn.ConnectionString = Provider=SQLOLEDB;server = myhost;Initial Catalog = myDatabase;UID=sa;PWD=verysecret;
oConn.เปิด
'สร้างคำสั่ง SQL CREATE TABLE ที่นี่'
ตั้งค่า oCmd.ActiveConnection = oConn
oCmd.CommandText = สร้างตารางพนักงานใหม่ (ชื่อแรก nvarchar (50), นามสกุล nvarchar (50), EmpType nvarchar (50))
'ดำเนินการสร้างตารางข้อมูล
oCmd.ดำเนินการ
Response.Write (ดำเนินการสำเร็จ!)
-
-
'ปิดการเชื่อมต่ออย่างชัดเจน
oConn.ปิด
ตั้งค่า oConn = ไม่มีเลย
-