国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 網(wǎng)站 > 建站經(jīng)驗 > 正文

增加指定文件名功能

2024-08-30 19:06:07
字體：大 中 小
來源：轉載
供稿：網(wǎng)友
方法：在文件Admin/Info/NewsWords.asp中
(1)在
<option <% if IFileExtName = "asp" then Response.Write("Selected") %> value="asp">asp</option>
</select></td>
</tr>
后加入代碼
<tr>
<td height="30">
<div align="center"><font color="#FF0000">指定文件名</font></div></td>
<td height="30"> <% = IFileName %> =====>
<input style="width:30%;" type="text" name="FileName" value="" title="只要指定文件名前綴，千萬不要與原有的文件名重復！保留空則文件名由系統(tǒng)自動生成。" size="20"></td>
</tr>
(2)
在 INewsAddObj.open INewsAddSql,Conn,3,3
后插入
'===========================================
'增加指定文件功能 doudou888
if Request("FileName")<>"" and IsNull(Request("FileName"))=false then
IFileName = Replace(Replace(Request("FileName"),"""",""),"'","")
NewsFileNames=IFileName
INewsAddObj("FileName") = NewsFileNames '新聞文件名
end if
'===========================================

(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
'===========================================

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板： 兴仁县| 方正县| 穆棱市| 赤城县| 锦屏县| 海兴县| 灵寿县| 太康县| 通辽市| 泽普县| 泉州市| 西乌珠穆沁旗| 济阳县| 广平县| 射阳县| 多伦县| 紫阳县| 江达县| 米易县| 章丘市| 伊吾县| 大邑县| 遵化市| 鄱阳县| 墨玉县| 西平县| 高密市| 家居| 罗山县| 乡城县| 玛曲县| 个旧市| 和政县| 朝阳区| 无为县| 延寿县| 涟水县| 富宁县| 改则县| 格尔木市| 沁阳市|