我是在服务端写了一段代码做文件copyfile的功能,该程序我用本机做服务器测试是OK的,因为我租了一台虚拟主机,将程序放上去后就总是报错:错误类型为70
代码如下
<%
dim fs, folder, file, item,File2,FSO,filename,whichfile1,f2,savepath,path1
set fs = CreateObject( "Scripting.FileSystemObject ")
sourccFile= "E:\FISH\Doctor\Debug\DATA\PHOTOS\USERS\aaaaaaaaa.jpg "
savepath=Server.MapPath( "upload\users\ ")
On Error Resume Next
fs.CopyFile sourccFile,savepath
If Err.Number <> 0 then
Select Case Err.Number
Case 53
Response.Write( "找不到源文件 ")
Case 58
Response.Write( "目标文件已存在的处理 ")
Case 70 //权限被否定
Response.Write( "权限被否定的处理 ")
Case Else
Response.Write(Err.Number)
End Select
End If
%>
------解决方案--------------------
看上去好象是这句出了问题:
sourccFile= "E:\FISH\Doctor\Debug\DATA\PHOTOS\USERS\aaaaaaaaa.jpg "
服务器上有这个路径吗?
建议还是用相对路径结合Server.MapPath实现
------解决方案--------------------
晕倒,可是你不可能通过copyfile把你客户端的文件copy到服务器上啊!!!
copyfile是指把服务器端的文件复制到服务器端,两个地址必须都是服务器端的地址
和客户端没有联系的,asp脚本完全在服务器端运行,这个不关客户端任何事
你想想,那要是这样,我难道还可以通过FSO.deletefile把客户端任何地方文件删除了?太可怕了!
如果你要上传文件,与FSO无关,用表单把文件提交,然后用无惧上传类或者Adodb.Stream处理