提示{PageListStr}

ReplaceAllLabel=Content
   '替换自定义函数标签
   'Dim DCls:Set Dcls=New DIYCls
   'ReplaceAllLabel=DCls.ReplaceUserFunctionLabel(Content)
   'Set DCls=nothing
  End Function

将上面红色字前面的单引号去掉即可

去掉以后生成的时候出现一下错误提示。。。。。

Microsoft VBScript ?А??? ?? '800a000d'

??????: '[string: ""]'

E:\?????\????081218\66\ADMIN\INCLUDE\../../KS_Cls/Kesion.Label.CommonCls.asp??А 654

请问如何解决？谢谢高手赐教、。

附上我的SQL

Ajax调用:否

标签类型：终极分页

（再次修改提示：Microsoft VBScript ?А??? ?? '800a000d'

??????: 'PageStyle'

E:\?????\????081218\66\ADMIN\INCLUDE\../../KS_Cls/Kesion.PublicCls.asp??А 1882

）

查询语句 select id,title,adddate from KS_Article where tid in({$CurrClassChildID}) and verific=1 order by id desc

循环体：[loop=10]
<dd><p>{$Field(Adddate,Date,YYYY-MM-DD)}</p><span><a href="{$Field(ID,GetInfoUrl,1,1)}">{$Field(Title,Text,50,...,0,)}</a></span></dd>
[/loop]

谢谢 请大家指教

我等不及了。我的网站现在改版。和同学 朋友们说好了 平安夜出现的。。。。。。

结果还是没有解决

正式版本很快就要发布了.再等等吧