Your browser does not seem to support JavaScript. As a result, your viewing experience will be diminished, and you have been placed in read-only mode.
Please download a browser that supports JavaScript, or enable it if it's disabled (i.e. NoScript).
How can I translate de following VB function ? Function DateToNumber(dOrig as Date) as Long Dim HDate as date HDate = DateSerial(1900,1,1) + TimeSerial(0,0,0) DateToNumber = Abs(DateDiff("d",HDate,dOrig)) End Function Regards, Marcelo
