If the date is always in the same place and in the same format, you can Split() the array that is returned by DirPlus, and then use that information to move forward.

Code:
$Counter2 = 0
For $Counter = 0 to UBound($DirPlus_Array)
  $Split_Name = Split($DirPlus_Array[$Counter],".")
  If $SPlit_Name[3] = $Specified_Date
    Redim Preserve $Build_Array[$Counter2]
    $Build_Array[$Counter2] = $DirPlus_Array[$Counter]
    $Counter2 = $Counter2 + 1
  EndIf
Next
_________________________
Today is the tomorrow you worried about yesterday.