lcFilename = 'ex'+right(allt(str(year(date()))),2);
+allt(str(month(date())))+allt(str(day(date())))
messagebox(lcFilename)
select mycursor
copy to &lcFileName