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

googss 2009-07-23 10:57:11
Microsoft VBScript 运行时错误 错误 '800a004c'

路径未找到

/fun/fso.asp,行 123



'***********************************************
'函数名:MoveFileAs
'作 用:把原始文件移动到指定文件包并重命名
'参 数:FileUrl:原始文件路径/文件名,为网站下的相对路径
' FileUrlTo:目标文件路径/文件名,为网站下的相对路径
'返回值:MoveFileAs (0表示源文件不存在而移动失败,1表示移动成功)
'***********************************************
function MoveFileAs(FileUrl,FileUrlTo)
FiLePaTh = FileUrl

if instr(FileUrl,":/")=0 and instr(FileUrl,":\")=0 then FiLePaTh = Server.MapPath(trim(FileUrl))
FiLePaThTo =FileUrlTo
if instr(FileUrlTo,":/")=0 and instr(FileUrlTo,":\")=0 then FiLePaThTo = Server.MapPath(trim(FileUrlTo))

Set fso = CreateObject("Scripting.FileSystemObject")
MoveFileAs=0
If Fso.FileExists(FiLePaTh) = True Then
Set f2 = fso.GetFile(FiLePaTh)
f2.Move (FiLePaThTo) -----------------------------------------123 行
MoveFileAs=1
end if
set f2=nothing
set fso=nothing
End function
%>


------------------------


代码是别人给的。 应该是正确完整的。 到我服务器上就不可以用 。

我估计是 缺少了 什么插件。 或者 没有 写入权限 之类的。

那位大哥, 可以给与解答啊。

谢谢了
...全文
715 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
googss 2009-07-23
  • 打赏
  • 举报
回复
解决了。 上传文件 里 路径设置错误了。
黑心 2009-07-23
  • 打赏
  • 举报
回复
调用函数时
FileUrl,FileUrlTo的值(路径)有问题。请查证。
超维电脑科技 2009-07-23
  • 打赏
  • 举报
回复
VB 不懂
顶起等高手
googss 2009-07-23
  • 打赏
  • 举报
回复
启用 父路径了 。
oywkkai 2009-07-23
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 wlwqw 的回复:]
你传递的参数的值到底对不对,也就是FileUrlTo 的值,应该不是少什么插件,还是传递的值有问题,找不到你要移动的文件
[/Quote]
应该是的 你IIS里面启用父路径没
浪尖赏花 2009-07-23
  • 打赏
  • 举报
回复
800A004C:路径未找到
小逗狗 2009-07-23
  • 打赏
  • 举报
回复
你传递的参数的值到底对不对,也就是FileUrlTo 的值,应该不是少什么插件,还是传递的值有问题,找不到你要移动的文件

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧