Delete a text file

• babban

  Grasshopper

  Points: 19

  More actions

  June 28, 2006 at 9:08 am

  #68723

  How to dynamically delete a text file through a package?

  Scenario:  A text file is having a date appended as a suffix to its name. eg. filename06282006.txt  If we need to delete the file through package, what should be our plan of action?

  Any thoughts appreciated 🙂

   

• Pam Brisjar

  SSChampion

  Points: 12094

  More actions

  June 28, 2006 at 9:10 am

  #646396

  I did it via a VB script task using FileSystemObject.

• Joe Asta

  Grasshopper

  Points: 16

  More actions

  June 29, 2006 at 7:36 am

  #646675

  FileSystemObject is the way to go. Here is some sample code:

  dim fso

  dim fil

  set fso = CREATEOBJECT("Scripting.FileSystemObject")

  set fil = fso.GetFile(DTSGlobalVariables("gv_FileFullName").Value)

  'check if file exists in archive location

  if fso.FileExists(DTSGlobalVariables("gv_ArchiveLocation").Value & fil.Name) = "True" then

  'if file is in the archive folder already, delete archive file

  fso.DeleteFile(DTSGlobalVariables("gv_ArchiveLocation").Value & fil.Name)

  end if