在执行HOOk的时候报错
失败的原因是类型不匹配：IdentifyArray
怀疑是IdentifyArray = Split(NameToAnylize, "_")
这句有问题
应该在前一句后面加入了
msgbox
到前一句执行还没有问题
在执行到这一句的时候报 类型不匹配
不太明白为什么报错

IdentifyArray这句得到的是应该是3个元素的数组
到底错在哪呢

代码我是经过测试的，请仔细检查自己的代码，看是否有遗漏或某个步骤操作错误。

最近有不少人问到字段模板的应用问题，自己仔细看了一下，发现代码写的是不完善，
下面做了改进（红色部分标出），两种方式应该都是可以的，主要是模板记录的查询：
' Query the templates
sqlStatement = "select T1.template_name,T1.template from template T1 where T1.dbid <> 0"
Set ResultSet = SessionObj.BuildSQLQuery(sqlStatement)
ResultSet.Execute

或

Dim QueryDef
Set QueryDef = session.BuildQuery("tempate")
QueryDef.BuildField("template_name")
QueryDef.BuildField("template")
Set ResultSet= session.BuildResultSet(QueryDef)
ResultSet.Execute

[ 本帖最后由 yunshan 于 2008-1-30 12:59 编辑 ]