ever_four

Ok so what this is doing is ../ is backing out of ledet and then going back in with ledet/ (pointless)is there a feedback folder in ledet?? is the file feedback-**** in the feedback folder????Use a try/catch statement to write the erring filename to the screen then check the folder to ensure the file exists.I really don't think it ahs anything to do with the os setup it is a simple IO error.

<{POST_SNAPBACK}>

Both machines uses the same OS. Windows XP Professional Edition

is the code you provided for save_feedback.asp?The error isn't coming form that code.It is a file structure problem.Do you have a folder called 'ledet' in the website root folder? is save_feedback.asp in the ledet folder?The error is saying that it is not.

<{POST_SNAPBACK}>

Hi. I'm having a problem. There's this one page, it's about the users giving feedback about the system. The page is working fine in my collegues's PC but not in mine. The error I'm receiveing is:-Error Type:Microsoft VBScript runtime (0x800A004C)Path not found/ledet/save_feedback.asp, line 5The Code is:-<% sub createFile() Dim objFSO, objTextFile Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.CreateTextFile(Server.MapPath("../ledet/feedback/feedback-"&visname&"-"&Date()&".txt")) objTextFile.WriteLine "Feedback type : " & feedbacktype if about = "other" then objTextFile.WriteLine "Comment on : " & other else objTextFile.WriteLine "Comment on : " & about end if objTextFile.WriteLine "Comment : " & comment objTextFile.WriteLine "Name : " & visname objTextFile.WriteLine "Email : " & email objTextFile.WriteLine "Tel : " & tel objTextFile.WriteLine "Fax : " & fax if priority = "on" then objTextFile.WriteLine "Priority : " & "High" else objTextFile.WriteLine "Priority : " & "Low" end if objTextFile.Close Set objTextFile = Nothing Set objFSO = Nothing Response.Redirect("success.html") end sub feedbacktype = Request.Form("feedbacktype") about = Request.Form("about") other = Request.Form("other") comment = Request.Form("comment") visname = Request.Form("visname") email = Request.Form("email") tel = Request.Form("tel") fax = Request.Form("fax") priority = Request.Form("priority") if visname <> "" then call createFile() end if%>Can someone please give some suggestions on what I can do to resolve the problem I'm facing? Thanks in advance ...