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

首頁 > 網(wǎng)站 > WEB開發(fā) > 正文

虛擬空間ASP程序添加百度編輯器ueditor,支持批量上傳圖片

2024-04-27 15:18:22
字體:
供稿:網(wǎng)友
asp程序內(nèi)容詳情需要批量上傳圖片,自帶的編輯器不支持批量上傳圖片,下載了百度的UEDITOR,示例效果非常完美,支持批量上傳圖片.在整合過程中,圖片上傳遇到了問題,記錄解決過程1.下載最新開發(fā)版UEDITOR,1.4.3.3 ASP gbk版本 http://ueditor.baidu.com/build/build_down.php?n=ueditor&v=1_4_3_3-gbk-asp2.解壓上傳至網(wǎng)站目錄ueditor3.修改ueditor/asp 目錄下的config.json文件,修改成適應(yīng)自己網(wǎng)站的路徑   "imageUrlPRefix": "/ueditor/asp/", /* 圖片訪問路徑前綴 */      "imagePathFormat": "upload/image/{yyyy}{mm}{dd}/{time}{rand:6}", /* 上傳保存路徑,可以自定義保存路徑和文件名格式 */4.修改ueditor/asp 目錄下的 MultiformProcessor.class.asp找到public Function Process()在語句 formBytes = Request.BinaryRead( Request.TotalBytes )后面加上if Lenb(formBytes) <= 0  thenresponse.endend if 5.修改ueditor/asp 目錄下的 Uploader.Class.aspPrivate Function CheckOrCreatePath( ByVal path )        Set fs = Server.CreateObject("Scripting.FileSystemObject")       Dim parts        parts = Split( path, "/" )        path = ""        For Each part in parts            path = path + part + "/"                                   If fs.FolderExists( path ) = False Then               fs.CreateFolder( path )           End If               Next    End Function替換成Private Function CheckOrCreatePath( ByVal path )        Set fs = Server.CreateObject("Scripting.FileSystemObject")               If fs.FolderExists( path ) = False Then               fs.CreateFolder( path )          End If       End Function

運(yùn)行示例  正常批量上傳圖片 


發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 杨浦区| 武邑县| 兴海县| 镇坪县| 会同县| 始兴县| 长武县| 花莲县| 高邑县| 延长县| 韶山市| 石棉县| 宣化县| 铜陵市| 手机| 崇义县| 永安市| 江西省| 菏泽市| 琼海市| 定西市| 乌鲁木齐市| 奉新县| 扎鲁特旗| 攀枝花市| 绥滨县| 黄冈市| 土默特左旗| 永仁县| 常宁市| 原阳县| 皮山县| 盘山县| 肃南| 同仁县| 长阳| 龙州县| 寻乌县| 墨江| 噶尔县| 阿克苏市|