Help with Macro

[hopkinsc]

Hi all

I have a macro that exports an object into excel and saves it and emails it to multiple recipients.

Can anyone tell me what command i would use to also delete the file please?

Here is the Export part of the macro.

Sub Export1
theDate = Right(String(2,"0") &  Day(Now()),2) _
        & Right(String(2,"0") & month(Now()),2) _
        & Year(Now())

ActiveDocument.ClearAll false
pathcorp="C:\TEST\"
set corp = ActiveDocument.GetSheetObject("TB05")
corp.ExportBiff  pathcorp & "TEST - " & theDate & ".xls"

set MyTable = ActiveDocument.GetSheetObject("TB05")
path="C:\TEST\"
   
Set XLApp = Nothing
Set Table = Nothing

Many thanks

Chris

[m_woolf]

When I google vbscript delete file, I find:

Set obj = CreateObject("Scripting.FileSystemObject") 'Calls the File System Object 

obj.DeleteFile("C:\MyFolder\MyFile.txt") 'Deletes the file throught the DeleteFile function