title: If directory exists in a VB.NET code
body: <p>I have the following code to create a directory, the task accepts a recordcount and every time the recordcount reaches the required number, say 1000 records, a new directory is created. If the task is run a second time it will add another 1000 records to the existing directories, I want it to skip these existing directories and create a new one. I've tried adding various ifexists, but mess it up all the time, any help would be appreciated</p>
  
  <pre><code>Public Sub Main()
  
      Dim SourceDirectory As String = "E:\Data"
      Dim TargetDirectory As String = "E:\CN"
      Dim FileExtensionsToProcess As String = "CON*.pdf"
      Dim FileCounter As Integer = 0
      Dim FolderName As Integer = 1
      Dim recordcount As Integer
      recordcount = CInt(Dts.Variables("RecordCount").Value)
  
      For Each FileName As String In System.IO.Directory.GetFiles(SourceDirectory, FileExtensionsToProcess)
          Dim FileOnly As String = System.IO.Path.GetFileName(FileName)
          Try
              If Not IO.Directory.Exists(IO.Path.Combine(TargetDirectory, FolderName.ToString())) Then
                  IO.Directory.CreateDirectory(IO.Path.Combine(TargetDirectory, FolderName.ToString()))
              End If
              IO.File.Move(FileName, IO.Path.Combine(TargetDirectory, IO.Path.Combine(FolderName.ToString(), FileOnly)))
          Catch
          End Try
          FileCounter += 1
          If (FileCounter Mod recordcount) = 0 Then
              FolderName += 1
          End If
      Next
      Dts.TaskResult = ScriptResults.Success
  End Sub
  </code></pre>