推薦：asp正則表達式學習“正則表達式”對象，我們就可以非常方便的對各種數據進行合法性的校驗了。首先，讓我們來了解一下究竟什麼是VBScript的“正則表達式”對象，我們先來看一段程序：
RegExp對象提供簡單的正則表達式支持功能。
RegExp對象的用法：
| 以下為引用的內容： Function RegExpTest(patrn, strng) Dim regEx, Match, Matches ' 建立變量。 Set regEx = New RegExp ' 建立正則表達式。 regEx.Pattern = patrn ' 設置模式。 regEx.IgnoreCase = True ' 設置是否區分字符大小寫。 regEx.Global = True ' 設置全局可用性。 Set Matches = regEx.Execute(strng) ' 執行搜索。 For Each Match in Matches ' 遍歷匹配集合。 RetStr = RetStr & Match found at position RetStr = RetStr & Match.FirstIndex & . Match Value is ' RetStr = RetStr & Match.Value & '. & vbCRLF Next RegExpTest = RetStr End Function |
MsgBox(RegExpTest(is., IS1 is2 IS3 is4))
RegExp 對象的屬性
◎ Global屬性
Global屬性設置或返回一個Boolean 值，該值指明在整個搜索字符串時模式是全部匹配還是只匹配第一個。
文法
object.Global [= True | False ]
object 參數總是RegExp 對象。如果搜索應用於整個字符串，Global 屬性的值為True，否則其值為False。默認的設置為True。
Global 屬性的用法（改變賦予Global 屬性的值並觀察其效果）：
| 以下為引用的內容： Function RegExpTest(patrn, strng) Dim regEx ' 建立變量。 Set regEx = New RegExp ' 建立規範表達式。 regEx.Pattern = patrn ' 設置模式。 regEx.IgnoreCase = True ' 設置是否區分字母的大小寫。 regEx.Global = True ' 設置全程性質。 RegExpTest = regEx.Execute(strng) ' 執行搜索。 End Function |
MsgBox(RegExpTest(is., IS1 is2 IS3 is4))
◎ IgnoreCase屬性
IgnoreCase屬性設置或返回一個Boolean值，指明模式搜索是否區分大小寫。
文法
object.IgnoreCase [= True | False ]
object 參數總是一個RegExp 對象。如果搜索是區分大小寫的，則IgnoreCase 屬性為False；否則為True。缺省值為True。
IgnoreCase 屬性的用法（改變賦予IgnoreCase 屬性的值以觀察其效果)：
| 以下為引用的內容： Function RegExpTest(patrn, strng) Dim regEx ' 建立變量。 Set regEx = New RegExp ' 建立正則表達式。 regEx.Pattern = patrn ' 設置模式。 regEx.IgnoreCase = True ' 設置是否區分大小寫。 RegExpTest = regEx.Execute(strng) ' 執行搜索。 End Function |
MsgBox(RegExpTest(is., IS1 is2 IS3 is4))
◎ Pattern屬性
Pattern屬性設置或返回被搜索的正則表達式模式。
文法
object.Pattern [= searchstring]
Pattern 屬性的語法包含以下幾個部分：
語法說明：
object 必需的。總是一個RegExp 對像變量。
searchstring 可選的。被搜索的正則字符串表達式。它可能包含設置部分錶格中的各種正則表達式字符。
設定
在書寫正則表達式的模式時使用了特殊的字符和序列。下面描述了可以使用的字符和序列，並給出了實例。
將下一個字符標記為特殊字符或字面值。例如n與字符n匹配。 n與換行符匹配。序列/與匹配對面，(與(匹配。
^ 匹配輸入的開始位置。
$ 匹配輸入的結尾。
* 匹配前一個字符零次或幾次。例如，zo*可以匹配z、zoo。
匹配前一個字符一次或多次。例如，zo 可以匹配zoo,但不匹配z。
? 匹配前一個字符零次或一次。例如，a?ve?可以匹配never中的ve。
. 匹配換行符以外的任何字符。
(pattern) 與模式匹配並記住匹配。匹配的子字符串可以從作為結果的Matches 集合中使用Item [0]...[n]取得。如果要匹配括號字符(和)，可使用( 或)。
x|y 匹配x 或y。例如z|food 可匹配z 或food。 (z|f)ood 匹配zoo 或food。
{n} n 為非負的整數。匹配恰好n次。例如，o{2} 不能與Bob 中的o 匹配，但是可以與foooood中的前兩個o匹配。
{n,} n 為非負的整數。匹配至少n次。例如，o{2,}不匹配Bob中的o，但是匹配foooood中所有的o。 o{1,}等價於o 。 o{0,}等價於o*。
{n,m} m 和n 為非負的整數。匹配至少n 次，至多m 次。例如，o{1,3} 匹配fooooood中前三個o。 o{0,1}等價於o?。
[xyz] 一個字符集。與括號中字符的其中之一匹配。例如，[abc] 匹配plain中的a。
[^xyz] 一個否定的字符集。匹配不在此括號中的任何字符。例如，[^abc] 可以匹配plain中的p.
[az] 表示某個範圍內的字符。與指定區間內的任何字符匹配。例如，[az]匹配a與z之間的任何一個小寫字母字符。
[^mz] 否定的字符區間。與不在指定區間內的字符匹配。例如，[mz]與不在m到z之間的任何字符匹配。
b 與單詞的邊界匹配，即單詞與空格之間的位置。例如，erb 與never中的er匹配，但是不匹配verb中的er。
B 與非單詞邊界匹配。 ea*rB與never early中的ear匹配。
d 與一個數字字符匹配。等價於[0-9]。
D 與非數字的字符匹配。等價於[^0-9]。
f 與分頁符匹配。
n 與換行符字符匹配。
r 與回車字符匹配。
s 與任何白字符匹配，包括空格、製表符、分頁符等。等價於[ fnrtv]。
S 與任何非空白的字符匹配。等價於[^ fnrtv]。
t 與製表符匹配。
v 與垂直製表符匹配。
w 與任何單詞字符匹配，包括下劃線。等價於[A-Za-z0-9_]。
W 與任何非單詞字符匹配。等價於[^A-Za-z0-9_]。
num 匹配num個，其中num 為一個正整數。引用回到記住的匹配。例如，(.)1匹配兩個連續的相同的字符。
n 匹配n，其中n 是一個八進制換碼值。八進制換碼值必須是1, 2 或3 個數字長。例如，11 和11 都與一個製表符匹配。 011等價於01 與1。八進制換碼值不得超過256。否則，只有前兩個字符被視為表達式的一部分。允許在正則表達式中使用ASCII碼。
xn 匹配n，其中n是一個十六進制的換碼值。十六進制換碼值必須恰好為兩個數字長。例如，x41匹配A。 x041等價於x04 和1。允許在正則表達式中使用ASCII 碼。
Pattern 屬性的用法：
| 以下為引用的內容： Function RegExpTest(patrn, strng) Dim regEx ' 建立變量。 Set regEx = New RegExp ' 建立正則表達式。 regEx.Pattern = patrn ' 設置模式。 regEx.IgnoreCase = True ' 設置是否區分大小寫。 RegExpTest = regEx.Execute(strng) ' 執行搜索。 End Function |
MsgBox(RegExpTest(is., IS1 is2 IS3 is4))
RegExp對象的方法
◎ Execute方法
Execute方法對指定的字符串執行正則表達式搜索。
文法
object.Execute(string)
語法部分描述
object 必需的。總是一個RegExp 對象的名稱。
string 必需的。要在其上執行正則表達式的文本字符串。
說明
正則表達式搜索的設計模式是通過RegExp 對象的Pattern 來設置的。
Execute 方法返回一個Matches 集合，其中包含了在string 中找到的每一個匹配的Match 對象。如果未找到匹配，Execute 將返回空的Matches 集合。
Execute 方法的用法：
| 以下為引用的內容： Function RegExpTest(patrn, strng) Dim regEx ' 建立變量。 Set regEx = New RegExp ' 建立正則表達式。 regEx.Pattern = patrn ' 設置模式。 regEx.IgnoreCase = False ' 設置區分大小寫。 regEx.Global = True ' 搜索全部匹配。 RegExpTest = regEx.Execute(strng) ' 執行搜索。 End Function |
MsgBox(RegExpTest(is., IS1 is2 IS3 is4))
◎ Replace方法
Replace方法替換在正則表達式查找中找到的文本。
文法
object.Replace(string1, string2)
語法部分描述
object 必需的。總是一個RegExp 對象的名稱。
string1 必需的。 string1 是將要進行文本替換的字符串。
string2 必需的。 string2 是替換文本字符串。
說明
被替換的文本的實際模式是通過RegExp 對象的Pattern 屬性設置的。
Replace 方法返回string1 的副本，其中的RegExp.Pattern 文本已經被替換為string2。如果沒有找到匹配的文本，將返回原來的string1 的副本。
eplace 方法的用法：
| 以下為引用的內容： Function ReplaceTest(patrn, replStr) Dim regEx, str1 ' 建立變量。 str1 = The quick brown fox jumped over the lazy dog. Set regEx = New RegExp ' 建立正則表達式。 regEx.Pattern = patrn ' 設置模式。 regEx.IgnoreCase = True ' 設置是否區分大小寫。 ReplaceTest = regEx.Replace(str1, replStr) ' 作替換。 End Function |
MsgBox(ReplaceTest(fox, cat))
' 將'fox' 替換為'cat'。
；另外，Replace 方法在模式中替換subexpressions 。 下面對以前示例中函數的調用，替換了原字符串中的所有字對：
MsgBox(ReplaceText((S )(s )(S ), $3$2$1)) ' Swap pairs of words.
◎ Test方法
Test方法對指定的字符串執行一個正則表達式搜索，並返回一個Boolean 值指示是否找到匹配的模式。
文法
object.Test(string)
語法部分描述
object 必需的。總是一個RegExp 對象的名稱。
string 必需的。要執行正則表達式搜索的文本字符串。
說明
正則表達式搜索的實際模式是通過RegExp對象的Pattern屬性來設置的。 RegExp.Global屬性對Test方法沒有影響。
如果找到了匹配的模式，Test方法返回True；否則返回False。
| 以下為引用的內容： Test 方法的用法： Function RegExpTest(patrn, strng) Dim regEx, retVal ' 建立變量。 Set regEx = New RegExp ' 建立正則表達式。 regEx.Pattern = patrn ' 設置模式。 regEx.IgnoreCase = False ' 設置是否區分大小寫。 retVal = regEx.Test(strng) ' 執行搜索測試。 If retVal Then RegExpTest = 找到一個或多個匹配。 Else RegExpTest = 未找到匹配。 End If End Function |
MsgBox(RegExpTest(is., IS1 is2 IS3 is4))
分享：如何用ASP輸出Excel文件在asp中利用excel的一個方法是將excel文件作為一個數據庫進行鏈接，然後的操作和對access數據庫操作類似。但是這個方法不是總能有用的，應為excel不是關係型的數據庫。對於一個固定格式，