Hi everyone, I’m getting the following error uploading a file with asp. I’m using the code I downloaded from uploadasp.zip. I don’t know who wrote it so I can’t give credit.
I've checked my local dev box here and I do infact have the correct directory permissions as far as I can tell.
Mike
Microsoft VBScript runtime error '800a0005'
Invalid procedure call or argument
/administration/DBupload/upload.asp, line 136
The code:
Public Sub SaveToDisk(sPath)
Dim oFS, oFile
Dim nIndex
If sPath = "" Or FileName = "" Then Exit Sub
If Mid(sPath, Len(sPath)) <> "\" Then sPath = sPath & "\"
Set oFS = Server.CreateObject("Scripting.FileSystemObject")
If Not oFS.FolderExists(sPath) Then Exit Sub
Set oFile = oFS.CreateTextFile(sPath & FileName, True)
For nIndex = 1 to LenB(FileData)
oFile.Write Chr(AscB(MidB(FileData,nIndex,1))) <-- Line 136
Next
oFile.Close
End Sub