Questione : DATA DEL CONVERTITO A JULIAN

Ciao, il

I ha trovato che questi codice ed esso sembra che dovrebbe fare di che cosa ho bisogno ma continu aare convincere gli errori di sintassi e il VAL & la DISPOSIZIONE per sembrare errati in scritto di VB.  necessità del

I di prendere questo codice e di rendergli lavoro in un VB script.
class= > " libero " del
> " del codeSnippet " del class= del
class= " lineNumbers " del
class= del
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
il id= " codeSnippet774756 " class= " del
 ' JD EDWARDS (software di AS/400) usa le date denominate JULIAN. 
'Una data di JULIAN identifica l'anno in primo luogo, allora il numero dei giorni nell'anno quello
'la sua data compare. Così, il 15 gennaio 1999 è 99015. Il 15 marzo è 99074. Il 15 marzo 2001 è
'101074 date in Y2K cominciano con 100 (2000), 101 (2001) ecc.

StartDate = disposizione (“01/15/2000„)
TempFromDate = DateValue (StartDate)
TempYr = 100 + Val (disposizione (TempFromDate, “yyyy„)) - Val (disposizione (DateValue (“01/01/2000„), “yyyy„))

TempYr = TempYr * 1000
TempString = “01/01/„ + disposizione (TempFromDate, “yyyy„)
fromdate = TempYr + TempFromDate - DateValue (TempString) + 1
class= del

Risposta : DATA DEL CONVERTITO A JULIAN

Non abbiamo ottenuto di realizzare c'è ne delle osservazioni, poichè il cliente ha preso il calcolatore per la carica diagnostica d/t i loro vincoli di tempo.
Altre soluzioni  
 
programming4us programming4us