Microsoft VBScript runtime 错误 '800a01f4' 发布不了新闻，这是哪里错了？高手来指点一下。

我今天想在首页后台发布新闻，结果发现错误，无法发帖子了。
一个是
Microsoft VBScript runtime 错误 '800a01f4'

Variable is undefined: 'getsitepathbytitle'

D:\PHP_DIAOYU\HTDOCS\\ADMIN\../Inc/function.asp，行 194
194行里面的代码是：

    tpl.content = replace(tpl.content,"{tag:sitepath}",getsitepathbytitle("首页"))
一个是
Microsoft VBScript runtime 错误 '800a01f4'

Variable is undefined: 'DataList'

/admin/Admin_Content.Asp，行 140

140行的代码是：Set Rs = NEW DataList
还有一个
Microsoft VBScript runtime 错误 '800a01f4'
Variable is undefined: 'Cls_Plus'

/admin/Index.Asp，行 166
166行的代码是          Set Plus = New Cls_Plus