Frage : BEKEHRT-DATUM ZU JULIANISCHEM

Hallo, fand

I, dass dieser Code und es scheint, dass es tun sollte, was ich benötige, aber ich halte, Syntaxstörungen zu erhalten und das VAL u. das FORMAT, falsch zu scheinen im VB Index.  

I Notwendigkeit, diesen Code zu nehmen und es Arbeit in einem VB script. zu bilden

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12:

' JD class= " EDWARDS (AS-/400software) benutzt die Daten, die JULIAN genannt werden. 'EIN JULIANISCHES Datum kennzeichnet das Jahr zuerst, dann die Zahl Tagen in das Jahr das 'sein Datum erscheint. So ist 15. Januar 1999 99015. 15. März ist 99074. 15. März 2001 ist '101074 Daten in Y2K beginnen mit 100 (2000), 101 (2001) etc. StartDate = Format („01/15/2000“) TempFromDate = DateValue (StartDate) TempYr = 100 + Val (Format (TempFromDate, „yyyy“)) - Val (Format (DateValue („01/01/2000“), „yyyy“)) TempYr = TempYr * 1000 TempString = „01/01/“ + Format (TempFromDate, „yyyy“) fromdate = TempYr + TempFromDate - DateValue (TempString) + 1

Antwort : BEKEHRT-DATUM ZU JULIANISCHEM

Wir erhielten nicht, irgendwelche der Anmerkungen einzuführen, da der Klient den Computer für die Diagnosegebühr d/t ihre Zeitbegrenzungen aufhob.