dreamweaver上传文件功能

<script language="vb" runat="server">
Sub Smt1Click(sender as object, e as eventArgs)
  dim srcFile as string
  if Filedomain.PostedFile.ContentLength > 0 then              '检查是否有选择后需要上传的文件
    srcFile = Filedomain.PostedFile.FileName                   '若有则先将路径文件名存为变量
srcFile = Mid(srcFile, srcFile.LastIndexOf("\") + 1)  '取得文件名
   Filedomain.PostedFile.SaveAs("D:\Default Web\website03\upload\" & srcFile)       '储存上传文件到服务器指定的目录
div1.Visible=true                                     '显现显示元件
    div1.innerText="文件上传成功！"                       '显示文件上传成功
  else
    div1.Visible=false                                    '若无文件则隐藏显示组件
  end if
End Sub
</script>
功能：如上。这是我学的书上的一段代码，我做的很顺利，但我很奇怪，我将我的网页复制到我同学的电脑上
运行后会出现参数“start”必须大于0，将srcFile = Mid(srcFile, srcFile.LastIndexOf("\") + 1)  '取得文件名删除后反而就可以正常实现上传文件功能，可是如果在我的电脑上如果删除srcFile = Mid(srcFile, srcFile.LastIndexOf("\") + 1)  '取得文件名就会出现“不支持给定路径的格式”。
这是为什么？