[ DateConvert ]


2 simple subroutines to convert from iziBasic's European date format (YYYYMMDD) to American date format (MMDDYYYY). Public domain, by Dave O'Brien

 _getTodaysDate:
 %Ddmmyyyy$=DATE$
 GOSUB _toMmddyyyy
 %Today$=%Mmddyyyy$
 RETURN '%Today$

 _toMmddyyyy:
 'convert %Ddmmyyyy$ to %Mmddyyyy$
 %Dd$=MID$(%Ddmmyyyy$,1,2)
 %Mm$=MID$(%Ddmmyyyy$,4,2)
 %Yyyy$=MID$(%Ddmmyyyy$,7,4)
 %Mmddyyyy$=%Mm$+"/"+%Dd$+"/"+%Yyyy$
 RETURN '%Mmddyyyy$
  pages read