哎。。。。数据库不会备份阿！！！(50分)

W

wldandan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-27

• #1

我用的是access数据库，如果让系统每隔一段时间自动备份，怎么写代码？？
如果是手动备份呢？
小弟初学，下了个李颖的db_backup可是不怎么会用啊！！！、
请大侠多多执教吧！！

 

C

cb_hfxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-27

• #2

自动备份啊，复制数据库文件最简单，如果是单个数据表就用batchmove批量转移数据
文件到新的备份数据表中。
手动备份啊，就是复制啊、粘贴啊、另存啊等等。
最好用SQL SERVER2000读入access数据表进行各种操作，有你需要的所有功能。
呵呵，拙见，别见笑。

 

W

WangBingBing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-28

• #3

UP

 

A

antic_ant

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-28

• #4

如果让系统每隔一段时间自动备份，是纯粹指的时间还是数据大小到一定数量后自动备份
如果是时间，你在程序里面做一计时器

 

W

wldandan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-28

• #5

有没有哪位好心人，写一段代码看看
小弟感激不尽阿！！！

 

S

shakehand

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-28

• #6

gz

 

L

ldaan3

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-31

• #7

呵呵，我用copyfile

 

D

delphi_初学者

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-31

• #8

要怎样才能用程序实现数据的增量备份?

 

W

wldandan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-02

• #9

copy??

 

Y

yangxiao_jiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-02

• #10

access不是一个文件吗？？copy就可以了。

 

D

del520

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-02

• #11

ACCESS就备份那个mdb就可以了，搞个定时器COPYFILE不行么？（个人认为）

 

G

greenwon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-03

• #12

我的就是使用copyfile

 

W

wldandan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-04

• #13

hoho....
copyfile怎么用。。。呵呵
麻烦你了！！！

 

R

redwood

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-04

• #14

copyfile(源路经,目标路经,true);
路径是要带文件名的

 

W

wldandan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-04

• #15

贴一下代码吧
：（，我想选择存放的文件夹。。。
哎。。。太菜了，实在不好意思

 

老

老人家

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-04

• #16

if Opendialog1.Execute then
if SaveDialog1.execute then
begin
copyfile(Opendialog1.filename, SaveDialog1.filename, true);
end;

 

W

wldandan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-04

• #17

提示出错：
incompatible types:'Pchar'and 'Tfilename'

procedure TForm2.Button1Click(Sender: TObject);
begin
if openDialog1.execute then
begin
Rfilename:=opendialog1.FileName;
end;
end;

procedure TForm2.Button2Click(Sender: TObject);
begin
if savedialog1.Execute
then
SFilename:=savedialog1.FileName;
CopyFile(opendialog1.FileName,savedialog1.FileName,true);

end;

 

H

hjb_dydd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-04

• #18

SaveDialog1.FileName改成SaveDialog1.Files[0]看看，如果你在Dialog控件中设置了可以
复选，则就通过Fiels数组访问其他被选的文件了。[]

 

W

wldandan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-04

• #19

[red]怎么老是提示出错
incompatible types:'Pchar'and 'Tfilename'[/red]
改成你说的那样，也是这样
麻烦你写一段。。代码让我看看，好吗？？

 

V

vine

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-04

• #20

Uses ShellAPI;

function Win_XCOPY(fFROM,fTO:String):boolean;
var FData : TShFileOpStruct;
begin
Fdata.pFrom := PChar(fFrom+#0#0); //设立数据源路径和文件、目录名,支持(?, *通配符)
fdata.pTo := PChar(fTo+#0#0); //设立目标路径
fdata.wFunc := FO_COPY ; //设立操作方式
//FO_COPY 拷贝操作 相当于 XCOPY
//FO_MOVE 移动操作 相当于 MOVE
//FO_DELETE 删除操作 相当于 DELTREE
FData.Wnd := Application.Handle ;
fData.lpszProgressTitle := 'Wait'; //设立提示窗标题
fData.fFlags := FOF_ALLOWUNDO OR FOF_NOCONFIRMMKDIR; //设定操作选项
result:=ShFileOperation( FData ) = 0 ;
end;


//
调用：
if SaveDialog1.execute then
Win_XCOPY(your_source,SaveDialog1.fileName);