📄 inc_func_posting.asp
字号:
fString = replace(fString, "</font id=pink>", "[/pink]", 1, -1, 1)
fString = replace(fString, "<font color=orange>", "[orange]", 1, -1, 1)
fString = replace(fString, "</font id=orange>", "[/orange]", 1, -1, 1)
fString = replace(fString, "<font color=gold>", "[gold]", 1, -1, 1)
fString = replace(fString, "</font id=gold>", "[/gold]", 1, -1, 1)
fString = replace(fString, "<font color=beige>", "[beige]", 1, -1, 1)
fString = replace(fString, "</font id=beige>", "[/beige]", 1, -1, 1)
fString = replace(fString, "<font color=teal>", "[teal]", 1, -1, 1)
fString = replace(fString, "</font id=teal>", "[/teal]", 1, -1, 1)
fString = replace(fString, "<font color=navy>", "[navy]", 1, -1, 1)
fString = replace(fString, "</font id=navy>", "[/navy]", 1, -1, 1)
fString = replace(fString, "<font color=maroon>", "[maroon]", 1, -1, 1)
fString = replace(fString, "</font id=maroon>", "[/maroon]", 1, -1, 1)
fString = replace(fString, "<font color=limegreen>", "[limegreen]", 1, -1, 1)
fString = replace(fString, "</font id=limegreen>", "[/limegreen]", 1, -1, 1)
'##
fString = replace(fString, "<font color=""red"">", "[red]", 1, -1, 1)
fString = replace(fString, "</font id=""red"">", "[/red]", 1, -1, 1)
fString = replace(fString, "<font color=""green"">", "[green]", 1, -1, 1)
fString = replace(fString, "</font id=""green"">", "[/green]", 1, -1, 1)
fString = replace(fString, "<font color=""blue"">", "[blue]", 1, -1, 1)
fString = replace(fString, "</font id=""blue"">", "[/blue]", 1, -1, 1)
fString = replace(fString, "<font color=""white"">", "[white]", 1, -1, 1)
fString = replace(fString, "</font id=""white"">", "[/white]", 1, -1, 1)
fString = replace(fString, "<font color=""purple"">", "[purple]", 1, -1, 1)
fString = replace(fString, "</font id=""purple"">", "[/purple]", 1, -1, 1)
fString = replace(fString, "<font color=""yellow"">", "[yellow]", 1, -1, 1)
fString = replace(fString, "</font id=""yellow"">", "[/yellow]", 1, -1, 1)
fString = replace(fString, "<font color=""violet"">", "[violet]", 1, -1, 1)
fString = replace(fString, "</font id=""violet"">", "[/violet]", 1, -1, 1)
fString = replace(fString, "<font color=""brown"">", "[brown]", 1, -1, 1)
fString = replace(fString, "</font id=""brown"">", "[/brown]", 1, -1, 1)
fString = replace(fString, "<font color=""black"">", "[black]", 1, -1, 1)
fString = replace(fString, "</font id=""black"">", "[/black]", 1, -1, 1)
fString = replace(fString, "<font color=""pink"">", "[pink]", 1, -1, 1)
fString = replace(fString, "</font id=""pink"">", "[/pink]", 1, -1, 1)
fString = replace(fString, "<font color=""orange"">", "[orange]", 1, -1, 1)
fString = replace(fString, "</font id=""orange"">", "[/orange]", 1, -1, 1)
fString = replace(fString, "<font color=""gold"">", "[gold]", 1, -1, 1)
fString = replace(fString, "</font id=""gold"">", "[/gold]", 1, -1, 1)
fString = replace(fString, "<font color=""beige"">", "[beige]", 1, -1, 1)
fString = replace(fString, "</font id=""beige"">", "[/beige]", 1, -1, 1)
fString = replace(fString, "<font color=""teal"">", "[teal]", 1, -1, 1)
fString = replace(fString, "</font id=""teal"">", "[/teal]", 1, -1, 1)
fString = replace(fString, "<font color=""navy"">", "[navy]", 1, -1, 1)
fString = replace(fString, "</font id=""navy"">", "[/navy]", 1, -1, 1)
fString = replace(fString, "<font color=""maroon"">", "[maroon]", 1, -1, 1)
fString = replace(fString, "</font id=""maroon"">", "[/maroon]", 1, -1, 1)
fString = replace(fString, "<font color=""limegreen"">", "[limegreen]", 1, -1, 1)
fString = replace(fString, "</font id=""limegreen"">", "[/limegreen]", 1, -1, 1)
fString = replace(fString, "<h1>", "[h1]", 1, -1, 1)
fString = replace(fString, "</h1>", "[/h1]", 1, -1, 1)
fString = replace(fString, "<h2>", "[h2]", 1, -1, 1)
fString = replace(fString, "</h2>", "[/h2]", 1, -1, 1)
fString = replace(fString, "<h3>", "[h3]", 1, -1, 1)
fString = replace(fString, "</h3>", "[/h3]", 1, -1, 1)
fString = replace(fString, "<h4>", "[h4]", 1, -1, 1)
fString = replace(fString, "</h4>", "[/h4]", 1, -1, 1)
fString = replace(fString, "<h5>", "[h5]", 1, -1, 1)
fString = replace(fString, "</h5>", "[/h5]", 1, -1, 1)
fString = replace(fString, "<h6>", "[h6]", 1, -1, 1)
fString = replace(fString, "</h6>", "[/h6]", 1, -1, 1)
'## left for compatibility with older versions of the forum
fString = replace(fString, "<font size=1>", "[size=1]", 1, -1, 1)
fString = replace(fString, "</font id=size1>", "[/size=1]", 1, -1, 1)
fString = replace(fString, "<font size=2>", "[size=2]", 1, -1, 1)
fString = replace(fString, "</font id=size2>", "[/size=2]", 1, -1, 1)
fString = replace(fString, "<font size=3>", "[size=3]", 1, -1, 1)
fString = replace(fString, "</font id=size3>", "[/size=3]", 1, -1, 1)
fString = replace(fString, "<font size=4>", "[size=4]", 1, -1, 1)
fString = replace(fString, "</font id=size4>", "[/size=4]", 1, -1, 1)
fString = replace(fString, "<font size=5>", "[size=5]", 1, -1, 1)
fString = replace(fString, "</font id=size5>", "[/size=5]", 1, -1, 1)
fString = replace(fString, "<font size=6>", "[size=6]", 1, -1, 1)
fString = replace(fString, "</font id=size6>", "[/size=6]", 1, -1, 1)
'##
fString = replace(fString, "<font size=""1"">", "[size=1]", 1, -1, 1)
fString = replace(fString, "</font id=""size1"">", "[/size=1]", 1, -1, 1)
fString = replace(fString, "<font size=""2"">", "[size=2]", 1, -1, 1)
fString = replace(fString, "</font id=""size2"">", "[/size=2]", 1, -1, 1)
fString = replace(fString, "<font size=""3"">", "[size=3]", 1, -1, 1)
fString = replace(fString, "</font id=""size3"">", "[/size=3]", 1, -1, 1)
fString = replace(fString, "<font size=""4"">", "[size=4]", 1, -1, 1)
fString = replace(fString, "</font id=""size4"">", "[/size=4]", 1, -1, 1)
fString = replace(fString, "<font size=""5"">", "[size=5]", 1, -1, 1)
fString = replace(fString, "</font id=""size5"">", "[/size=5]", 1, -1, 1)
fString = replace(fString, "<font size=""6"">", "[size=6]", 1, -1, 1)
fString = replace(fString, "</font id=""size6"">", "[/size=6]", 1, -1, 1)
fString = replace(fString, "<br />","[br]", 1, -1, 1)
fString = replace(fString, "<hr noshade size=""1"">","[hr]", 1, -1, 1)
'## left for compatibility with older versions of the forum
fString = replace(fString, "<div align=left>", "[left]", 1, -1, 1)
fString = replace(fString, "</div id=left>", "[/left]", 1, -1, 1)
'##
fString = replace(fString, "<div align=""left"">", "[left]", 1, -1, 1)
fString = replace(fString, "</div id=""left"">", "[/left]", 1, -1, 1)
fString = replace(fString, "<center>","[center]", 1, -1, 1)
fString = replace(fString, "</center>","[/center]", 1, -1, 1)
'## left for compatibility with older versions of the forum
fString = replace(fString, "<div align=right>", "[right]", 1, -1, 1)
fString = replace(fString, "</div id=right>", "[/right]", 1, -1, 1)
'##
fString = replace(fString, "<div align=""right"">", "[right]", 1, -1, 1)
fString = replace(fString, "</div id=""right"">", "[/right]", 1, -1, 1)
fString = replace(fString, "<ul>","[list]", 1, -1, 1)
fString = replace(fString, "</ul>","[/list]", 1, -1, 1)
'## left for compatibility with older versions of the forum
fString = replace(fString, "<ol type=1>","[list=1]", 1, -1, 1)
fString = replace(fString, "</ol id=1>","[/list=1]", 1, -1, 1)
fString = replace(fString, "<ol type=a>","[list=a]", 1, -1, 1)
fString = replace(fString, "</ol id=a>","[/list=a]", 1, -1, 1)
'##
fString = replace(fString, "<ol type=""1"">","[list=1]", 1, -1, 1)
fString = replace(fString, "</ol id=""1"">","[/list=1]", 1, -1, 1)
fString = replace(fString, "<ol type=""a"">","[list=a]", 1, -1, 1)
fString = replace(fString, "</ol id=""a"">","[/list=a]", 1, -1, 1)
fString = replace(fString, "<li>","[*]", 1, -1, 1)
fString = replace(fString, "</li>","[/*]", 1, -1, 1)
'## left for compatibility with older versions of the forum
fString = replace(fString, "<pre id=code><font face=courier size=" & strDefaultFontSize & " id=code>","[code]", 1, -1, 1)
fString = replace(fString, "</font id=code></pre id=code>","[/code]", 1, -1, 1)
'##
fString = replace(fString, "<pre id=""code""><font face=""courier"" size=""" & strDefaultFontSize & """ id=""code"">","[code]", 1, -1, 1)
fString = replace(fString, "</font id=""code""></pre id=""code"">","[/code]", 1, -1, 1)
end if
if strIcons = "1" then
'## left for compatibility with older versions of the forum
fString = replace(fString, "<img src=icon_smile_angry.gif border=0 align=middle>", "[:(!]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_blackeye.gif border=0 align=middle>", "[B)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_dead.gif border=0 align=middle>", "[xx(]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_dead.gif border=0 align=middle>", "[XX(]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_shock.gif border=0 align=middle>", "[:O]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_shock.gif border=0 align=middle>", "[:o]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_shock.gif border=0 align=middle>", "[:0]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_blush.gif border=0 align=middle>", "[:I]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_sad.gif border=0 align=middle>", "[:(]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_shy.gif border=0 align=middle>", "[8)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile.gif border=0 align=middle>", "[:)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_evil.gif border=0 align=middle>", "[}:)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_big.gif border=0 align=middle>", "[:D]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_cool.gif border=0 align=middle>", "[8D]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_sleepy.gif border=0 align=middle>", "[|)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_clown.gif border=0 align=middle>", "[:o)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_clown.gif border=0 align=middle>", "[:O)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_clown.gif border=0 align=middle>", "[:0)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_tongue.gif border=0 align=middle>", "[:P]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_tongue.gif border=0 align=middle>", "[:p]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_wink.gif border=0 align=middle>", "[;)]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_8ball.gif border=0 align=middle>", "[8]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_question.gif border=0 align=middle>", "[?]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_approve.gif border=0 align=middle>", "[^]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_disapprove.gif border=0 align=middle>", "[V]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_disapprove.gif border=0 align=middle>", "[v]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_dissapprove.gif border=0 align=middle>", "[V]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_dissapprove.gif border=0 align=middle>", "[v]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_kisses.gif border=0 align=middle>", "[:X]", 1, -1, 1)
fString = replace(fString, "<img src=icon_smile_kisses.gif border=0 align=middle>", "[:x]", 1, -1, 1)
'##
end if
if strAllowForumCode = "1" then
if strIMGInPosts = "1" then
fString = replace(fString, "<img src=""","[img]", 1, -1, 1)
'## left for compatibility with older versions of the forum
fString = replace(fString, "<img align=right src=""","[img=right]", 1, -1, 1)
fString = replace(fString, "<img align=left src=""","[img=left]", 1, -1, 1)
fString = replace(fString, """ border=0>","[/img]", 1, -1, 1)
fString = replace(fString, """ id=right border=0>","[/img=right]", 1, -1, 1)
fString = replace(fString, """ id=left border=0>","[/img=left]", 1, -1, 1)
'##
fString = replace(fString, "<img align=""right"" src=""","[img=right]", 1, -1, 1)
fString = replace(fString, "<img align=""left"" src=""","[img=left]", 1, -1, 1)
fString = replace(fString, """ border=""0"">","[/img]", 1, -1, 1)
fString = replace(fString, """ id=""right"" border=""0"">","[/img=right]", 1, -1, 1)
fString = replace(fString, """ id=""left"" border=""0"">","[/img=left]", 1, -1, 1)
end if
end if
end if
fString = Replace(fString, "'", "'")
CleanCode = fString
end function
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -