📄 code.asp
字号:
<% Option Explicit %>
<!--#include file="conn.asp" -->
<!--#include file="includes/emoticons.asp" -->
<%
Response.Buffer = True
Dim intIndexPosition
Dim intNumberOfOuterLoops
Dim intLoop
Dim intInnerLoop
Set rsConn = Nothing
adoCon.Close
Set adoCon = Nothing
%>
<html>
<head>
<title>论坛代码</title>
<!--#include file="includes/skin.asp" -->
</head>
<body bgcolor="<% = strBgColour %>" text="<% = strTextColour %>" background="<% = strBgImage %>" marginheight="0" marginwidth="0" topmargin="0" leftmargin="0" OnLoad="self.focus();">
<table width="100%" border="0" cellspacing="0" cellpadding="1" align="center">
<tr><td align="center"><p><span class="heading">HTML语法</span><br>
<br /><span class="text"> 你可以用以下论坛代码修饰你的文字 </span></p>
</td></tr></table>
<table width="600" border="0" cellspacing="0" cellpadding="1" bgcolor="<% = strTableBorderColour %>" align="center">
<tr><td>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="<% = strTableBgColour %>">
<tr><td bgcolor="<% = strTableBgColour %>">
<table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="<% = strTableBgColour %>">
<tr><td>
<table border="0" align="center" cellpadding="4" cellspacing="1" width="600">
<tr>
<td width="62%" class="bold" bgcolor="<% = strTableColour %>" background="<% = strTableTitleBgImage %>">HTML语法</td>
<td width="38%" class="bold" bgcolor="<% = strTableColour %>" background="<% = strTableTitleBgImage %>">功能</td>
</tr></table></td></tr>
<tr align="left" bgcolor="<% = strTableColour %>" background="<% = strTableBgImage %>">
<td colspan="2" class="text" align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="1">
<tr><td width="63%" class="bold">文字格式</td>
<td width="37%"> </td>
</tr><tr>
<td width="63%" class="text">[B]粗体[/B]</td>
<td width="37%"><strong>粗体</strong></td>
</tr><tr>
<td width="63%" class="text">[I]斜体[/I]</td>
<td width="37%"><em>斜体</em></td>
</tr><tr>
<td width="63%" class="text">[U]下划线[/U]</td>
<td width="37%">下划线</td>
</tr><tr>
<td width="63%" class="text">[CENTER]居中[/CENTER]</td>
<td width="37%" align="center" class="text">居中</td>
</tr><tr>
<td width="63%" class="text"> </td>
<td width="37%"> </td>
</tr><tr>
<td width="63%" class="bold">图片和连接</td>
<td width="37%"> </td>
</tr><tr>
<td width="63%" class="text">[IMG]http://myWeb.com/smiley.gif[/IMG]</td>
<td width="37%"><img src="images/smileys/smiley4.gif" width="17" height="17"></td>
</tr><tr>
<td width="63%" class="smtext">[URL=http://www.myWeb.com]我的连接[/URL]</td> <td width="37%">我的连接</td>
</tr><tr>
<td width="63%" class="smtext">[EMAIL=me@myWeb.com]我的email[/EMAIL]</td> <td width="37%">我的email</td>
</tr><tr>
<td width="63%" class="text"> </td>
<td width="37%"> </td>
</tr><tr>
<td width="63%" class="bold">字体类型</td>
<td width="37%"> </td>
</tr><tr>
<td width="63%" class="text">[FONT=Arial]Arial[/FONT]</td>
<td width="37%"><font face="Arial, Helvetica, sans-serif" size="2">Arial</font></td>
</tr><tr>
<td width="63%" class="text">[FONT=Courier]Courier[/FONT]</td>
<td width="37%"><font face="Courier New, Courier, mono">Courier</font></td>
</tr><tr>
<td width="63%" class="text">[FONT=Times]Times[/FONT]</td>
<td width="37%"><font face="Times New Roman, Times, serif">Times</font></td>
</tr><tr>
<td width="63%" class="text">[FONT=Verdana]Verdana[/FONT]</td>
<td width="37%"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Verdana</font></td>
</tr><tr>
<td width="63%" class="text"> </td>
<td width="37%"> </td>
</tr><tr>
<td width="63%" class="bold">字体大小</td>
<td width="37%"> </td>
</tr><tr>
<td width="63%" class="text">[siZE=1]字体大小 1[/FONT]</td>
<td width="37%"><font size="1">字体大小 1</font></td>
</tr> <tr>
<td width="63%" class="text">[siZE=2]字体大小 2[/FONT]</td>
<td width="37%"><font size="2">字体大小 2</font></td>
</tr>
<tr>
<td width="63%" class="text">[siZE=3]字体大小 3[/FONT]</td>
<td width="37%"><font size="3">字体大小 3</font></td>
</tr><tr>
<td width="63%" class="text">[siZE=4]字体大小 4[/FONT]</td>
<td width="37%"><font size="4">字体大小 4</font></td>
</tr><tr>
<td width="63%" class="text">[siZE=5]字体大小 5[/FONT]</td>
<td width="37%"><font size="5">字体大小 5</font></td>
</tr>
<tr>
<td width="63%" class="text">[siZE=6]字体大小 6[/FONT]</td>
<td width="37%"><font size="6">字体大小 6</font></td>
</tr>
<tr>
<td width="63%" class="text"> </td>
<td width="37%"> </td>
</tr>
<tr>
<td width="63%" class="bold">Smile</td>
<td width="37%"> </td>
</tr>
<tr>
<td width="63%" class="text">[BLACK]黑 字体[/FONT]</td>
<td width="37%" class="text">黑 字体</td>
</tr>
<tr>
<td width="63%" class="text">[WHITE]白 字体[/FONT]</td>
<td width="37%" class="text">白 字体</td>
</tr>
<tr>
<td width="63%" class="text">[BLUE]兰 字体[/FONT]</td>
<td width="37%" class="text">兰 字体</td>
</tr>
<tr>
<td width="63%" class="text">[RED]红 字体[/FONT]</td>
<td width="37%" class="text">红 字体</td>
</tr>
<tr>
<td width="63%" class="text">[GREEN]绿 字体[/FONT]</td>
<td width="37%" class="text">绿 字体</td>
</tr>
<tr>
<td width="63%" class="text">[YELLOW]黄 字体[/FONT]</td>
<td width="37%" class="text">黄 字体</td>
</tr>
<tr>
<td width="63%" class="text">[ORANGE]橘 字体[/FONT]</td>
<td width="37%" class="text">橘 字体</td>
</tr>
<tr>
<td width="63%" class="text">[BROWN]褐 字体[/FONT]</td>
<td width="37%" class="text">褐 字体</td>
</tr>
<tr>
<td width="63%" class="text">[MAGENTA]深红 字体[/FONT]</td>
<td width="37%" class="text">深红 字体</td>
</tr>
<tr>
<td width="63%" class="text">[CYAN]紫 字体[/FONT]</td>
<td width="37%" class="text">紫 字体</td>
</tr>
<tr>
<td width="63%" class="text">[LIME GREEN]石灰绿 字体[/FONT]</td>
<td width="37%" class="text">石灰绿 字体</td>
</tr><%
If blnFlashFiles Then %>
<tr>
<td width="63%" class="text"> </td>
<td width="37%" class="text"> </td>
</tr>
<tr>
<td width="63%" class="bold">Flash文件</td>
<td width="37%" class="text"> </td>
</tr>
<tr>
<td width="63%" colspan="2" class="text">[FLASH WIDTH=50 HEIGHT=50]http://www.myWeb.com/flash.swf[/FLASH]</td>
</tr><%
End If
If blnEmoticons Then %>
<tr>
<td width="63%" class="text"> </td>
<td width="37%" class="text"> </td>
</tr>
<tr>
<td width="63%" class="bold">表情</td>
<td width="37%" class="text"> </td>
</tr>
<tr>
<td colspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="4">
<%
intIndexPosition = 1
intNumberOfOuterLoops = UBound(saryEmoticons) / 2
If UBound(saryEmoticons) MOD 2 > 0 Then intNumberOfOuterLoops = intNumberOfOuterLoops + 1
For intLoop = 1 to intNumberOfOuterLoops
%><tr>
<%
For intInnerLoop = 1 to 2
If intIndexPosition > UBound(saryEmoticons) Then %>
<td width="5" class="text"> </td>
<td width="92" class="text"> </td>
<td width="44" class="text"> </td>
<% Else %>
<td width="5" class="text"><img src="<%= saryEmoticons(intIndexPosition,3) %>" border="0" alt="<%= saryEmoticons(intIndexPosition,2) %>"></td>
<td width="92" class="text" nowrap="nowrap"><%= saryEmoticons(intIndexPosition,1) %></td>
<td width="44" class="text"><%= saryEmoticons(intIndexPosition,2) %></td>
<% End If
intIndexPosition = intIndexPosition + 1
Next %>
</tr>
<%
Next
%></table>
</td>
</tr><%
End If
%>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="96%" border="0" cellspacing="0" cellpadding="1" align="center">
<tr>
<td align="center" height="34"><a href="JavaScript:onClick=window.close()">关闭窗口</a></td>
</tr>
</table>
<br/><br/><br/>
<!-- #include file="includes/footer.asp" -->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -