以下代码用于通过上传表单保存图像。 过去,它一直运行良好,直到最近移动了服务器。
sValue = UploadRequest.Item("files").Item("Value")
sFullFilePath = sDestinationPath & sFileName
'Create FileSytemObject Component
Set oFSO = Server.CreateObject("Scripting.FileSystemObject")
'Create and Write to a File
sPathEnd = Len(Server.mappath(Request.ServerVariables("PATH_INFO")))-14
Set oFile = oFSO.CreateTextFile(sFullFilePath, 8)
For i = 1 to LenB(sValue)
oFile.Write chr(AscB(MidB(sValue,i,1))) ' THIS IS THE ERROR LINE
Next
oFile.Close
Set oFile = Nothing
Set oFSO = Nothing
我遇到的错误是:Invalid procedure call or argument
我见过Invalid procedure call or argument in vbscript,但这似乎无法解决问题。
添加:如前所述,我看到了相关的问题,但是那里的解决方案不起作用!
有什么想法吗?