869
社区成员
新手请教简单数据备份与恢复源码
新手刚学PB，想备份与恢复PB9+自带ASA数据库
窗口WIN_1上放一单行文本框，有浏览，备份，恢复按钮，搜索了不少方法，弄不好，不知道该如何具体代码实现备份与恢复呢？
窗口WIN_1上放一单行文本框，有浏览，备份，恢复按钮，搜索了不少方法，弄不好，不知道该如何具体代码实现备份与恢复呢？
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
SKY_4K_PPM 2008-04-18
filecopy()
dangerous123 2008-04-17
asa数据库的备份与恢复最好的办法就是利用文件拷贝,filecopy()
richgod 2008-04-10
还是不行啊，谁有能成功恢复ASA的代码嘛？直接拷贝的也好啊，怎么写呢？
lllyyymmm 2008-04-10
在恢复之前,先断开一下连接,不然人的数据库正在使用,是恢复不成功的
Einsnein 2008-04-02
tmp.db 只是临时文件 路径给到数据库目录或当前目录都可以
Einsnein 2008-04-02
gs_dir 是当前目录
Einsnein 2008-04-01
//备份
string mysql,bfname
bfname=trim(sle_1.text)
bfname=left(bfname,len(bfname)-2)
mysql="backup database to '"+bfname+"'"
execute immediate :mysql using sqlca;//运用sql语句立刻执行备份
if sqlca.sqlcode=0 then
messagebox("信息提示","备份成功！",information!,ok!)//给出备份成功与否的相关信息
else
messagebox("信息提示","备份失败！",information!,ok!)
end if
//恢复
string mysql,bfname,gzname
ulong sxz=32,kb //sxz为文件的属性值，32表示可读写
boolean tmp
blob lb_backinfo
bfname=trim(sle_2.text)
bfname=left(bfname,len(bfname)-2)
mysql="restore database '"+gs_dir+"tmp.db' from '"+bfname+"'"
execute immediate :mysql using sqlca;//同样是运用sql语句来立刻执行恢复数据库的工作
if sqlca.sqlcode<>0 then
messagebox("信息提示","数据恢复失败！",information!,ok!)
return
end if
disconnect using sqlca; //断开数据库连接
messagebox("提示","数据库恢复成功，请重新登陆系统")
string mysql,bfname
bfname=trim(sle_1.text)
bfname=left(bfname,len(bfname)-2)
mysql="backup database to '"+bfname+"'"
execute immediate :mysql using sqlca;//运用sql语句立刻执行备份
if sqlca.sqlcode=0 then
messagebox("信息提示","备份成功！",information!,ok!)//给出备份成功与否的相关信息
else
messagebox("信息提示","备份失败！",information!,ok!)
end if
//恢复
string mysql,bfname,gzname
ulong sxz=32,kb //sxz为文件的属性值，32表示可读写
boolean tmp
blob lb_backinfo
bfname=trim(sle_2.text)
bfname=left(bfname,len(bfname)-2)
mysql="restore database '"+gs_dir+"tmp.db' from '"+bfname+"'"
execute immediate :mysql using sqlca;//同样是运用sql语句来立刻执行恢复数据库的工作
if sqlca.sqlcode<>0 then
messagebox("信息提示","数据恢复失败！",information!,ok!)
return
end if
disconnect using sqlca; //断开数据库连接
messagebox("提示","数据库恢复成功，请重新登陆系统")
richgod 2008-04-01
mysql="restore database '"+gs_dir+"tmp.db' from '"+bfname+"'" 这里的gs_dir 是指什么呢？
winstonsu 2008-04-01
1、创建文件夹
string ls_dir
ls_dir = GetCurrentDirectory ( ) + '\' + string(today(),'yyyymmdd') + string(now(),'hhmmss')
if not DirectoryExists(ls_dir) then
CreateDirectory(ls_dir)
end if
2、恢复可以给一个选择备份文件的对话框，然后用FileCopy ( sourcefile, targetfile {, replace } )
string ls_dir
ls_dir = GetCurrentDirectory ( ) + '\' + string(today(),'yyyymmdd') + string(now(),'hhmmss')
if not DirectoryExists(ls_dir) then
CreateDirectory(ls_dir)
end if
2、恢复可以给一个选择备份文件的对话框，然后用FileCopy ( sourcefile, targetfile {, replace } )
richgod 2008-03-31
上面的备份代码挺好用的.要是备份前可以自动建一个当天日期+时间的文件夹分别保存就好了.恢复代码怎么写呢??
orcd 2008-03-31
备份
ls_bfsql = "BACKUP DATABASE DIRECTORY '"+ ls_pathname+"'"
oldpointer = SetPointer(hourglass!)
Execute Immediate :ls_bfsql Using sqlca;
还原直接考文件吧
ls_bfsql = "BACKUP DATABASE DIRECTORY '"+ ls_pathname+"'"
oldpointer = SetPointer(hourglass!)
Execute Immediate :ls_bfsql Using sqlca;
还原直接考文件吧
书签备份 之前是通过去Samba的官网下载的源码包，也就是.tar.gz来进行安装配置，不过这个让我折腾来折腾去就是没折腾出结果，还花了我整整1天1夜的时间，最后实在是熬不住了，想通过yum来重新进行Samba服务器的安装与配置，...
DB2版块精华知识分类索引 DB2入门与认证 DB2入门指南 DB2 新手入门 db2 概念基础 DB2客户端配置 db2自学教程 DB2基础教程（中文版） DB2函数详解 DB2学习资料 一份DB2初学者的中文资料 DB2初学者刚开始必须掌握那些DB2的基本命令和...
ADS1.2的简单使用 数据仓库与数据挖掘 NoSQL技术 IT业界新闻与评论 IT职业生涯 猎头招聘 IT图书与评论 CU技术图书大系 Linux书友会 二手交易 下载共享 Linux文档专区 IT培训与认证 培训交流 认证培训 清茶斋 ...
Hadoop管理员的十个最佳实践 接触Hadoop有两年的时间了，期间遇到很多的问题，既有经典的NameNode和JobTracker内存溢出...在解决问题的过程中，有时需要翻源码，有时会向同事、网友请教，遇到复杂问题则会通过mail list向全球各地Hadoop使用者,包括
[android]webview访问jsp页面，能否从jsp页面获取数据 用webview访问一个jsp页面，在jsp页面中从request中获取数据，然后传递给webview，具体jsp代码如下， String oauth_verifier = request.getParameter("oauth_verifier")
Linux之编辑器Vim篇（配置与高级技巧） “修改一个文件后，自动进行备份，备份的文件名为原文件名加“~“后缀 if has(“vms”) set nobackup else set backup endif ############################################...
[转]Vim配置与高级技巧 [转]Vim配置与高级技巧 一、Vim配置 如果没有安装vim就请使用:sudo apt-get install vim一个完整的.vimrc配置信息如下所示：set nocompatibleset nummberfiletype onset history=1000set background=...
墙裂推荐！看完全面掌握，最详细的 Docker 学习笔记总结（2021最新版） 开发者和系统管理员在笔记本上编译测试通过的容器可以批量地在生产环境中部署，包括 VMs（虚拟机）、bare metal、OpenStack 集群、云端、数据中心和其他的基础应用平台。容器是完全使用沙箱机制，相互之间不会有任何...
全国(大学)高等教育各学科视频教学全集 为了方便已就业的朋友再学学习，提供一篇覆盖的教程有计算机类全部，机械类，土木建筑类，财经管类 ，电气类，法学类 ，广告类，医学，心理学，大学英语，大学物理，高等数学，大学化学，...企业级项目实战(带源码升
WEB开发文档2 总结 http://blog.donews.com/lvjiyong/archive/2006/06/29/931071.aspx怎样将后台生成的在内存中的图象显示到客户端Microsoft IE WebControls下载...显示数据下载中文名文件时保存文件名乱码问题关于用ASP.net绘图的问题...
Flink面试题整理,全是干货，自己整理的 26，怎么阅读Flink源码，你有阅读过Flink源码吗？说说你看过哪些部分。 27， State你不设置TTL怎么会自动清除状态，除非你自己手动实现，1.8版本的更新不是默认自动清除State数据，只是对TTL做了一个性能上...
Flink的一些学习点 怎么阅读Flink源码，你有阅读过Flink源码吗？说说你看过哪些部分。 State你不设置TTL怎么会自动清除状态，除非你自己手动实现，1.8版本的更新不是默认自动清除State数据，只是对TTL做了一个性能上的优化，使TTL...
透过 Linux 内核看无锁编程 CAS( 内存地址，备份的旧数据，新数据 )) 就是指当两者进行比较时，如果相等，则证明共享数据没有被修改，替换成新值，然后继续往下运行；如果不相等，说明共享数据已经被修改，放弃已经所做的操作，然后重新...
用Python分析淘宝2000款避孕套，得出这些有趣的结论 我们在上一篇的时候已经将淘宝数据爬取下来了，但是并没有做数据分析。所以今天这篇文章就是教大家如何去分析数据，得出一些有用的结论！ Python语言相比其他语言的优势在哪里？猪哥认为是数据分析和人工智能这两大...
