Delete Excel Files

[Rzrbkpk]

I want to delete Excel files in a folder using an Access VB module. I tried the same method that I used for searching for files (fs), but when I use the deletefile method, it doesn't work. Any ideas? Do I perhaps not have the library referenced that I need for this code? Thanks.

 

[randy700]

How about this....

Assuming you know the file name and path.
Dim FileName
FileName = "c:\My Documents\Junk.xls"
Kill FileName


Randy

 

[mik18]

Function Delete_Files(PathName)
    Dim ds
    Set ds = CreateObject("Scripting.FileSystemObject")
    
    ds.DeleteFile PathName
     
End Function

Mike

 

[mik18]

Function Delete_Files(PathName)

    Dim ds
    Set ds = CreateObject("Scripting.FileSystemObject")
    
    ds.DeleteFile PathName
     
End Function

Good Luck

Mike