Microsoft date format

[Gwenvael Le Seach]

I am currently using the demo version of Flexpro to analyse large sets of data from a fast recorder. It seems to be very powerfull and meet my expectations.
I still have a problem of date format. The fast recorder generate date in a “Microsoft” format, in days since the 1st of january 1900 (today is the 39202nd day. How can I use Flexpro to change that?

Thanks

[Gwenvael Le Seach]

I am currently using the demo version of Flexpro to analyse large sets of data from a fast recorder. It seems to be very powerfull and meet my expectations.
I still have a problem of date format. The fast recorder generate date in a “Microsoft” format, in days since the 1st of january 1900 (today is the 39202nd day. How can I use Flexpro to change that?

Thanks

[Bernhard Kantz]

There is no special function which converts your format into the calendar time format.
In FlexPro the calendar time value specifies the amount of time passed in seconds since January 1, 1970 at 00:00:00 UTC.
But you can create a VBA macro which converts the integer value into the calendar time format. It’s also possible to implement a custom import filter.

Use the [b]Date[/b] data type.
Example:
[code]
Dim nDate As Long
Dim dtmDate As Date

nDate = 39203
dtmDate = nDate

Dim oDataset As DataSet

ThisDatabase.RootFolder.Add “Test”, fpObjectTypeDataSet
Set oDataset = ThisDatabase.RootFolder.Object(“Test”)
With oDataset
.DataStructure = fpDataStructureScalar
.DataType(fpDataComponentY) = fpDataTypeCalendarTime
.Value(fpDataComponentY) = dtmDate
End With
[/code]

See also
Automating Tasks
Automating Using FlexPro Visual Basic
Examples
A Custom Import Filter

support@weisang.com

[Author]

Posts