使用firebug网页调式工具可以看到具体的报错信息:
/admin/ueditor/asp/Uploader.class.asp,行 256
该图就是Uploader.class.asp文件中的256行,打印path变量得到的路径是D:,这很明显是有问题的,我司虚拟主机对用户的写入权限只针对站点家目录,这时得针对该文件修改这段代码,以下是正确的做法,建议直接复制这一段代码替换当前报错的代码,这段代码的意思是使用自己的站点家目录做存放图片的路径。
ps:最后说句题外话,本地你想要什么权限都可以自己加,但是我司服务器不可能让你像本地一样随意设置,有时不是做不到而是不能这样做,程序放在不同环境下适当的调整一下代码很有必要:
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
修改后测试上传图片功能已恢复正常。