Redirect to the point where error occured

• Phil Parkin

  SSC Guru

  Points: 247180

  More actions

  May 5, 2010 at 12:57 pm

  #1162707

  Something like this, maybe:

  Dim f As String

  For Each f In System.IO.Directory.GetFiles(path)

  System.IO.File.Delete(f)

  Next f

  ---

• RexSmith

  Ten Centuries

  Points: 1077

  More actions

  May 20, 2010 at 4:34 am

  #1169985

  This is what I had done

  Dim f As String

  For Each f In System.IO.Directory.GetFiles(path)

  If f.EndsWith(".exe") Or f.EndsWith(".EXE") Then

  a = "sssss"

  Else

  System.IO.File.Delete(f)

  End If

  Next f

  Rex Smith

• Phil Parkin

  SSC Guru

  Points: 247180

  More actions

  May 20, 2010 at 4:57 am

  #1170001

  RexSmith (5/20/2010)

  ---

  This is what I had done

  Dim f As String

  For Each f In System.IO.Directory.GetFiles(path)

  If f.EndsWith(".exe") Or f.EndsWith(".EXE") Then

  a = "sssss"

  Else

  System.IO.File.Delete(f)

  End If

  Next f

  You could tidy up a little, but I doubt it will make any difference other than to aesthetics:

  If f.ToUpper.EndsWith(".EXE") Then

  ....

  ---