ASP中讓Replace替換不區分大小寫方法

我們先來看一看 Replace 的詳細參數

描述
返回字串，其中指定數目的某子字串被替換為另一個子字串。
文法
Replace(expression, find, replacewith[, compare[, count[, start]]])

Replace 函數的文法有以下參數：

參數 描述
expression 必選項。 字串運算式 包含要替代的子字串。
find 必選項。被搜尋的子字串。
replacewith 必選項。用於替換的子字串。
start 可選項。expression 中開始搜尋子字串的位置。如果省略，預設值為 1。在和count 關聯時必須用
count 可選項。執行子字串替換的數目。如果省略，預設值為 -1，表示進行所有可能的替換。在和 start 關聯時必須用。
compare 可選項。指示在計運算元字串時使用的比較類型的數值。有關數值，請參閱“設定”部分。如果省略,預設值為 0 ,這意味著必須進行二進位比較。

設定
compare 參數可以有以下值：
常數 值 描述
vbBinaryCompare 0 執行二進位比較。
vbTextCompare 1 執行文本比較。

傳回值
Replace 返回以下值：
如果 Replace 返回
expression 為零長度 零長度字串 ("")。
expression 為 Null 錯誤。
find 為零長度 expression 的副本。
replacewith 為零長度 expression 的副本，其中刪除了所有由 find 參數指定的內容。
start > Len(expression) 零長度字串。
count 為 0 expression 的副本。

說明
Replace 函數的傳回值是經過替換（從由 start 指定的位置開始到 expression 字串的結尾）後的字串，而不是原始字串從開始至結尾的副本。
下面的樣本利用 Replace 函數返回字串:

複製代碼 代碼如下:Dim MyString
MyString = Replace("XXpXXPXXp", "p", "Y") '二進位比較從字串左端開始。返回 "XXYXXPXXY"。
MyString = Replace("XXpXXPXXp", "p", "Y", '文本比較從第三個字元開始。返回 "YXXYXXY"。3，, -1, 1)

方法一： 直接用ASP內建函數replace 這也是最簡單的方法

title=replace(title,"DF","SD",1,-1,1)

replace函數參數詳解:
參數1：源字串
參數2：要被替換的字元
參數3：新的字元。，既，要將源字串中的某些字元，替換成新指定的字元
參數4：值為1.指定從第一個字元開始搜尋該字串
參數5：值為－1 指定每一個子串都要被替換
參數6：值為1 指定字串的比較不區分大小寫。

(高亮顯示關鍵字)的兩個函數
方法2：用正則不區分大小寫替換指定字元
以下是函數原始碼：

複製代碼 代碼如下:'//函數：字串替換
'//參數：Regex,被替換字串,替換字串
Public Function ReplaceTest(patrn, mStr, replStr)
Dim regEx
Set regEx = New RegExp
regEx.Pattern = patrn
regEx.IgnoreCase = True
regEx.Global = True
ReplaceTest = regEx.Replace(mStr, replStr)
Set regEx = Nothing
End Function