版本：FooSunV4.0 sp5
说明：此功能需修改数据库，FS_NS_News　表新增　IsClassTemplet　字段　默认值1。

\Admin\News\News_add.asp　212　行处

<input name="Submit5" type="button" id="selNewsTemplet" value="选择模板"  >　
    <span class="tx">默认启用：</span>
    <select name="IsClassTemplet" id="IsClassTemplet">
                  <option value="1" selected>栏目新闻模板</option>
                  <option value="0">新闻设定模板</option>
                </select> </td>

\Admin\News\News_edit.asp　313行处
<input name="Submit5" type="button" id="selNewsTemplet" value="选择模板"  >
  <span class="tx">默认启用：</span>
    <select name="IsClassTemplet" id="IsClassTemplet">
                  <option value="1" <%if str_IsClassTemplet=1 then response.Write("selected") %>>栏目新闻模板</option>
                  <option value="0" <%if str_IsClassTemplet=0 then response.Write("selected") %>>新闻设定模板</option>
                </select> </td>


\Admin\News\News_Save.asp 　33行处
Dim str_NewsProperty_Rec_1,str_NewsProperty_mar_1,str_NewsProperty_rev_1,str_NewsProperty_constr_1,str_NewsProperty_tt_1 ,str_NewsProperty_hots_1,str_NewsProperty_jc_1,str_NewsProperty_unr_1,str_NewsProperty_ann_1,str_NewsProperty_filt_1,str_NewsProperty_Remote_1,IsAdPic,AdPicWH,AdPicLink,AdPicAdress,DefaultFileExtName,str_IsClassTemplet

90行左右
str_Templet =  Request.Form("Templet")
str_IsClassTemplet =  Request.Form("IsClassTemplet")

440行左右
obj_Save_Rs("Templet") = str_Templet
  obj_Save_Rs("IsClassTemplet") = str_IsClassTemplet

\Admin\PublicSite\Public_Function.asp　20行左右
Select Case f_Sys_ID
  Case "NS"
  If f_Refresh_Type = "news" then
    Get_Search_Sql_Head = "Select Top 1 0 as RefreshFileSaveType,'NS_news' as PageType,A.ID as OnlyID,A.isPop as RefreshisPop,A.NewsID as RefreshID,A.Templet as RefreshTemplet,A.IsClassTemplet as IsClassTempletTF,B.NewsTemplet as RefreshTempletB,A.SaveNewsPath as

83行左右
if Not f_RS.Eof then
  If IsCookies Then
  Response.Cookies("COOKIES_REFRESH_FirstID") = f_RS("OnlyID")
  End If
  if f_RS("PageType")="NS_news" and f_RS("IsClassTempletTF") =1 then
  f_Templet = f_SYS_ROOT_DIR & f_RS("RefreshTempletB")
  else
  f_Templet = f_SYS_ROOT_DIR & f_RS("RefreshTemplet")
end if

支持``

学习