1、报表保存的位置：通过代码可以任意设置报表保存目录，但通过系统菜单中生成的报表默认保存在reports目录下，请问这一目录能否修改？2、计划管理中设置了一段代码，用于定期备份。请问这些代码能否转移到项目systemIdle事件中，两者有什么区别？
Static dt As Date '静态变量,用于保存上次备份的时间
Dim tp As TimeSpan
tp = Date.Now - dt
If tp.TotalHours >= 1 Then '如果距离上次备份已经超过一个小时
dt = Date.Now
Dim NewName As String
NewName = Date.Today.year & Date.Today.Month & Date.Today.Day
If FileSys.DirectoryExists(数据连接串) Then '如果连接目录存在
FileSys.CopyFile( 数据连接串 & "gbxx.mdb", "D:\备份\" & newname ,True)
End If
End If
[此贴子已经被作者于2015/10/22 20:34:38编辑过]
加好友 
发短信
Post By：2015/10/22 20:34:00 [显示全部帖子]
