新聞里有幻燈，有焦點等等，為啥下載中就只有一個在列表前顯示60*60大小的圖片項目呢？

建議風訊加強下載模塊的功能，否則就與雞肋無異了。
由于自己用到了下載功能，要求雖然不高，但是現(xiàn)有的系統(tǒng)當然滿足不了，比起重新弄一套下載系統(tǒng)再整合到FOOSUN來，按需求加些功能顯得更簡單些，廢話少說，下面動手！

功能：調(diào)用圖片與[名稱]，最新、推薦、最熱三選一
1、可自由設(shè)定圖片大小
2、選擇是否顯示標題
3、默認為公用標簽，亦可指定
4、最新、推薦、最熱 三合一 可選
其它自己看吧

需要的不要嫌煩，照做（以后版本中如還未增強，我會繼續(xù)更新我的所改內(nèi)容）

修改(所有提到的位置，用查找功能在文件里找)：
一、Foosun/Editer/LableEditer.asp
a. 在<img onClick="InsertScript('HotDownList');"下面一行加

<td width="1"> <div align="center" class="ToolSeparator"></div></td>
<td width="30"><div align="center"><a href=# onClick="InsertScript('Downpic_Kimli');">下載圖片</a></div></td>
b. 在

case 'HotDownList':
var ReturnValue=OpenWindow('../FunPages/Frame.asp?FileName=LableHotDownList.asp&PageTitle=熱點下載標簽屬性',336,200,window);
break;
下面加：

case 'Downpic_Kimli':
var ReturnValue=OpenWindow('../FunPages/Frame.asp?FileName=LableDownpic_Kimli.asp&PageTitle=下載圖片標簽屬性',336,200,window);
break;
二、Foosun/Admin/Refresh/SelectFunction.asp文件中
在 Case "hotdownlist" ... 下面加一個 Case :


'Kimli添加下載圖片調(diào)用
Case "downpic_kimli"
If UBound(ParaArray) = 12 then
GetLableContent = Downpic_Kimli(ParaArray(1),ParaArray(2),ParaArray(3),ParaArray(4),ParaArray(5),ParaArray(6),ParaArray(7),ParaArray(8),ParaArray(9),ParaArray(10),ParaArray(11),ParaArray(12))
Else
GetLableContent = ""
Exit Function
End If
三、Foosun/Admin/Refresh/RefreshFunction.asp文件中
我使用的是3.1存儲過程版，不是存儲過程版的請將：

“Set TempRsHotDownListObj = Conn.Execute("FS_ReFunSoonClass '" & ClassListStr & "'")”
改為“Set TempRsHotDownListObj = Conn.Execute("Select * from fs_newsclass where classename='" & ClassListStr & "'")”


'Kimli 添加下載圖片調(diào)用{%=DownPic_Kimli(類別，類型，幾條，幾列，分隔圖片，行高，寬，高，標題字數(shù)，標題樣式，是否新窗口，是否顯示標題)%}
Function Downpic_Kimli(ClassListStr,SelectTypeStr,NewNumberStr,RowNumberStr,CompatPicStr,RowHeightStr,PicWidth,PicHeight,TitleNumberStr,CSSStyle,OpenTypeStr,Showtitlestr)

查看更多 風訊cms教程  風訊cms模板