上传文件的问题？急！！！！

[atao1128]

我在网上找了一段上传文件的代码，但使用的时候总是不见文件上传到指定位置，不知道为何？
我的代码：
<%OPTION EXPLICIT%>
<%Server.ScriptTimeOut=5000%>
<!--#include FILE="upload_5xsoft.inc"-->
<p>
<br>upfile<hr size=1 noshadow width=300 align=left><br><br>
<%
on error resume next
dim upload,file,formName,formPath,iCount
set upload=new upload_5xsoft ''建立上传对象
If err.number <> 0 Then
Response.Write "error:" & Err.Description
End If
response.write upload.Version&"<br><br>" ''显示上传类的版本

if upload.form("filepath")="" then ''得到上传目录
HtmEnd "请输入要上传至的目录!"
set upload=nothing
response.end
else
formPath=upload.form("filepath")
''在目录后加(/)
if right(formPath,1)<>"\" then formPath=formPath&"\"
end if

iCount=0
for each formName in upload.objForm ''列出所有form数据
response.write formName&"="&upload.form(formName)&"<br>"
next

response.write "<br>"
for each formName in upload.objFile ''列出所有上传了的文件
set file=upload.file(formName) ''生成一个文件对象
if file.FileSize>0 then ''如果 FileSize > 0 说明有文件数据
file.SaveAs "D:\PLC\CN\LinePhoto\"&file.FileName ''保存文件
response.write file.FileName
response.write file.FilePath&file.FileName&" ("&file.FileSize&") => "&formPath&File.FileName&" 成功!<br>"
iCount=iCount+1
end if
set file=nothing
next

set upload=nothing ''删除此对象
Htmend iCount&" 个文件上传结束!"

sub HtmEnd(Msg)
set upload=nothing
response.write "<br>"&Msg&" [<a href=""javascript:history.back();"">返回</a>]</body></html>"
response.end
end sub
%>
<script language="javascript">

setid();
</script>

[formatkm]

检查你硬盘的读写权限，应该是everyone都可以读和写

[szdhsoft]

不要用绝对路径，用虚拟路径

[leiaming]

不要用绝对路径，用虚拟路径

[atao1128]

这有什么不一样呢

[nik_Amis]

up

[java518]

上传的文件只能放在程序同级的目录或下面级的目录中，比如文件放在C:\Inetpub\wwwroot\，那么上传的文件可以在这个目录下，也可以写代码：

file.SaveAs "upload/"&file.FileName
保存文件到C:\Inetpub\wwwroot\upload\目录下，以此类推，可以放在下面的几级目录中。
致于放到其他盘的目录中，只能说是ASP的缺陷，不过可以把那个路径设置为IIS下的一个虚拟目录。应该也能办到。

[atao1128]

to java518(小欣）：thank you very much!