我用以下代码进行图片上传：
                 （1）Function upImages(imagespath)
           （2）Set objStream = Server.CreateObject("ADODB.Stream")
          （3）objStream.Type = 1  
           （4）objStream.Open 
          （5）objStream.LoadFromFile(imagespath)
    （6）objStream.SaveToFile Server.MapPath(GetFileName(imagespath)),2
        objStream.Close
        If ERR.number<>0 Then
            upImages=0
        Else
            upImages = 1
        End If
    End Function
 运行后显示：ADODB.Stream 错误 '800a0bba' 文件无法被打开。 
            /function.asp，行 （5）
注：我已设置了此图片everyone都可以读取和运行。在我自己的机子上可以上传。拿到虚拟机上就出现了上面的错。