Hi,

I wrote the code to make csv saving handle just periods, to make csv files 
consistent. In case it helps others with programs that need to use csv data 
internationally I've put the functions I used below. The first function helped 
filter a file read value to ensure the result would be ok regardless of whether 
a comma or period is required as a decimal separator. The second function 
converts a number to a string that explicity separates decimal values with a 
period.

function splitdot(number)
  if(mid(cstr(0.001),2,1)=",") then
    splitdot=cdbl(replace(cstr(number),".",","))
  else
    splitdot=number
  end if
end function

function dotnum(number) 
  Dim ipart,dpart   
  ipart=int(number)
  dpart=number-ipart
  dpart=int(dpart*100000) 
  dotnum=ipart & "." & dpart
end function

Best wishes,

Andrew.

--

You received this message because you are subscribed to the Google Groups 
"nsb-ce" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to 
[email protected].
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en.


Reply via email to