检查后发现错误位置在：

  Function GetLabel(Content)
   Dim LabelStyle
   LabelStyle     = KS.GetTagLoop(Content)
   LabelFunName   = Split(Content," ")(0)
      LabelParamStr  = Replace(Replace(Content, LabelFunName, ""),"}" & LabelStyle&"{/Tag}", "")
         LabelFunName   = Replace(LabelFunName,"{Tag:","")
   Execute("GetLabel= " & LabelFunName & "(LabelStyle)")
  End Function

网页中总共2个系统函数标签，如果页面中去掉{LB_INDEX幻灯}页面将会顺利读取，如果加上它就出错，如果只放这一个标签页面也将顺利读取。

也就是说，只要共用系统标签就会出错，任何一个标签单独放置都不会出错，出错位置是在文章模块栏目页面调用。