ADODB.Stream error '800a0bbc' Write to file failed

Question

I've weird and strange error showing while I change hosting provider which is:

ADODB.Stream error '800a0bbc'

Write to file failed.

/cp/portal_upload.asp, line 63

I gave the needed permissions and it solve the update Access DB problem but file uploading still not fixed.

this is the code, thanks in advance:

Public Sub Save(path)
    Dim streamFile, fileItem

    if Right(path, 1) <> "\" then path = path & "\"

    if not uploadedYet then Upload

    For Each fileItem In UploadedFiles.Items
        Set streamFile = Server.CreateObject("ADODB.Stream")
        streamFile.Type = 1
        streamFile.Open
        StreamRequest.Position=fileItem.Start
        StreamRequest.CopyTo streamFile, fileItem.Length
        streamFile.SaveToFile path & fileItem.FileName, 2  'This is line 63
        streamFile.close
        Set streamFile = Nothing
        fileItem.Path = path & fileItem.FileName
     Next
End Sub

Answer 1

Firstly check is path & fileItem a valid address? If the folders are not created, create it. Also, recheck your permissions. Have you given IUSR the permission of "Full Control"? Check those.