Comparer la date de création de 2 fichiers.text
Bonjour le Forum,
Je souhaite comparer la date de 2 fichiers.text.
Si le fichier sur le serveur est plus récent, il écrase celui qui est sur le disque dur de l'utilisateur.
Aide Microsoft propose un code de comparaison de date, mais cela ne compare pas les dates de création de fichiers
DateTime.Compare(DateTime, DateTime) Méthode
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
| Private Sub SurroundingSub()
Dim date1 As DateTime = New DateTime(2009, 8, 1, 0, 0, 0)
Dim date2 As DateTime = New DateTime(2009, 8, 1, 12, 0, 0)
Dim result As Integer = DateTime.Compare(date1, date2)
Dim relationship As String
If result < 0 Then
relationship = "est antérieur à"
ElseIf result = 0 Then
relationship = "est en même temps que"
Else
relationship = "est plus tard que"
End If
Console.WriteLine("{0} {1} {2}", date1, relationship, date2)
End Sub |
Merci pour votre aide