目录

TMeta 与 TConfig

TMeta类和TConfig类,是Z-Blog 2.0的两个新特性。TMeta类允许插件为每一篇文章、评论、用户、分类、Tag保存附加信息,TConfig类允许插件把配置写入数据库。

TMeta

说明

TMeta类允许插件为每一篇文章、评论、用户、分类、Tag保存附加信息,它单独保存在数据表的xxxx_Meta字段中

方法

方法 参数 返回 作用
SetValue name(String),value(String) 设置某个值
GetValue name(String) value(String) 返回某个值
Remove name(String) 删除某个值
Exists name(String) Boolean 查找某个参数是否存在

示例

<%
Dim a,x
Set a=New TArticle
a.LoadInfoById 1
x=a.Meta.GetValue("test")
Set a=Nothing
%>

文章,评论等类的Meta对象不需要声明Set Meta=New TMeta,它随着TArticle等类的加载而初始化,数据随着LoadInfoById(Array)而读取,随着Post而写入,对于使用者来说是透明的.这里的TMeta提交表单中的命名应该是如下格式:<input type=“text” name=“meta_xxoo” />否则无法随post保存。

TConfig

说明

TConfig类允许插件把配置写入数据库,它单独保存在blog_Config表中

方法 参数 返回 作用
Load configname(String) 读取configname的配置项目
Save value(String) 保存配置项目
Delete 删除configname的全部配置
Remove name(String) 删除某个值
Exists name(String) Boolean 查找某个参数是否存在
Write name(String),value(String) 设置某个值
Read name(String) value(String) 读取某个配置项

示例

读取

<%
Dim c,x
Set c=New TConfig
c.Load ("PluginID")
x=c.Read("str") '读取选项str的值
Set c=Nothing
%>

写入

<%
Dim c
Set c=New TConfig
c.Load ("PluginID")
c.Write "str",x '设定选项str的值为x
c.Save '写入
Set c=Nothing
%>

这个类可以很好地替代原先的Load(Save)ValueForSetting再保存到文件的方式,但是使用它必须注意:

  1. 它返回的所有值都是String,在使用前请先CBool、CInt、CLng等进行强制类型转换。
  2. 调用Write后,需要调用Save,配置才写入数据库
  3. 需要把所有的配置都从Const改为Dim,并通过一个过程(如Initialize_PluginName)来读取配置