sp;                    
                            outputString = outputString & FindReplace(Trim(charBuffer))
                            If right(charBuffer, 1) = " " Then outputString = outputString & " "
                            charBuffer = ""
                        End If
                    Else
                        outputString = outputString & " "
                    End If
                Case "("
                    If left(charBuffer, 1) = " " Then
                        outputString = outputString & " "
                    End If
                    outputString = outputString & FindReplace(Trim(charBuffer)) & "("
                    charBuffer = ""
                Case Chr(60)
                    outputString = outputString & "<"
                Case Chr(62)
                    outputString = outputString & ">"
          &nbs

 << 上一页  [11] [12] [13] [14] [15] 下一页

在google里搜索更多VBS、ASP代码语法加亮显示的类

	Web www.51ec.org

上一篇信息学院： 远程获取内容，并将内容存在本地电脑上，包括任何文件！利用xmlhttp和adodb.stream,酷！绝对原创！

下一篇信息学院： 超长字符的智能分页-支持HTML。