private Sub TravelDataFile_Export
TravelDataFileExporting = True
Sleep(0)
Try
'Se il file è stato creato lo copio esternamente
If File.Exists(File.DirInternal,TravelDataFileName) = True Then
File.MakeDir(File.DirRootExternal,"/Download/" & Application.LabelName & "/TravelData")
File.Copy(File.DirInternal,TravelDataFileName,File.DirRootExternal & "/Download/" & Application.LabelName & "/TravelData",TravelDataFileName)
End If
If AppSettings.DebugMode = True Then ToastMessageShow("File dei dati di viaggio esportato",True)
Catch
ToastMessageShow("File dei dati di viaggio non esportato",False)
Sleep(3000)
ToastMessageShow(LastException,True)
End Try
TravelDataFileExporting = False
End Sub