Fråga : OMVÄNDEN DATERAR TILL JULIAN

Hälsningar,

I grundar denna kodifierar, och det verkar som om det bör göra vad jag behöver bara I-uppehället som får syntaxfel och VALNA & FORMATERAR verkar oriktiga i VB skrivar.  behov för

I att ta detta kodifierar och gör det arbete i en VB script. > för

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

" codeBody " bruk ' class= " för JD EDWARDS (AS/400 programvara) daterar kallade JULIAN. 'ETT JULIAN daterar identifierar året först, då numrera av dagar in i året det 'his daterar syns. Så Jan 15, 1999 är 99015. Mars 15 är 99074. Mars 15, 2001 är '101074 daterar i Y2K-start med 100 (2000) 101 (2001) Etc. StartDate = formaterar (”01/15/2000”) TempFromDate = DateValue (StartDate) TempYr = 100 + Val (formatera (TempFromDate, ”yyyy”)) - Val (formatera (DateValue (”01/01/2000”), ”yyyy”)) TempYr = TempYr * 1000 TempString = ”01/01/” + formaterar (TempFromDate, ”yyyy”) fromdate = TempYr + TempFromDate - DateValue (TempString) + 1 " klar "

Svar : OMVÄNDEN DATERAR TILL JULIAN

Vi fick inte genomföra några av kommentarerna, som beställaren valde upp datoren för den diagnostiska laddningen d/t deras tidtvång.