VB数据库项目设计模块化教程 作者 刘玉山 刘宝山 第12章 备份和恢复模块设计.pptVIP

Unload Me  End Sub  12.3 技术要点小结 12.3.1 FSO的引用12.3.2 FileSystemObject和File对象变量的定义和使用12.3.3 文件Copy方法的应用12.3.4 驱动器列表框控件、目录列表框控件和文件列表框控件 12.3.1 FSO的引用  12.3.2 FileSystemObject和File对象变量的定义和使用  12.3.3 文件Copy方法的应用  12.3.4 驱动器列表框控件、目录列表框控件和文件列表框控件 图12-5 工具箱上的文件系统控件1.驱动器列表框(DriveListBox)控件2.目录列表框(DirListBox)控件3.文件列表框(FileListBox)控件 12.3.4 驱动器列表框控件、目录列表框控件和文件列表框控件 12(123-127)P5 yd_Embed_5.jpg 图12-5 工具箱上的文件系统控件  1.驱动器列表框(DriveListBox)控件  2.目录列表框(DirListBox)控件 12(123-127)P5 yd_Embed_6.jpg 3.文件列表框(FileListBox)控件  第12章 备份和恢复模块设计 主编 刘玉山 在线教务辅导网： 教材其余课件及动画素材请查阅在线教务辅导网 QQ:349134187 或者直接输入下面地址： 第12章 备份和恢复模块设计 第12章 备份和恢复模块设计 12.1 项目需求分析12.2 项目设计12.3 技术要点小结 12.1 项目需求分析 12.1.1 项目需求分析的理解12.1.2 项目需求分析 12.1.1 项目需求分析的理解 图12-1 系统维护界面图12-2 备份数据 图12-3 恢复数据 12.1.1 项目需求分析的理解 12(123-127)P5 yd_Embed_1.jpg 图12-1 系统维护界面 12(123-127)P5 yd_Embed_2.jpg 图12-1 系统维护界面 12(123-127)P5 yd_Embed_3.jpg 图12-2 备份数据 图12-3 恢复数据  12.1.2 项目需求分析  12.2 项目设计 12.2.1 设计思想12.2.2 程序设计 12.2.1 设计思想 图12-4 项目流程图 12.2.1 设计思想 12(123-127)P5 yd_Embed_4.jpg 图12-4 项目流程图  12.2.2 程序设计 Private Sub OK_Click()DDFB = Dir1.Path \ FileName.Text Year(Now) 年 Month(Now) 月 Day(Now) 日 .bakSet fil = fso.GetFile(App.Path \EMS.mdb)fil.Copy (DDFB)MsgBox 数据备份完毕！！frmManageSystem.ShowUnload MeEnd SubPrivate Sub OK_Click()DDFR = File1.Path \ File1.FileNameSet fil = fso.GetFile(DDFR)fil.Copy (App.Path \EMS.mdb)MsgBox 数据恢复完毕！！ 12.2.2 程序设计 frmManageSystem.ShowUnload MeEnd Sub Private Sub OK_Click()  DDFB = Dir1.Path \ FileName.Text Year(Now) 年 Month(Now) 月 Day(Now) 日 .bak  Set fil = fso.GetFile(App.Path \EMS.mdb)  fil.Copy (DDFB)  MsgBox 数据备份完毕！！  frmManageSystem.Show  Unload Me  End Sub  Private Sub OK_Click()  DDFR = File1.Path \ File1.FileName  Set fil = fso.GetFile(DDFR)  fil.Copy (App.Path \EMS.mdb)  MsgBox 数据恢复完毕！！  frmManageSystem.Show