tdl to make auto backup

i want tdl to take backup ,
when we quit tally is always take backup first

 

tallyerp9customization@gmail.com

 

[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

 

Thank you sir, but i am not expert as like you.

 

helpful tdl
thanks

 

we want tdl to make backup always when we quit tally

 

very good

 

i can do it.
but in my experience no need for tdl . Go to cobian backup. it is very good software for auto-backup

 

can you please make tdl , for auto backup when we quit tally

 

Devaki I like your autobackup TDL , Thanks for sharing , Will you tell me abourt cobian Backup

 

https://help.tallysolutions.com/article/faqs/all_releases/8850.html

 

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.

 

plz check out it is the best tdl file of auto backup

 

you can use cobian backup for direct Google drive backup

 

oh Thanks for your advice
and do you have costcenterwise Trial

 

Devaki nice work....

 

this awsome and very nice but why it is asking for back up while loading of the company ? while closing it is asking fine...

 

good one

 

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...