(3)
把
NewsFileNames = NewsFileName(RsNewsConfigObj("NewsFileName"),IClassID,INewsID)
替換成
'===========================================
'增加指定文件功能 doudou888
if Request("FileName")="" OR IsNull(Request("FileName")) then
NewsFileNames = NewsFileName(RsNewsConfigObj("NewsFileName"),IClassID,INewsID)
else
IFileName = Replace(Replace(Request("FileName"),"""",""),"'","")
NewsFileNames=IFileNames
end if
'===========================================