请问如何在pb中备份和恢复ASA数据库
看到很多朋友是用dbeng来做的,不知道怎么样写代码。能告诉一下具体的代码吗?
要备份和恢复都有的。还有就是,在备份的时候会出现dbeng的那个dos窗口,怎么样才能隐藏啊??
问题点数:20、回复次数:2Top
1 楼qlzgdzfl(紫风玲)回复于 2002-06-16 19:05:28 得分 20
备份我会,恢复我不会啊,你会的话告诉我啊
oldpointer = SetPointer(HourGlass!)//设置沙漏指针... // 耗时较长的操作
//运行备份数据库程序dbbackup,并使其最小化
ls_directory="dbbackup -c ~"eng=ckclgl;dbn=ckclgl;uid=dba;pwd=sql ~" -y "+sle_path.text(路径)
li_loop = run(ls_directory, Minimized!)//应用执行完成
ls_winhandle = 0
if ls_get_system_type = 1 then
ls_title = "dbbackup"
elseif ls_get_system_type = 2 then
ls_title = GetCurrentDirectory( ) +"\dbbackup.exe"
end if
//循环至dbbackup窗口打开
Do While ls_winhandle = 0
hpb_1.position = 1
ls_winhandle=FindWindowA(0,ls_title)
yield()
loop
//等待dbbackup窗口关闭
Do While isWindow(ls_winhandle)
Yield()
hpb_1.OffsetPos (1)
Loop
//应用执行完成
if li_loop = 1 then
messagebox("系统提示","备份成功!祝贺您!")
else
messagebox("系统提示","备份失败,请检查路径是否正确!",stopsign!)
end ifTop
2 楼LIUZKCZ()回复于 2002-06-17 02:50:13 得分 0
可以自己写一个文件读写程序.Top




