修正下载载栏目中,对软件名称的字数控制没有作用-风讯CMS教程
将 refreshfunction.asp 中的函数 LastDownList() 中
'LastDownList = LastDownList & \"<td \" & RowHeightStr & \">\" & GetOneDownLoadList(LastDownListObj,DownListStyleStr,ClassSaveFilePath,\"\",\"\",OpenTypeStr,NaviPicStr,CSSStyleStr) & \"</td>\" & Chr(13) & Chr(10)
修改为:
LastDownList = LastDownList & \"<td \" & RowHeightStr & \">\" & GetOneDownLoadList(LastDownListObj,DownListStyleStr,ClassSaveFilePath,\"\",\"\",OpenTypeStr,NaviPicStr,CSSStyleStr,TitleNumberStr) & \"</td>\" & Chr(13) & Chr(10)
注:与GetOneDownLoadList()有关的函数均要添加“,TitleNumberStr”,(“”内部的字符)与上述修改类似。否则会出错。
同时修改函数GetOneDownLoadList()声明为:
function GetOneDownLoadList(TitleNumberStr,AlreadyDownListObj,StyleID,ClassSaveFilePath,ClassCNName,DateRuleStr,OpenTypeStr,NaviPicStr,CSSStyleStr)
并将其中语句:
'StyleContent = Replace(StyleContent,\"{DownLoad_Name}\",NaviPicStr & ClassCNName & \"<div style=word-break:break-all;><a Class=\"\"\" & CSSStyleStr & \"\"\" href=\"\"\" & AvailableDoMain & ClassSaveFilePath & AlreadyDownListObj(\"ClassEName\") & \"/\" & AlreadyDownListObj(\"FileName\") & \".\" & AlreadyDownListObj(\"DownLoadFileExtName\") & \"\"\" \" & OpenTypeStr & \">\" & AlreadyDownListObj(\"Name\") & \"</a></div>\")
修改为
<!--这是原创者的-->
StyleContent = Replace(StyleContent,\"{DownLoad_Name}\",NaviPicStr & ClassCNName & \"<div style=word-break:break-all;><a Class=\"\"\" & CSSStyleStr & \"\"\" href=\"\"\" & AvailableDoMain & ClassSaveFilePath & AlreadyDownListObj(\"ClassEName\") & \"/\" & AlreadyDownListObj(\"FileName\") & \".\" & AlreadyDownListObj(\"DownLoadFileExtName\") & \"\"\" \" & OpenTypeStr & \">\" & GotTopic(AlreadyDownListObj(\"Name\"),TitleNumberStr) & \"</a></div>\")
<!--这是我在原创者基础上修正的-->
StyleContent = Replace(StyleContent,\"{DownLoad_Name}\",NaviPicStr & ClassCNName & \"<div style=word-break:break-all;><a Class=\"\"\" & CSSStyleStr & \"\"\" href=\"\"\" & AvailableDoMain & ClassSaveFilePath & AlreadyDownListObj(\"ClassEName\") & \"/\" & AlreadyDownListObj(\"FileName\") & \".\" & AlreadyDownListObj(\"DownLoadFileExtName\") & \"\"\" title=\"\"\"& AlreadyDownListObj(\"Name\")&\"\"\" \"& OpenTypeStr & \">\" & GotTopic(AlreadyDownListObj(\"Name\"),TitleNumberStr) & \"</a></div>\")'添加提示doudou888
评论加载中....
- 昵称: 验证:







