当我们想在网页上显示HTML 标注时,若在网页中直接输出则会被浏览器解译为HTML 的内容,所以要透过Server 对象的HtmlEncode 方法将它编码再输出;而若要将编码后的结果译码回原本的内容,则使用HtmlDecode 方法。下列程序代码范例使用HtmlEncode 方法将「<B>HTML内容</B>」编码后输出至浏览器,再利用HtmlDecode 方法将把编码后的结果译码还原:
<Html>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim strHtmlContent As String
strHtmlContent=Server.HtmlEncode("<B>HTML 内容</B>")
Response.Write(strHtmlContent)
Response.Write("<P>")
<Html>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim strHtmlContent As String
strHtmlContent=Server.HtmlEncode("<B>HTML 内容</B>")
Response.Write(strHtmlContent)
Response.Write("<P>")
数据库中字段content储存的内容其中的段落格式,在ASP中可以借用几个函数来做处理,比如说保持原有格式,UBB格式原样输出,FCK格式(html)原样输出:
一、UBB格式原样输出
Newarticle = Newarticle & "<h1 class=""ContentTitle""><strong>"&UnCheckStr(HtmlEncode(RSn("log_Title")))&"</strong></h1>"
二、HTML格式原样输出
Newarticle = Newarticle & "<div class=""NewBody""> "&UnCheckStr(HtmlDecode(Left(RSn("log_Content"),200))) &"... "
三、普通原始输出
Newarticle = Newarticle & "<h1 class=""ContentTitle""><strong>"&RSn("log_Title")&"</strong></h1>"
一、UBB格式原样输出
Newarticle = Newarticle & "<h1 class=""ContentTitle""><strong>"&UnCheckStr(HtmlEncode(RSn("log_Title")))&"</strong></h1>"
二、HTML格式原样输出
Newarticle = Newarticle & "<div class=""NewBody""> "&UnCheckStr(HtmlDecode(Left(RSn("log_Content"),200))) &"... "
三、普通原始输出
Newarticle = Newarticle & "<h1 class=""ContentTitle""><strong>"&RSn("log_Title")&"</strong></h1>"
<%Newcate(int)%>每类中日志
<%One_art(int)%>单独日志
<%New_art()%>最新日志
<%
'one 单个日志
Sub One_art(ID)
LogID=int(ID)
Dim RSn,row,Newarticle,LogID
<%One_art(int)%>单独日志
<%New_art()%>最新日志
<%
'one 单个日志
Sub One_art(ID)
LogID=int(ID)
Dim RSn,row,Newarticle,LogID
修改install.xml中的定义:
<?xml version="1.0" encoding="UTF-8"?>
<PluginInstall>
<main>
<PluginName>BulletinBoard</PluginName>
<PluginTitle>Bulletin Board</PluginTitle>
<PluginType>sidebar</PluginType>
修改plugins.asp文件
<?xml version="1.0" encoding="UTF-8"?>
<PluginInstall>
<main>
<PluginName>BulletinBoard</PluginName>
<PluginTitle>Bulletin Board</PluginTitle>
<PluginType>sidebar</PluginType>
修改plugins.asp文件