Hallo an Alle,
bin zur Zeit dabei ein Script zu erstellen welches die aktuellen Infos zu dem von uns verwendete Avira Antivir Professional ausliest.
Dabei stosse ich auf folgendes Problem:
Die Registry Werte lauten wie folgt:
VDFDat = 7da011b
LastScan = 4b602dbf
Wie kann ich diese Werte entsprechend umwandeln damit ich Sie überwachen kann.
Gruß aus dem verscheiten Flörsheim
Umwandlung Registry Wert Hexadezimal in Datum
Hallo,
dank der netten Hilfe vom Support und dem kleinen Script ist mein problem fast gelöst.
Nochmals Danke für das kurze Delphi Script.
dank der netten Hilfe vom Support und dem kleinen Script ist mein problem fast gelöst.
Code: Alles auswählen
Var
LDateTimeRaw : String;
Begin
LDateTimeRaw := GetVarContent('TIMESTAMP');
// Umrechnung vom TimeStamp in LongInt
//a := round((LDateTimeRaw - 25569.0) * 86400);
DateTime := (LDateTimeRaw / 86400) + 25569.0;
//Übergabe des formatierten Datum an ACMP Variable DATETIME
SetVarContent('DATETIME', (DateTimeToStr(DateTime)));
//ShowMessage(DateTimeToStr(DateTime));
Result := 0;
End;
Nochmals Danke für das kurze Delphi Script.
Gruss
Heiko Michael Edler
Heiko Michael Edler