免费在线观看毛片网站,久久久久国产,九九久久精品

asp之自動閉合UBB標簽函數

網絡 2010/1/21 20:07:19 深山行者字體:大中小瀏覽 8550

asp之自動閉合UBB標簽函數

以下為詳細代碼

Function closeUBB(strContent)
'*************************************
'自動閉合UBB
'*************************************
    Dim arrTags, i, OpenPos, ClosePos, re, strMatchs, j, Match
    Set re = New RegExp            '申明re對象
    re.IgnoreCase = True        '設置是否區分字符大小寫
    re.Global = True            '設置全局可用性
    arrTags = Array("code", "quote", "list", "color", "align", "font", "size", "b", "i", "u", "html")    '建立數組，存儲相關需要檢測是否閉合的標簽
    For i = 0 To UBound(arrTags)    '循環對數組里的每一個元素進行檢測
        OpenPos = 0                '初始化當前標簽開始標記的個數
        ClosePos = 0            '初始化當前標簽結束標記的個數
        re.Pattern = "\[" + arrTags(i) + "(=[^\[\]]+|)\]"    '開始分別正則判斷開始與結束標記的個數
        Set strMatchs = re.Execute(strContent)    
        For Each Match in strMatchs
            OpenPos = OpenPos + 1
        Next
        re.Pattern = "\[/" + arrTags(i) + "\]"
        Set strMatchs = re.Execute(strContent)
        For Each Match in strMatchs
            ClosePos = ClosePos + 1
        Next
        For j = 1 To OpenPos - ClosePos    '當開始與結束標記數量不一致時，閉合當前標簽
            strContent = strContent + "[/" + arrTags(i) + "]"
        Next
    Next
    closeUBB = strContent
    Set re = Nothing
End Function

前一頁:asp之自動閉合HTML標簽函數

后一頁:ASP漢字轉拼音，支持自定義特殊詞語

相關閱讀: 連云港智慧樹旅游; windows xp 安裝IIS，設置IIS。; 后臺編輯源碼里有行號; asp計算頁面執行時間顯示到毫秒; 要想創業成功必讀的 36 條鐵律; 網頁制作,改變你的思維方; 萬家樂; 發布重大事件說明

共有0條關于《asp之自動閉合UBB標簽函數》的評論: 發表評論

正在加載評論......

返回頂部發表評論

呢稱:
表情:
內容:	評論內容:不能超過 1000 字,需審核,請自覺遵守互聯網相關政策法規。
驗證碼:

網友評論聲明,請自覺遵守互聯網相關政策法規。

您發布的評論即表示同意遵守以下條款:
一、不得利用本站危害國家安全、泄露國家秘密,不得侵犯國家、社會、集體和公民的合法權益;
二、不得發布國家法律、法規明令禁止的內容;互相尊重,對自己在本站的言論和行為負責;
三、本站對您所發布內容擁有處置權。

更多信息>>欄目類別選擇: 百度小程序開發; 微信小程序開發; 微信公眾號開發; uni-app; asp函數庫; ASP; DIV+CSS; HTML; python

更多>>同類信息: ASP中Utf-8與Gb2312編碼轉換亂碼問題的解決方法頁面編碼聲明; asp顯示隨機密碼; 通過阿里云服務接口獲得ip地址詳細信息; iis點開后任務欄上有顯示，但是窗口看不到的解決辦法; RSA加密解密插件; 微軟Encoder加密解密函數

更多>>最新添加文章: dw里面查找替換使用正則刪除sqlserver里面的CONSTRAINT; Android移動端自動化測試：使用UIAutomatorViewer與Selenium定位元素; 抖音直播音掛載小雪花懂車帝小程序; javascript獲取瀏覽器指紋可以用來做投票; 火狐Mozilla Firefox出現：無法載入您的Firefox配置文件它可能已經丟失或是無法訪問問題解決集合處理辦法; 在Android、iOS、Windows、MacOS中微信小程序的文件存放路徑; python通過代碼修改pip下載源讓下載庫飛起; python里面requests.post返回的res.text還有其它的嗎

更多>>隨機抽取信息: 符合標準的正常工作的對聯廣告(2); 絕對管用的Swishmax (Flash制作) 綠色特別版下載; 重慶長航江山國際旅行社; IE 7.0 BETA3 瀏覽器綠色免安裝版下載; 四川省旅者旅行社有限公司總部; 連云港旅游網

更多標簽熱門標簽

ie6 長高亮下拉框黑白資料搜索 flash 透明 form 刷新滑過自適應上下左右邊界重疊瀏覽器選項數據 2003 xml 許愿原則二級表達舒服漢字愛國 FlashFxp innerText 輪流特效 cpu 管理 flush div的高度 letter-spacing 鏈接樣式彈窗文件大小 outerHTML time innerHTML 文字樣式顏色調節錯誤下載選項卡企業 tag RegExp

99热热热_国产成人自拍一区_欧美一级网站_99热在线播放_国产精品乱码一区二区三区_久久精品国产一区二区三区

asp之自動閉合UBB標簽函數