Wenn .... = ..... dann zeige ein bestimmtes Icon Verfasst am: 06.11.2009, 06:35
Hallo zusammen
stehe gerade vor einem kleinen Problem.
Ich hole mir mittels " Label1.Text = FileDateTime("PFAD ZUR DATEI") " das Datum von zwei Dateien.
Eine liegt im Netzwerk, eine lokal. Das klappt soweit ganz gut.
Wie bekomme ich nun einen Vergleich zwischen diesen beiden Werten hin?
Möchte das folgendermaßen gestalten:
Wert1 = Wert2 dann zeige ein grünes Icon (Picturebox)
Wert1 <> Wert2 dann zeige ein rotes Icon (Picturebox)
Wär super, wenn Ihr mir helfen könntet!
Vielen dank im Voraus _________________
christopher.g Überflieger
Anmeldedatum: 03.05.2008 Beiträge: 536
Verfasst am: 06.11.2009, 07:03
hi also ich glaube spontan würd ichs so machen...
Code:
Dim wert1 As Double
Dim wert2 As Double
wert1 = Format$(FileDateTime("PFAD ZUR DATEI 1"), "DDMMYYHHMMSS")
wert2 = Format$(FileDateTime("PFAD ZUR DATEI 2"), "DDMMYYHHMMSS")