主题：如何将数据导出为excel表，按导出的时间命名

ExportDBFile(docdir + "excel\系统备份之项目表已存档" + text(Now())+".xls",6,1,45,"<>","")
 

这是我做的文件中导出公式，可以参考一下：
SetLabel("载入数据…",GridName+"导出中…") And If(Exist(docdir+"导出数据\"+[系统说明!年度]+"年"+mid([%统计月份%],0,2)+"【"+[系统说明!账套名称]+"】"+GridName+".xls") = True ,if(msgbox(docdir+"导出数据\"+[系统说明!年度]+"年"+mid([%统计月份%],0,2)+"【"+[系统说明!账套名称]+"】"+GridName+".xls    "+char(10)+char(13)+char(13)+"文件已存在!是否复盖？",2)= True , ExportDBFile(docdir+"导出数据\"+[系统说明!年度]+"年"+mid([%统计月份%],0,2)+"【"+[系统说明!账套名称]+"】"+GridName+".xls",6,GridName) And msgbox([系统说明!年度]+"年"+mid([%统计月份%],0,2)+"【"+[系统说明!账套名称]+"】"+GridName+".xls    "+char(10)+char(13)+char(13)+"文件导出成功!",0),msgbox("已取消数据导出!  ",0)),ExportDBFile(docdir+"导出数据\"+[系统说明!年度]+"年"+mid([%统计月份%],0,2)+"【"+[系统说明!账套名称]+"】"+GridName+".xls",6,GridName) And msgbox([系统说明!年度]+"年"+mid([%统计月份%],0,2)+"【"+[系统说明!账套名称]+"】"+GridName+".xls    "+char(10)+char(13)+char(13)+"文件导出成功!",0)) And SetLabel("载入数据…",GridName)

45应该是比较列吧？如何是的话，应该"45","<>",""

-=-=-=- 以下内容由 还不错 在 2010年04月20日 08:01am 时添加 -=-=-=-
docdir+"excle\系统备份之项目已存档"