回 帖 发 新 帖 刷新版面

主题:请教 数据库备份 和 恢复 问题?

用 PB, 数据库备份 和 恢复怎么做的 ,最好能提供点简单的代码,谢谢了!

回复列表 (共5个回复)

沙发

dw_1.saveas(文件名’。dbf’,dbase3!,false)//导出
dw_1.importfile(文件名.dbf')//导入

板凳

你使用的是什么数据库呀?

3 楼

系统备份
窗口:
if p_1.picturename='1.gif' then
    if messagebox('警告','数据备份还没有完成,是否中断备份并退出?',stopsign!,YesNO!,2)=2 then
        return 1
    end if
end if
开始;
messagebox("注意!","开始备份数据!",question!,YesNo!)
pointer oldpointer
    oldpointer=SetPointer(HourGlass!) //设置鼠标指针
    
//if invo_process.uf_createprocess('dbbackup -c "UID=DBA;PWD=SQL" -y '+sle_1.text, not cbx_1.checked) then
    p_1.picturename='image\1.gif'
    st_1.text='正在备份,请稍候...'
    uint lul_exitcode
    boolean lb_exitrun
    do while true
        //if invo_process.GetExitCodeProcess(invo_process.il_processID, lul_exitcode) then
            if lul_exitcode <> 259 then  //259 = 备份程序是否运行完成
                exit
            end if
//        end if
//        invo_process.Sleep(250)
        yield()
    loop
//end If

choose case lul_exitcode
    case 9
        SetPointer(oldpointer) //设置鼠标指针
        st_1.text = "备份失败,可能存在如下原因: ~r~n1.数据库未启动 ~r~n2.磁盘空间不够"
        p_1.picturename='image\0.gif'
    case 1
        SetPointer(oldpointer) //设置鼠标指针
        st_1.text = "备份失败,请重新登陆后再试!"
        p_1.picturename='image\0.gif'
    case 0
        SetPointer(oldpointer) //设置鼠标指针
        st_1.text = "备份成功!"
        p_1.picturename='image\0.gif'
        
End choose

4 楼

如果采用的是SQL server 建议采用*.dat进行备份和还原

5 楼

如果是SQL SERVER请看本站我前两天的回复.

我来回复

您尚未登录,请登录后再回复。点此登录或注册