当前位置:首页 > 编程学习 > 给Z-Blog2.0 新建自动设置文章别名的插件

给Z-Blog2.0 新建自动设置文章别名的插件

编程学习2013-01-0460460

Z-blog1.8有个自动文章别名的插件比较好使,升级到2.0后没有这个插件了。1.8的放进去也不能用,每次都要手动设置一个也挺费事。索性参考1.8的自动文章别名插件试着写了个2.0的。

通过写这个插件也了解了Z-blog 2.0新建插件过程。


具体步骤如下:

1、进入应用中心,选择右上角的新建插件,输入插件信息。这个做了简单些的,设置插件ID为AutoAlias。


2、打开插件目录下的include.asp文件,修改Function ActivePlugin_AutoAlias

'挂口部分
Function ActivePlugin_AutoAlias()
                                                                      
    '插件最主要在这里挂接口。
    'Z-Blog可挂的接口有三类:Action、Filter、Response
    '建议参考Z-Wiki进行开发
    
    AutoAlias_GetAlias
                                                                          
End Function


3、写AutoAlias_GetAlias

'根据时间生成别名
Function AutoAlias_GetAlias()
    Dim alias, NowTime  
    NowTime=gettime(Now())
    alias=year(NowTime) & formatStr(Month(NowTime),2) &  formatStr(day(NowTime),2) &  formatStr(hour(NowTime),2) & formatStr( Minute(NowTime),2) & formatStr(Second(NowTime),2)
                                                       
    Call Add_Response_Plugin("Response_Plugin_Edit_Form","<div id='AutoAlias'><script language='JavaScript' type='text/javascript'>if(document.forms['edit'].edtAlias.value == ''){document.forms['edit'].edtAlias.value='" & alias & "';}</script></div>")
                                                   
End Function
                                                   
'格式化字符串
Function formatStr(str,length)
    Dim l
    l=length-len(str)
    If l > 0 Then
        formatStr=string(length-len(str),"0") & str
    Else
        formatStr=str
    End If
End Function


4、进入插件管理,启用插件。


最后效果如图所示:


 给Z-Blog2.0 新建自动设置文章别名的插件 网页制作 ASP 编程 第1张

    

扫描二维码推送至手机访问。

版权声明:本文由海阔天空发布,如需转载请注明出处。

本文链接:https://apull.net/html/20130104231949.html

分享给朋友:

相关文章

年纪偏大是否适合学习计算机

年纪偏大是否适合学习计算机

★年纪偏大是否适合学习计算机  Q:我本科不是学计算机专业。但是我对计算机的兴趣很大,想明年考北京大学计算机软件的研究生!请问像我这样快30岁的人了,才开始学习计算机是不是太晚了?  A:中国很多人相信程序员是吃青春饭的。 这主要是由中国软件水平发展的现状决定的。 1、大部分都做的是行业管理方面的软件,从计算机技术上说很快就可以进入。 2、很多公司没有管理和技术双重的提升机制,使得人们觉得做管理比做技术有前途,但是仍...

密码的故事

密码的故事

密码的故事Billy Hollis 本文是由一个问题引出的。我需要一种将密码保存在加密文件中的方法,因为我需要记住许多密码,但记忆力却已大不如前。我知道有许多商用工具能够做到这一点,但我感到学习  .NET 中的一项新技术真的很有好处。 我用 Visual Basic® .NET  完成了一个简单而完整的程序,用于加密和解密文件,从中学到了许多知识。既然加密对于多种开发都是一个重要问题,本文就介绍一下如何构造这样的程序。 有各种低级别的技术可以用于加密,...

VBScript 错误信息

VBScript 错误信息

错误代码 信息5 无效的过程调用或参数6 溢出7 内存不够9 下标越界10 数组长度固定或临时锁定11 被零除13 类型不匹配14 字符串空间溢出28 堆栈空间溢出35 Sub或Function未定义48 加载D...

HTML与ASCII码表

HTML与ASCII码表

HTML与ASCII码表Standard ASCII set, HTML Entity names, ISO 10646, ISO 8879, ISO 8859-1  Latin alphabet No. 1Browser support: All browsersASCIIHTMLHTMLDecHexSymbolNumberNameDescription32333435363738394041424344454647202122232425262728292A2B...