以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]文件另存  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176262)

--  作者:PMC5332
--  发布时间:2022/4/6 16:28:00
--  [求助]文件另存
请教,想在关闭项目之前,将共享盘 \\\\Pc-310m123\\内部处理笺共享\\项目管理部文件处理数据库.mdb ,复制到 ProjectPath & "Attachments\\数据库备份\\" 里并改名,加上Date.Now 项目管理部文件处理数据库.mdb 。
--  作者:有点蓝
--  发布时间:2022/4/6 16:31:00
--  
复制文件参考:http://www.foxtable.com/webhelp/topics/0342.htm,到BeforeCloseProject事件处理

FileSys.CopyFile(" \\\\Pc-310m123\\内部处理笺共享\\项目管理部文件处理数据库.mdb" ProjectPath & "Attachments\\数据库备份\\" & format(Date.Now,"yyyyMMddHHmmss" ) & "项目管理部文件处理数据库.mdb")