动易ASP 后台编辑器,无法编辑(模拟器上不能使用,兼容模式不能编辑,IE版本下也不能编辑的情况。)
下载这个版本的文件,然后把文件名称改成ueditor ,通过FTP上传到服务器的根目录下,
查找动易6.8版本编辑器的文件
进入后台,把鼠标移到添加文件,查看页脚提示的路径地址,
路径地址: 根目录/admin/Admin_Article.asp
打开文件找到:
这里路劲地址: 用查找找到这句话“系统会因所下载图片的大小而影响速度,建议图片较多时不要使用此功能。”注意有两处,
主要替换的文件是:
Response.Write " <textarea name='Content' style='display:none'>" & XmlText("Article", "DefaultAddTemplate", "") & "</textarea>"
Response.Write " <iframe ID='editor' src='../editor.asp?ChannelID=" & ChannelID & "&ShowType=0&tContentid=Content' frameborder='1' scrolling='no' width='600' height='600' ></iframe>"
替换为
<textarea name="content" id="container" style="width: 800px;height: 600px"></textarea>
<script type="text/javascript" charset="gbk" src="/ueditor/ueditor.config.js"></script>
<script type="text/javascript" charset="gbk" src="/ueditor/ueditor.all.js"></script>
<script type="text/javascript" charset="gbk" src="/ueditor/lang/zh-cn/zh-cn.js"></script>
<script type="text/javascript">
var editor = new UE.ui.Editor();
editor.render("container");
UE.getEditor('container');
</script>
注意下文件的路径,替换好之后,刷新网站的编辑器就会变成百度编辑器:
第一次安装的时候提示
修改方式:
找到后台用户的文件: Admin_Article.asp
改成:
var CurrentMode=editor.CurrentMode;" & vbCrLf
改成:
var CurrentMode=0;" & vbCrLf
上传图片提示
修改方式:找到编辑器的文件
编辑器打开这个文件:修改最底下文件
Private 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
End Class
改成:
Private Function CheckOrCreatePath( ByVal path )
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Dim parts
Dim root : root = Server.mappath("/") & "\"
parts = Split( Replace(path, root, ""), "\" )
path = root
For Each part in parts
path = path + part + "\"
If fs.FolderExists( path ) = False Then
fs.CreateFolder( path )
End If
Next
End Function
End Class