I am looking at functions that convert standard date to Julian data and vice versa.

I tried to search the forum, but found nothing.


use this:

dim jd as Double ' julian day
dim mDate as date ' your date
mdate = Now()
jd = mdate.ToOADate
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.