3.1-制作强大的通用标签(2)_风讯Cms教程

GetNewsClassNameById=GetClassNameById(GetNewsClassNameById)
end if
RsClassObj.Close
Set RsClassObj = Nothing
End Function

'专题所在的类目

Function GetSpecialClassNameById(SpecialID)
Dim SqlClass,RsClassObj
if SpecialID = "" then Exit Function

'**********假如是3.1版，把下行Special改成FS_Special9 7 3 1 2 4 8 :

查看更多 风讯cms教程  风讯cms模板