前幾日我曾經(jīng)閱讀到一篇技術(shù)文章講述如何使用VBScript中的正則表達(dá)式對(duì)象來實(shí)現(xiàn)論壇里面的UBB功能。VBScript提供的正則表達(dá)式對(duì)象功能非常強(qiáng)大，但是只有5。5以上的腳本引擎才可以很好的支持正則表達(dá)式對(duì)象，為了獲得版本是
5。5的腳本引擎，你需要單獨(dú)安裝這個(gè)腳本引擎，或者安裝IE5.5，也就是說對(duì)服務(wù)器的要求比較苛刻，那就沒有其他的方法實(shí)現(xiàn)UBB功能了嗎？當(dāng)然不是了，現(xiàn)在就跟隨我一同來使用普通的VBScript腳本語言來實(shí)現(xiàn)功能強(qiáng)大的UBB功能吧。
　　先，在UBB功能中，核心功能也即最吸引人的功能是完全支持貼圖功能和字體屬性的控制。因?yàn)槌鲇诎踩�方面的原因，網(wǎng)絡(luò)上面的幾乎所有的論壇都盡可能的屏蔽掉了HTML代碼，這樣可以避免人為的有意無意的對(duì)論壇的破壞，這樣雖然保證了論壇自身的安全性，但是網(wǎng)友面對(duì)的貼子內(nèi)容就始終是一成不變的顏色、字體、大小，更不要奢望看到絢麗多彩的圖片了。UBB代碼由此而生，具體來說說我們?nèi)绾螌?shí)現(xiàn)以上的UBB核心功能。
　　下面我們先來詳細(xì)描述一下我們將要實(shí)現(xiàn)的UBB代碼的語法：
　　一、 支持貼圖的UBB語法
　　語法：[img]圖片路徑[/img]
　　實(shí)例：[img]http://www.coolbel.com/chinagusu/logo.gif[/img]
　　描述：上面語法的結(jié)果就是在網(wǎng)頁上面顯示出來一幅圖片
　　二、 支持字體顏色的UBB語法：
　　語法：[red]文字[/red]
　　[green]文字[/green]
　　等等
　　實(shí)例：[blue]這是一段藍(lán)色的文字[/blue]
　　描述：上面的一段語法就是顯示一段藍(lán)顏色的文字
　　三、 支持超級(jí)連接的UBB代碼
　　語法：連接地址
　　實(shí)例：http://www.coolbel.com/chinagusu
　　描述：上面的語法的結(jié)果就是生成一段超級(jí)連接，當(dāng)你點(diǎn)擊的時(shí)候就會(huì)轉(zhuǎn)跳到連接的地址！
　　四、 支持Email地址的UBB語法
　　語法：你的email地址
　　實(shí)例：uestc95@263.net
　　描述：上面的代碼結(jié)果就是顯示一個(gè)郵件地址，當(dāng)你用鼠標(biāo)點(diǎn)擊的時(shí)候，就會(huì)自動(dòng)打開發(fā)送電子郵件的軟件，并將地
址寫上。
　　五、 支持字體屬性的UBB語法
　　語法：一段文字 等等
　　實(shí)例：一段粗體的文字
　　描述：上面代碼的結(jié)果就是顯示一段粗體的文字
　　好了，UBB代碼的核心功能就是上面的這些東西了，當(dāng)然你還可以增加其他的種種功能因?yàn)檫@個(gè)UBB代碼的語法都是可
以自定義的。
　　在我們開始具體實(shí)現(xiàn)UBB功能之前，我們先來了解幾個(gè)重要的VBScript函數(shù)：Instr函數(shù)和Replace函數(shù)。也許你看到這
里忍不住想要說，這也太簡單了吧，呵呵，其實(shí)這兩個(gè)函數(shù)的確是我們?cè)诰幊坍?dāng)中使用比較頻繁的兩個(gè)函數(shù)，但是它也有自己的小秘密哦，我們先來看看這兩個(gè)函數(shù)的具體語法：
　　InStr 函數(shù)
　　返回某字符串在另一字符串中第一次出現(xiàn)的位置。
　　InStr([start, ]string1, string2[, compare])
　　參數(shù)
　　start
　　可選項(xiàng)。數(shù)值表達(dá)式，用于設(shè)置每次搜索的開始位置。如果省略，將從第一個(gè)字符的位置開始搜索。如果 start 包含 Null，則會(huì)出現(xiàn)錯(cuò)誤。如果已指定 compare，則必須要有 start 參數(shù)。
　　string1
　　必選項(xiàng)。接受搜索的字符串表達(dá)式。
　　string2
　　必選項(xiàng)。要搜索的字符串表達(dá)式。
　　compare
　　可選項(xiàng)。指示在計(jì)算子字符串時(shí)使用的比較類型的數(shù)值。有關(guān)數(shù)值，請(qǐng)參閱"設(shè)置"部分。如果省略，將執(zhí)行二進(jìn)制比
較。
　　設(shè)置
　　compare 參數(shù)可以有以下值：
　　常數(shù)
　　值
　　描述
　　vbBinaryCompare
　　0
　　執(zhí)行二進(jìn)制比較。
　　vbTextCompare
　　1
　　執(zhí)行文本比較。
　　返回值
　　InStr 函數(shù)返回以下值：
　　如果
　　InStr 返回
　　string1 為零長度
　　0
　　string1 為 Null
　　Null
　　string2 為零長度
　　start
　　string2 為 Null
　　Null
　　string2 沒有找到
　　0
　　在 string1 中找到 string2
　　找到匹配字符串的位置
　　start > Len(string2)
　　0