2017-04-25 64 views
1

我有以下腳本從文件夾中返回最新文件,但我有一個問題,其中有2個文件實際上在同一時間創建,我需要確保我只選擇特定的1例如SSIS從日期/時間和文件夾中獲取最新文件

文件1 =名稱「打開12345」

文件2 =名「關閉12345」

文件2文件1這樣後在10秒,這是最新,但我需要忽略,只檢索文件1,只是在作品中拋出一個扳手的文件名後的數字是隨機的,所以我需要匹配的第一部分名稱的使用僅

代碼在此刻

Public Sub Main() 

    Dim recentFile 
    Dim fi As System.IO.FileInfo 
    Dim fis() As System.IO.FileInfo 
    Dim dir As New System.IO.DirectoryInfo("\\Test Folder\") 

    fis = dir.GetFiles() 
    For Each fi In fis 
     If (recentFile Is Nothing) Then 
      recentFile = fi 
     ElseIf (recentFile.LastWriteTime < fi.LastWriteTime) Then 
      recentFile = fi 
     End If 
    Next 

    recentFile.CopyTo("\\Test Folder\Import\Open.xls") 
    ' 
    Dts.TaskResult = Dts.Results.Success 
End Sub 

幫助表示讚賞

回答

0

思我已經插入校驗回答它自己

如果MID(fi.Name,1,4) =「打開」這可能是任何名稱只是調整長度(4),以匹配文本的長度比較

所以這部分變成

For Each fi In fis 
If Mid(fi.Name, 1, 4) = "Open" Then 
    If (recentFile Is Nothing) Then 
     recentFile = fi 
    ElseIf (recentFile.LastWriteTime < fi.LastWriteTime) Then 
     recentFile = fi 
    End If 
end if 
Next 
相關問題