Artikel ini adalah artikel yang saya temukan tentang penjelasan rinci tentang penggunaan ekspresi reguler di bawah ASP. Saya menyarankan semua orang untuk membacanya. Copy kode kodenya sebagai berikut:
Redupkan kembali
Setel re = new RegExp 'Buat instance RegExp
re.Pattern = ab+c 'Definisikan ekspresi reguler secara literal, Anda dapat mengganti ekspresi reguler di sini
Redupkan String saya
myString = abcefg 'Tentukan string yang akan dicocokkan dan dapat diganti
Response.write(re.Execute(myString)(0)) 'Lakukan tes pencocokan dan tulis hasilnya
Copy kode kodenya sebagai berikut:
<%
Redupkan kembali
Setel re = new RegExp 'Buat instance RegExp
re.Pattern = /w+ 'Definisikan teks ekspresi reguler
Redupkan String saya
myString = VBScript versi 5.6 menyediakan banyak fitur baru.
'Lakukan tes pencocokan dan tulis apakah pencocokan berhasil
Jika re.Test(myString) Lalu
Response.write (pertandingan berhasil!)
Kalau tidak
Response.write (pencocokan gagal!)
Akhiri Jika
%>
Copy kode kodenya sebagai berikut:
<%
Redupkan kembali
Setel re = new RegExp 'Buat instance RegExp
re.Pattern = /s 'Tentukan teks ekspresi reguler, berikut spasi yang cocok
Redupkan String saya
myString = VBScript versi 5.6 menyediakan banyak fitur baru.
myString = re.replace(myString, -) 'Ganti yang kosong dengan - dan kembalikan string yang diganti
'Tuliskan hasilnya
Respon.write(myString)
%>
Copy kode kodenya sebagai berikut:
<%
Redupkan kembali
Setel re = new RegExp 'Buat instance RegExp
re.Global = Benar
re.Pattern = /s 'Tentukan teks ekspresi reguler, berikut spasi yang cocok
Redupkan String saya
myString = VBScript versi 5.6 menyediakan banyak fitur baru.
myString = re.replace(myString, -) 'Ganti yang kosong dengan - dan kembalikan string yang diganti
'Tuliskan hasilnya
Respon.write(myString)
%>
Copy kode kodenya sebagai berikut:
<%
Redupkan kembali
Setel re = new RegExp 'Buat instance RegExp
re.Global = Benar
re.Pattern = (/w+)-(/w+) 'Tentukan teks pola ekspresi reguler
Redupkan String saya
myString = flip-flop
myString = re.replace(myString, $1-$2)
'$1 mewakili /w+ pertama, $2 mewakili /w+ kedua, /w+ pertama cocok dengan flip, dan /w+ kedua cocok dengan flop,
'Jadi $1-$2 setara dengan flip-flop
'Tuliskan hasilnya
Respon.write(myString)
%>
Copy kode kodenya sebagai berikut:
<%
Redupkan kembali
Setel re = new RegExp 'Buat instance RegExp
re.Global = Benar
re.Pattern = (/S+)(/s+)(/S+) 'Tentukan teks pola ekspresi reguler
Redupkan String saya
myString = sandal jepit
myString = ulang.ganti(myString, $3$2$1)
'$1 mewakili /S+ pertama, $3 mewakili /S+ kedua, $2 mewakili /s+,
'Jadi $3$2$1 setara dengan flop flip
'Tuliskan hasilnya
Respon.write(myString)
%>
Copy kode kodenya sebagai berikut:
<%
Redupkan kembali
Setel re = new RegExp 'Buat instance RegExp
re.Global = Benar
re.Pattern = /w+ 'Tentukan teks pola ekspresi reguler
Redupkan String saya
myString = VBScript versi 5.6 menyediakan banyak fitur baru.
Set Matches = re.Execute(myString) 'Jalankan pencarian, koleksi ini digunakan untuk menyimpan hasil pencocokan
'Lakukan tes pencocokan dan tulis hasilnya
'Ulangi koleksi Matches
Untuk Setiap Pertandingan dalam Pertandingan
'Tuliskan hasilnya
Response.write(Match.FirstIndex & - & (Match.FirstIndex + Match.Length) & & Match.Value & <br />)
Berikutnya
%>
Copy kode kodenya sebagai berikut:
<%
Redupkan kembali
Setel re = new RegExp 'Buat instance RegExp
're.Global = Benar beri komentar pada baris ini
re.Pattern = /w+ 'Tentukan teks pola ekspresi reguler
Redupkan String saya
myString = VBScript versi 5.6 menyediakan banyak fitur baru.
Set Matches = re.Execute(myString) 'Jalankan pencarian, koleksi ini digunakan untuk menyimpan hasil pencocokan
'Lakukan tes pencocokan dan tulis hasilnya
'Ulangi koleksi Matches
Untuk Setiap Pertandingan dalam Pertandingan
'Tuliskan hasilnya
Response.write(Match.FirstIndex & - & (Match.FirstIndex + Match.Length) & & Match.Value & <br />)
Berikutnya
%>
Copy kode kodenya sebagai berikut:
<%@bahasa=halaman kode vbscript=65001%>
<%
'Buat koneksi dan buat ADODB.Command untuk pengoperasian
Redupkan oCmd,oConn
Setel oConn = Server.CreateObject(ADODB.Connection)
Setel oCmd = Server.CreateObject(ADODB.Command)
oConn.ConnectionString = Penyedia=SQLOLEDB;server = myhost;Katalog Awal = myDatabase;UID=sa;PWD=verysecret;
oConn.Buka
'Buat pernyataan SQL CREATE TABLE di sini
Setel oCmd.ActiveConnection = oConn
oCmd.CommandText = BUAT TABEL Karyawan Baru(Nama Depan nvarchar (50),Nama Belakang nvarchar (50),EmpType nvarchar (50))
'Jalankan operasi pembuatan tabel data
oCmd.Jalankan
Response.Write (Operasi berhasil!)
%>
<%
'Tutup koneksi secara eksplisit
oConn.Tutup
Setel oConn = Tidak Ada
%>