Re: Reading VB data
- Posted by Irv <irv at ELLIJAY.COM> May 24, 1999
- 334 views
On Mon, 24 May 1999, Boehme, Gabriel wrote: > Irv Mullins wrote: > > >I have some accounting data written with Visual Basic. > >The numbers are 8 bytes (reals, I guess). > >Can anyone tell me how to read these with Euphoria? > > With 8 bytes, my guess would be that they're float64 values. If that's the > case, read those 8 bytes into a sequence and use float64_to_atom() to > convert them into Euphoria values. > Sounds like it would work, but all I got was 0.00 and -nan 's. Also tried reversing the sequence first, with worse results. Here's a snippet of the extracted data, along with the actual numbers typed in for comparison: Act.$ What Euphria reads: JRUBBERCO 04/01/99 117329 1 21.84 {32,85,3,0,0,0,0,0} JRUBBERCO 04/01/99 117329 0 1.32 {144,51,0,0,0,0,0,0} CASH 04/01/99 117330 1 4.31 {92,168,0,0,0,0,0,0} CASH 04/01/99 117330 0 0.26 {40,10,0,0,0,0,0,0} CASH 04/01/99 117331 4 (56.66) {184,90,247,255,255,255,255,255} CASH 04/01/99 117331 0 (3.40) {48,123,255,255,255,255,255,255} JOHNSONEA 04/01/99 117332 1 40.38 {88,41,6,0,0,0,0,0} JOHNSONEA 04/01/99 117332 0 2.43 {236,94,0,0,0,0,0,0} CASH 04/01/99 117333 99 0.00 {0,0,0,0,0,0,0,0} BENTTREEC 04/01/99 117334 1 16.17 {164,119,2,0,0,0,0,0} BENTTREEC 04/01/99 117334 0 0.97 {228,37,0,0,0,0,0,0} CHASTAINF 04/01/99 117335 1 8.88 {224,90,1,0,0,0,0,0} CHASTAINF 04/01/99 117335 0 0.54 {24,21,0,0,0,0,0,0} TRNRDAVID 04/01/99 117336 1 1.12 {192,43,0,0,0,0,0,0} TRNRDAVID 04/01/99 117336 0 0.07 {188,2,0,0,0,0,0,0} CLARKJIMMY 04/01/99 117337 1 24.15 {92,175,3,0,0,0,0,0} CLARKJIMMY 04/01/99 117337 0 1.15 {236,44,0,0,0,0,0,0} PICCOCOMM 04/01/99 117338 9 86.71 {28,59,13,0,0,0,0,0} POOLED 04/01/99 117339 1 19.78 {168,4,3,0,0,0,0,0} POOLED 04/01/99 117339 0 1.19 {124,46,0,0,0,0,0,0} ... and so on... Sure would appreciate some help ! Irv