推薦：利用ASP規劃聊天室經 常在Internet 上沖浪的網友恐怕很少有人沒有去過聊天室胡亂神聊。 你只要稍微留意一下就會發現這些聊天室大多是用CGI 程序或者用java 開發的Applet 維護的。 開發過這類CGI 或Applet 的程序員都知道，
我們先來看一看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：用正則不區分大小寫替換指定字符
以下是函數源代碼：
複製代碼代碼如下:
'//函數：字符串替換
'//參數：正則表達式,被替換字符串,替換字符串
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
分享：用ASP進行網絡打印的功能%@ Language=VBScript % % Option Explicit Dim strSubmit 'Form中用來保存提交按鈕的值Dim strPRinterPath 'Form中保存網絡打印機路徑的值Dim strUsername 'Form中用戶名的值Dim strPassWord 'Form中密碼的值Dim strMessage 'Form打印內容的值Dim objFS 'VBScrip