3.1-新聞自動(dòng)套用欄目設(shè)定模板的修改方法

2024-08-30 19:06:11

字體：大中小

供稿：網(wǎng)友

本文討論區(qū)：http://bbs.foosun.net/dispbbs.asp?boardID=6&ID=14654&page=1

說明:

新聞生成時(shí)不用新聞中設(shè)置的模板文件,而是按新聞所在的欄目屬性中設(shè)置的新聞模板生成.這樣有個(gè)好外,你把新聞移動(dòng)或復(fù)制到其它欄目后,要生成新聞時(shí)不用更改新聞屬性中的模板,程序會(huì)自動(dòng)套用新欄目中屬性中設(shè)置的新聞模板進(jìn)行生成.

修改方法:

打開/foosun/admin/refresh/function.asp文件,
1、找到下面代碼:
if Not IsNull(NewsRecordSetObj("NewsTemplet")) then
TempletFileName = Server.MapPath(TempSysRootDir & NewsRecordSetObj("NewsTemplet"))
else
TempletFileName = ""
end if
替換成TempletFileName =Server.MapPath(TempSysRootDir & RsClassObj("NewsTemp"))
2、在1中找到的代碼前7行左右找到
Set RsClassObj = Conn.Execute("Select DoMain,ClassEName,SaveFilePath from FS_NewsClass where ClassID='" & NewsRecordSetObj("ClassID") & "'")
替換成
Set RsClassObj = Conn.Execute("Select DoMain,ClassEName,SaveFilePath,NewsTemp from FS_NewsClass where ClassID='" & NewsRecordSetObj("ClassID") & "'")
3、保存后進(jìn)行測試，測試方法:你把一條新聞復(fù)制到新聞模板設(shè)置不同的欄目中，然后生成一下新聞，和原來的比較，是不是發(fā)現(xiàn)和原來的新聞不同了？這就是他自動(dòng)使用了新欄目指定的模板。