Z-BLOG博客自界说标签的另一种要领

  熟悉CMS的伴侣应该知道,许多CMS都支持自界说标签、好比SDCMS DEDE 等等。而对付ZBLOG来说、插件较量少。假如不会措施的伴侣。大概很难实现这个成果!本日就分享操作链接打点成果做自界说标签的小成果。

  首先我们来看看靠山的“链接打点”中已经实现自界说标签,然后我们在亲自动手实现这个成果,这个成果主要的运用,我相信只要会CMS、知道自定标签的伴侣城市知道。

Z-BLOG博客自定义标签的另一种方式

以新增“公司先容”自定标签为例:

  详细操纵要领为:修改2个文件,一个是admin目次中的”edit_link.asp“,另一个是function目次中的”c_system_event.asp“。

1)用记事本或DW打开”admin/edit_link.asp“文件,找到下面这行代码:

<li><a href="#fragment-4"><span><%=ZC_MSG039%></span></a></li>

  在其下面添加如下代码:

<li><a href="#fragment-5"><span>公司先容</span></a></li>

  留意:这里的"#fragment-5"必然要是独一的,且要跟下面的"#fragment-5"保持一致

  然后再找到下面这段代码:

tpath="./INCLUDE/misc.asp"
Response.Write "<p>" & ZC_MSG170 & ": </p><p><INPUT TYPE=""text"" Value="""&unEscape(tpath)&""" style=""width:100%"" readonly></p>"
Response.Write "<p></p>"
Response.Write "<p><textarea class=""resizable"" style=""height:300px;width:100%"" name=""txaContent_Misc"" id=""txaContent_Misc"">"&TransferHTML(LoadFromFile(BlogPath & unEscape(tpath),"utf-8"),"[textarea]")&"</textarea></p>" & vbCrlf
Response.Write "</div>"

  在这段代码后头增加如下代码:

Response.Write "<div class=""tabs-div"" id=""fragment-5"">"
tpath="./INCLUDE/gongsijieshao.asp"'本身添加的通告
Response.Write "<p>" & ZC_MSG170 & ": </p><p><INPUT TYPE=""text"" Value="""&unEscape(tpath)&""" style=""width:100%"" readonly></p>"
Response.Write "<p></p>"
Response.Write "<p><textarea class=""resizable"" style=""height:300px;width:100%"" name=""txaContent_Gongsijieshao"" id=""txaContent_Gongsijieshao"">"&TransferHTML(LoadFromFile(BlogPath & unEscape(tpath),"utf-8"),"[textarea]")&"</textarea></p>" & vbCrlf
Response.Write "</div>"

  留意:这里的 id=""fragment-5""跟上面的对应。最后生存封锁该文件。

2)打开”function/c_system_event.asp“文件,找到下面这段代码:

tpath="./INCLUDE/misc.asp"
txaContent=Request.Form("txaContent_Misc")
If IsEmpty(txaContent) Then txaContent=Null
If Not IsNull(tpath) Then
If Not IsNull(txaContent) Then
Call SaveToFile(BlogPath & tpath,txaContent,"utf-8",False)
End If
End If

  在其后头增加下面这段代码:

tpath="./INCLUDE/gongsijieshao.asp"这一段是为了添加通告本身增加的
txaContent=Request.Form("txaContent_Gongsijieshao")
If IsEmpty(txaContent) Then txaContent=Null
If Not IsNull(tpath) Then
If Not IsNull(txaContent) Then
Call SaveToFile(BlogPath & tpath,txaContent,"utf-8",False)
End If
End If

  添加完后生存并封锁文件,修改部门就完成了,接下来就是挪用,挪用很简朴,只需在模板中确定本身想要安插挪用便笺的位置,将相应标签放进去即可。

  最后在页面中挪用标签为:

<#CACHE_INCLUDE_GONGSIJIESHAO#>

  重点:需要说明一下,这里用的文件名是gongsijieshao.asp,所以在措施和挪用标签顶用到的都是这个名字,如需其他名字,请按照本身需求调解相应标签。

Z-Blog 下载:

Z-Blog v2.2 Prism Build140101下载

Z-BLOG博客自定义标签的另一种方式

内容版权声明:除非注明,否则皆为本站原创文章。

转载注明出处:http://www.heiqu.com/10074.html