主题：请教一个问题？如何在文件名中表示出保存次数？

请教一个问题？如何在文件名中表示出保存次数？

  在下列代码划线处加入？

'导出当天纱线

Dim eF As New Exporter
eF.SourceTableName = "甲班纺纱信息"
eF.FilePath = "E:\MDB\甲班纺纱信息\MDB\甲班纺纱信息" & CStr(Date.Today).replace("-","") & ".mdb "
eF.Export()

 

 

点击一次保存按钮保存一个文件如：甲班纺纱信息2013100401，再保存一次又出现文件：甲班纺纱信息2013100402，以此类推。

发文件，靠码文字说不清楚！

谢谢，简单项目上传

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.foxdb

对比判断后+1就可以了

 楼主，给你一个思路，你自己实现吧。

谢谢

直接以时间命名，时间可以精确到秒，您可以每秒钟保存一次，然后以日、天、月逐级命名文件夹，您还担心您的文件找不着？

谢谢

这样设置代码试试：

 

Dim eF As New Exporter
eF.SourceTableName = "甲班纺纱信息"
eF.FilePath = "E:\MDB\甲班纺纱信息\" & format(Date.Today,"yyyy") & "年\" & format(Date.Today,"MM") & "月\" & format(Date.Today,"dd") & "日\" & format(Date.Today,"T").replace(":","") & ".mdb "
eF.Export()

 

假如2013年10月6日12:25:45保存，该文件保存路径为：

 E:\MDB\甲班纺纱信息\2013年\10月\ 08日\122545.mdb