Hi All... I created an upload page... this is the page that processes the UPLOAD function... when I try to upload I'm getting a
HERE IS MY CODE:
Line 67 is
Set MyFile = ScriptObject.CreateTextFile(Left(Server.mappath(Request.ServerVariables("PATH_INFO")),pathEnd)&"../conferences/upload/"&filename)
Any help would be greatly appreciated. Thanks all in advance.
A.
Code:
Error Type:
Microsoft VBScript runtime (0x800A004C)
Path not found/admin/conferences/outputFile_testing.asp, line 67
HERE IS MY CODE:
Code:
RequestBin = Request.BinaryRead(byteCount)
Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")
BuildUploadRequest RequestBin
authUsername = UploadRequest.Item("authUsername").Item("Value")
docName = UploadRequest.Item("docName").Item("Value")
contentType = UploadRequest.Item("blob").Item("ContentType")
filepathname = UploadRequest.Item("blob").Item("FileName")
filename = Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
value = UploadRequest.Item("blob").Item("Value")
'Create FileSytemObject Component
Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject")
'Create and Write to a File
pathEnd = Len(Server.mappath(Request.ServerVariables("PATH_INFO")))-14
Set MyFile = ScriptObject.CreateTextFile(Left(Server.mappath(Request.ServerVariables("PATH_INFO")),pathEnd)&"../conferences/upload/"&filename)
For i = 1 to LenB(value)
MyFile.Write chr(AscB(MidB(value,i,1)))
Next
MyFile.Close
Line 67 is
Set MyFile = ScriptObject.CreateTextFile(Left(Server.mappath(Request.ServerVariables("PATH_INFO")),pathEnd)&"../conferences/upload/"&filename)
Any help would be greatly appreciated. Thanks all in advance.
A.