Get File With Latest Date

    1 Dim fileName As String

    2 Dim tempFileName As String = ""

    3 Dim createDate, createDateTemp As Date

    4 

    5 Try

    6     For Each fileName In FileIO.FileSystem.GetFiles(docPath)

    7         createDate = FileIO.FileSystem.GetFileInfo(fileName).CreationTime

    8         If createDate > createDateTemp Then

    9             createDateTemp = createDate

   10             tempFileName = fileName

   11         End If

   12     Next

   13 Catch ex As Exception

   14 End Try