=====侧栏管理 - 模块=====
2.0版本不能使用过去在INCLUDE里创建文件的方式来实现侧栏添加数据,它有一套更为灵活的方案——侧栏管理。
以下代码可以创建一个新侧栏模块
Dim t
Set t=new Tfunction
t.Name="模块名称"
t.FileName="filename" '文件名
t.IsSystem=True 'True属于系统自带,False是自定义。建议插件在install时把该值设置为true,uninstalle时设置为false
t.SidebarID=0 '0是隐藏,1-5为设定在哪个侧栏显示,推荐设置为1
t.Order=0 '模块排序
t.Content="这里是内容,请保持内容在一行内……" '模块内容,
t.HtmlID="divNavBar" 'HTML容器ID
t.Ftype="ul" '模块类型分DIV和UL两种,分别表示文本与列表
t.post '提交新的模块
如果需要更新侧栏模块,则:
Call GetFunction
'finename为上面配置的文件名
Functions(FunctionMetas.GetValue("filename")).Content=strComments '内容字符串
Functions(FunctionMetas.GetValue("filename")).Post()
Functions(FunctionMetas.GetValue("filename")).SaveFile
在模板调用侧边栏可以使用<#template:sidebarx#>,也可以使用<#CACHE_INCLUDE_FILENAME#>单独调用某一模块,不再赘述