Delete file from server problem

I've been playing around with the code, and replaced the dynamic data with "fixed" data but still no joy: :SICK:

The test code is:
<%
If (CStr(Request("MM_delete")) <> "" And CStr(Request("MM_recordId")) <> "") Then

Dim fs, srcFile
Set fs = CreateObject("Scripting.FileSystemObject")
srcFile = Server.MapPath("D:\Domains\something.co.uk\wwwroot\wip\files\documents\somefile.txt")

If fs.FileExists("D:\Domains\something.co.uk\wwwroot\wip\files\documents\somefile.txt") Then fs.DeleteFile srcFile, false
End If

Set fs = Nothing

End If
%>

PS. For some reason, in the code above it is showing a space in the word "documents". Tried fixing it but no luck.

I've added it, but still not working (still no error to help in debugging!):

<%
If (CStr(Request("MM_delete")) <> "" And CStr(Request("MM_recordId")) <> "") Then
On Error Resume Next
Dim fs, srcFldr, srcFile, srcThumb
Set fs = CreateObject("Scripting.FileSystemObject")
srcFile = Server.MapPath("D:\Domains\domain.co.uk\wwwroot\wip\files\documents\somefile.txt")
If fs.FileExists("D:\Domains\domain.co.uk\wwwroot\wip\files\documents\somefile.txt") Then fs.DeleteFile srcFile, false

Set fs = Nothing

End If
%>

The page is part of a CMS, where most of the data on the page is dynamically generated. I have added several debug response.writes to the page to see the server path (comes up as "/wip/cms/xdocs-delete.asp") and other information - which all work fine.

I just don't see why this code isn't working - is it because it is dependent on another condition taking place first (i.e. "If (CStr(Request("MM_delete")) <> "" And CStr(Request("MM_recordId")) <> "") Then") - and if that is failing then the code is not being executed? That might explain the absense of any errors at all.

Maybe use another method for capturing the form button being submitted? Any suggestions?

Ok, the above code is working, I can delete a specific, hard-coded file - but the filename needs to be dynamically generated.

If I use a fixed Server.MapPath string, like this...

Server.MapPath("/wip/files/documents/somefile.txt")

...the file is deleted.

The problem now is the file name is dynamic, depending on the document/database entry selected from a list.

PART1: This is the code I am using to create the Server.MapPath string (it creates the correct syntax for the mappath string):

<%
Dim srcDocument, srcDoc
srcDoc = rcsList.Fields.Item("xdocument").Value
srcDocument = "Server.MapPath" & "(""/wip/files/documents/" & srcDoc & """" & ")"
%>

PART2: Then this code to delete the file:
<%
If (CStr(Request("MM_delete")) <> "" And CStr(Request("MM_recordId")) <> "") Then
Dim fs, srcFldr, srcFile, srcThumb
Set fs = CreateObject("Scripting.FileSystemObject")
srcFile = srcDocument
If fs.FileExists(srcFile) Then fs.DeleteFile srcFile, false
Set fs = Nothing
End If
%>

So my question is, how can I make the mappath string work without using a fixed document name?

Thanks in advance.

I'm not sure I understand - if I use a fixed (in the code) filename for deletion it works (like "somefile.txt"), but if I make the server.mappath string dynamic (i.e. use the variable "srcDocument") it doesn't delete the file, even though it is a legitimate string.

Have a look at the code again, and you will see what I mean.
Ta.

That's what I can't figure out, it should be working. :confused:

Good idea, I'll add the Else statements and see what happens.