主题：备份数据库数据

假定希望系统每十分钟自动备份一次项目，可以增加一个计划，计划的执行间隔600000(毫秒)，也就是10分钟，计划的代码为：

Static dt As Date '静态变量,用于保存上次备份的时间
Dim tp As TimeSpan
tp = Date.Now - dt
If tp.TotalHours >= 1 Then '如果距离上次备份已经超过一个小时   ------这是按照1小时备份一次吧，不是10分钟吧。
    dt = Date.Now
    Syscmd.Project.Backup("c:\data", True) '自动备份到c:\data目录
End If

这是备份的ft项目吧。不是备份的ft后台的数据库吧，有没有办法通过ft备份数据库的数据？