| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2003/12/2 9:27:13 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 哪位高手可以详细的说一下在DELPHI中如何实现备份数据库里的数据？？还有如何恢复数据？？ 讲一下流程也可以，谢谢 ---------------------------------------------- - |
|||||
| 作者： |
|
2003/12/2 9:42:47 | ||||
| 1楼： | 偶 想 偶是 世界上最笨的 偶的备份和恢复 全是用 最土的办法 复制张贴 copyfile函数！ ----------------------------------------------  
|
|||||
| 作者： |
|
2003/12/2 9:49:45 | ||||
| 2楼： | 自己看看下面的代码，反正我用此方法可以备份数据，也可以还原！ procedure Tysmain.N4Click(Sender: TObject); var dbname: string; begin if fadoconnect.ado.Connected = true then fadoconnect.ado.Connected:=false; dbname := ExtractFilePath(Application.ExeName)+FormatDateTime('yyyy"年"mm"月"dd"日" hh"时"nn"分"ss"秒"', now())+ '备份.bak'; if FileExists(dbname) then DeleteFile(dbname); CopyFile(Pchar('mdb.mdb'), Pchar(dbname), true); MessageBox(handle, '数据库备份成功!', '提示', mb_IconInformation + mb_Ok); if fadoconnect.ado.Connected = false then fadoconnect.ado.Connected := true; end; procedure Tysmain.N8Click(Sender: TObject); var dbname, dbbname: string; begin if MessageBox(self.Handle, '确认要还原数据么? ', '提示', mb_IconQuestion + mb_YesNo) = idYes then begin if fadoconnect.ado.Connected = true then fadoconnect.ado.Connected:=false; dbname := ExtractFilePath(Application.ExeName)+ 'mdb.mdb'; if opendialog.Execute then dbbname :=opendialog.FileName; //showmessage('当前目录为---"'+dbbname+'"'); if not FileExists(dbbname) then MessageBox(self.Handle, '没有备份数据,不能还原', '提示', mb_IconInformation + mb_Ok) else begin CopyFile(Pchar(dbbname), Pchar(dbname), true); MessageBox(handle, '数据库还原成功!', '提示', mb_IconInformation + mb_Ok); end; if fadoconnect.ado.Connected =false then fadoconnect.ado.Connected:=true; end; end;文字自己看看下面的代码，反正我用此方法可以备份数据，也可以还原！ ---------------------------------------------- 小弟乃初学者！多多指教！拜托拉！！ |
|||||
| 作者： |
|
2003/12/2 10:02:03 | ||||
| 3楼： | study !good! ----------------------------------------------
|
|||||
| 作者： |
|
2003/12/2 10:03:50 | ||||
| 3楼： | 谢谢 ltystory ！！ 还有个问题想请教，我用的ODBC，如何判断ODBC打开的时候关闭，关闭的时候打开呢？？谢谢！！ ---------------------------------------------- - |
|||||
| 作者： |
|
2003/12/2 10:14:36 | ||||
| 4楼： | 继续学习! ----------------------------------------------
|
|||||
| 作者： |
|
2003/12/2 10:49:51 | ||||
| 5楼： | 备份数据的时候需要关闭所有的数据库连接！BDE我用的很少，你还是用ADO连接吧！比BDE方便多了，我是采用ADO中的ADOCONNECT控件控制数据库连接的。 ---------------------------------------------- 小弟乃初学者！多多指教！拜托拉！！ |
|||||
| 作者： |
|
2003/12/2 11:00:27 | ||||
| 6楼： | 李丰大哥： seanosay 大哥问： 用的ODBC，如何判断ODBC打开的时候关闭，关闭的时候打开呢？？ 小弟也想知道 ？谢谢！ ----------------------------------------------
|
|||||
| 作者： |
|
2003/12/2 16:06:24 | ||||
| 7楼： | 这个可以吗？我以前试过这中方法，但是只可以备份，却还原不了，老是提示没有数据库的排它使用权…… ---------------------------------------------- 要努力！加油！争取做个程序员！ |
|||||
| 作者： |
|
2003/12/9 12:17:20 | ||||
| 8楼： | 我试过！可以的！ 要不你把后缀名bak格式改为MDB格式！可以吗？ ---------------------------------------------- 小弟乃初学者！多多指教！拜托拉！！ |
|||||
| 作者： |
|
2003/12/9 14:55:56 | ||||
| 9楼： | 李丰大哥： seanosay 大哥问： 用的ODBC，如何判断ODBC打开的时候关闭，关闭的时候打开呢？？ ----------------------------------------------
|
|||||
| 信息 |
| 登陆以后才能回复 |
