[System: Events] TSPL Smp CmpLoadEvent2 : Load Company : NOT $$IsRemoteCompany : Call : Backup Function ;; Close Company Event TSPL Smp CmpCloseEvent : Close Company : NOT $$IsRemoteCompany : Call : Backup Function ; TSPL Smp CmpBackUp : Close Company : NOT ($IsAggregate:Company:##SVCurrentCompany) AND NOT $$IsRemoteCompany : Call : Backup Function : CALL : BackupFunction [Function: Backup Function] Variable : Backup Det Var: String 00 : IF : ##EnableAutoBackup 10 : IF : ##AutoBackupPrompt 20 : QUERYBOX : "Backup Company ?" : Yes:No 30 : IF : $$LastResult 40 : CALL : Backup Company 50 : ENDIF 60 : ELSE : 70 : CALL : Backup Company 80 : ENDIF 90 : ENDIF [Function: Backup Company] 10 : SET : BackupDetVar : @@DestPath + ", " + ##SVCurrentPath + ", " + ##SVCurrentCompany + + ", " + @@CoNumber 20 : BACKUP COMPANY : "," : ##BackupDetVar 30 : SET : SVBackupPath : @@DestPath [System: Formula] DestPath : ##DestinationPath + "\" + @@DateForm + "\" + @@TimeForm CoNumber : $$String$CompanyNumber:Company:##SVCurrentCompany):5 DateForm : $$String:$$MachineDate TimeForm : @@HrsForm + @@MtsForm HrsForm : If $$StringPart:$$MachineTime:0:2 CONTAINS ":" + Then $$StringPart:$$MachineTime:0:1 + Else $$StringPart:$$MachineTime:0:2 MtsForm : if $$StringPart:$$MachineTime:0:2 CONTAINS ":" + Then $$StringPart:$$MachineTime:2:2 + Else $$StringPart:$$MachineTime:3:2 ;; Enable configuration options - used in General of F12 Configuration [#Part: System Common] Add : Lines : Enable Auto Backup, Auto Backup Path, Auto Backup Path Info, Auto Backup Prompt [Line: Enable Auto Backup] Field: Long Prompt, Enable Auto Backup Local: Field: Long Prompt : Info : $$LocaleString:"Enable Automatic Backup Feature?" [Field: Enable Auto Backup] Use : Logical Field Modifies : EnableAutoBackup [Line: Auto Backup Path] Field: Long Prompt, Auto Backup Path Local: Field: Long Prompt : Info : $$LocaleString:"Destination Path?" Local: Field: Long Prompt : Inactive: NOT #EnableAutoBackup Local: Field: Long Prompt : Indent : 2 [Field: Auto Backup Path] Use : Name Field Modifies : DestinationPath Inactive : NOT #EnableAutoBackup Set As : If $$IsEmpty:##DestinationPath Then "E:\Autobackup" else ##DestinationPath [Line: Auto Backup Path Info] Field: Simple Field Local: Field: Simple Field : Info : $$LocaleString:"(Subfolders for System Date and Time will be created within)" Local: Field: Simple Field : Inactive: NOT #EnableAutoBackup Local: Field: Simple Field : Style : Small Italic Indent: 1 [Line: Auto Backup Prompt] Field: Long Prompt, Auto Backup Prompt Local: Field: Long Prompt : Info : $$LocaleString:"Confirmation from user?" Local: Field: Long Prompt : Inactive: NOT #EnableAutoBackup Local: Field: Long Prompt : Indent : 2 [Field: Auto Backup Prompt] Use : Logical Field Modifies : AutoBackupPrompt Inactive : NOT #EnableAutoBackup Set As : If $$IsEmpty:##AutoBackupPrompt Then Yes else ##AutoBackupPrompt ;; Variable Definition [Variable: EnableAutoBackup] Type : Logical Persistent : Yes [Variable: DestinationPath] Type : String Persistent : Yes [Variable: AutoBackupPrompt] Type : Logical Persistent : Yes [System: Variable] EnableAutoBackup: Yes DestinationPath : "E:\Autobackup" AutoBackupPrompt: Yes ;;;END OF FILE
Keep doing and you will become one......... never take easy way out........ good luck. I am also 5 months old in TDL and joined this site in Feb-end.
i can do it. but in my experience no need for tdl . Go to cobian backup. it is very good software for auto-backup
Thanks a lot Devaki Ji, Can we backup data online directly from this software. Most of the company want to backup copy online to hard disk.Is it possible by giving direct gmail google drive path.
this awsome and very nice but why it is asking for back up while loading of the company ? while closing it is asking fine...
remove this line............ TSPL Smp CmpLoadEvent2 : Load Company : NOT $$IsRemoteCompany : Call : Backup Function
i removed the top line and checked it is not asking i just asked y it is given in the startup because it will lead to performance of data so...
For companies with 100s of entries per day OR synchronization between multiple locations............... best advisable to take during loading and exit............
As for me...I use COBIAN Backups............takes backups every 30 minutes or any time limit as you define........... and I take triple tier backup.......... 1.... normal backup 2....synchro backup 3... backup with historical archives.