- 中国开源CMS第一品牌 [贴图] 自由JS 发布和调用出错了！

33445210 - 2005-12-1 14:49:00

[upload=gif]UploadFile/2005-12/200512114475020858.gif[/upload]

哪里的问题！高手指教！

是不是空间的问题呀！

我在本机测试正常！

还有在网上不能修改！修张出错！如下：

Microsoft VBScript 运行时错误错误 '800a0046'

没有权限

/Foosun/Admin/Inc/Cls_JS.asp，行983

这是不是空间的的权限不名够呢！

[此贴子已经被作者于2005-12-1 16:25:30编辑过]

33445210 - 2005-12-1 16:28:00

晕！贴子移到这没人理！

海水 - 2005-12-1 16:37:00

以下是引用33445210在2005-12-1 16:28:00的发言：
晕！贴子移到这没人理！

主要是都不会啊！

ASP老出现这样的错误啊。。。

[em06]

sooden - 2005-12-1 16:40:00

写文件的时候出错?对照配置文件,看看你的FREEJS的文件夹是否正确!

[此贴子已经被作者于2005-12-1 16:41:45编辑过]

shmily417 - 2005-12-1 16:44:00

你用的什么版本啊

行983是什么内容啊

33445210 - 2005-12-1 16:45:00

好像是！我在调用时！也不行！！

snang - 2005-12-1 16:50:00

应该是空间的问题吧

33445210 - 2005-12-1 16:55:00

if CreateFileTF = True then
Set MyFile=Server.CreateObject(G_FS_FSO)
If MyFile.FileExists(Server.MapPath(TempSysRootDir&"\JS\FreeJs")&"\"& EName &".js") then
MyFile.DeleteFile(Server.MapPath(TempSysRootDir&"\JS\FreeJs")&"\"& EName &".js")
End if
Set CrHNJS=MyFile.CreateTextFile(Server.MapPath(TempSysRootDir&"\JS\FreeJs")&"\"& EName &".js")
CrHNJS.write JSCodeStr
Set MyFile=nothing
ClsJSObj.Close
Set ClsJSObj = Nothing
else
PCssI = JSCodeStr
end if
Else
PCssI = "生成JS文件时未找到参数"
End If
End Function

蓝色部分是 983行！

我用的是 3.1.0930 　版！

sooden - 2005-12-1 17:03:00

更新JS的时候报错..你的文件夹都检查好了吗?

33445210 - 2005-12-1 17:10:00

以下是引用sooden在2005-12-1 17:03:00的发言：
更新JS的时候报错..你的文件夹都检查好了吗?

文件夹没问题！你的意思是少了文件对吧！

tsyh - 2005-12-1 17:42:00

我在发布目录和新闻时也出现要这样的提示，原来用3.1.0930时倒没有这样的问题，都是一样的空间啊，不明白是什么原因。

33445210 - 2005-12-1 19:06:00

没有来看看么！解决一下啦！急呀！

hotla - 2005-12-1 20:21:00

由于没有写入权限,所以生成js文件时出错.

解决方法:

打开目录的读写权限

http://www.94bang.com/html/help/install/144620159.htm

sooden - 2005-12-1 21:14:00

以下是引用33445210在2005-12-1 17:10:00的发言：

文件夹没问题！你的意思是少了文件对吧！

对,检查见你的JS文件夹!
我也遇到过相似的错误,原因是我改动过系统配置,而没有建立相应的文件夹!

活动评审组：加3分魅力值，请查收。

(原始值:魅力10分)

风讯官方论坛