Pergunta : DATA DO CONVERSO A JULIANO

Olá!, o

I encontrou que estes código e parece que deve fazer o que eu preciso mas eu me mantenho conseguir erros de sintaxe e o VAL & o FORMATO parecer incorretos no certificado de VB.  necessidade do

I de tomar este código e de fazer-lhe o trabalho em um VB script. class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
o id= " codeSnippet774756 " class= " do 
 ' JD EDWARDS (software de AS/400) usa as datas chamadas JULIANO. 
'Uma data JULIANA identifica o ano primeiramente, então o número de dias no ano isso
'sua data aparece. Assim, o 15 de janeiro de 1999 é 99015. O 15 de mar�o é 99074. O 15 de mar�o de 2001 é
'101074 datas em Y2K começam com 100 (2000), 101 (2001) etc.

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

TempYr = TempYr * 1000
TempString = “01/01/” + formato (TempFromDate, “yyyy”)
fromdate = TempYr + TempFromDate - DateValue (TempString) + 1
class= do

Resposta : DATA DO CONVERSO A JULIANO

Nós não conseguimos executar alguns dos comentários, porque o cliente pegarou o computador para a carga diagnóstica d/t seus confinamentes do tempo.
Outras soluções  
 
programming4us programming4us