A. pb数据备份问题
好像是访问违例啊，具体怎么回事我也不大清楚啊，还请高手帮助吧！
B. pb 数据库备份和恢复问题
错误提示:代码的第13行有问题,错误的函数
看你的代码第13行应该是findwindowA,确认有没有API定义错误
C. 怎么用pb在程序里备份及恢复数据库
可以用动态的数据窗口来实现将数据表中的信息存放到文本文件和dbf文件进行备份，然后再进行导入即数据恢复。具体的做法为：
1、在窗口中添加一个数据窗口控件，如数据窗口控件命名为dw_pip
2、在窗口中添加一个名为SAVE的保存按钮。在SAVE按钮中添加程序如下：
string sql_syntax,dwsyntax_str
string errors,S_filnam
string table_name
//编写数据查寻条件
sql_syntax=查询条件
//检索数据窗口内容
dwsyntax_str = SQLCA.SyntaxFromSQL(sql_syntax,"style(type=grid)" , ERRORS)
dw_pip.Create(dwsyntax_str, ERRORS)
dw_pip.SetTransObject(SQLCA)
dw_pip.retrieve()
S_filnam="d:\del\test_del.txt" //要存放的文件名（自己可以设定，但必须保证该路径存在），若存为dbf类型，则将.txt后缀改为.dbf后缀
dw_pip.SaveAs(S_filnam, Text! , FALSE)
3、在窗口中添加名为import导入按钮，在本按钮中添加以下程序
string sql_syntax,dwsyntax_str
string errors,S_filnam
sql_syntax =要插入的数据表检索条件
dwsyntax_str = SQLCA.SyntaxFromSQL(sql_syntax,"style(type=grid)" , ERRORS)
dw_pip.Create(dwsyntax_str, ERRORS)
dw_pip.SetTransObject(SQLCA)
dw_pip.retrieve()
//导入文件内容
ii=dw_pip.ImportFile("D:\del\test_del.TXT") //文件名为SAVE按钮中生成的文件名
dw_pip.update(true,true)
4、结束，调试运行
D. PB中如何备份和恢复数据库
可以使用腾讯手机管家备份，
1、进入腾讯手机管家首页，点击“设置”按钮，
2、点击进入“实用工具”页面，找到“同步助手”工具，没安装的在“添加工具”中添加上同步助手
3、进入同步助手，点击更新按钮同步手机信息
4、最后点击“确定”按钮，完成同步
5、如果手机信息丢失，可以通过登录QQ在“我的设备”-“我的手机”中找回相应信息并还原到手机上。
E. PB中如何备份出数据库
几个与PB连接数据库相关的问题
1.Power script 语言里的事务处理对象怎么理解
PowerBuilder程序与数据库之间传递信息的一个结构变量，共有15个成员.你可以详细列表它的所有成员看看它的组成.PB的应用程序会初始化一个全局的结构体变量,SQLCA,当然你也可以自定义一个自己的事务对象.
1 DBMS string 所使用的数据库管理系统的名字，如Sybase,Oracle,ODBC。
2 Database string 要连接的数据库名字。
3 UserID string 连接数据库所用的用户名。有的DBMS不需要此项。
4 DBPass string 用户连接数据库的口令。
5 Lock string 这是数据库的保护级别，一般不必给出。
6 LogID string 登录到数据库服务器上的用户名，有的DBMS不需要此项，但Sybase和Oracle需要指定这个参数。
7 LogPass string 登录到数据库服务器上的用户口令。这个属性可设可不设，但Sybase和Oracle需要指定口令。
8 ServerName string 数据库服务器名。
9 AutoCommit boolean 指定是否将数据库设置成自动提交所有事务。默认是False，也就是说，必须在应用程序中进行事务管理，并在适当的时候对数据库提交事务。如果选择True，则每个事务都由系统自动提交。
10 DBParm string 用于向数据库传递特殊信息的属性。
11 SQLCode long 指示最近一次SQL操作失败或成功。它的取值为： 返回结果 0 无错误。 -1 出现一个错误。 100 没有检索到数据。
12 SQLNRows long 最近一次SQL操作影响的行数，数据库不同其含义也不同。
13 SQLDBCode long 数据库错误代码。不同的数据库的含义不同。
14 SQLErrText string 相应于SQLDBCode属性中错误码的文字说明。
15 SQLReturnData string 返回DBMS执行SQL的附加信息，不同的DBMS其值不同。
2.我常见到做好的PB程序使用.ini文件来控制与数据库连接，可以方便的进行应用程序移植只需修改其中与数据库连接参数即可，我想问这些.ini文件只能使用手工编写吗，我见到很多.ini文件参数极多不象手写好象是机器生成的，不知道如何生成啊？请大家指教
1、其实PB中在新建---点TOOL----FILE EDIT 可以生成（编辑）INI文件。最直接就是工具栏中的EDIT图标。
2、机器生成代码是：点DATABASE图标-----选择连接方式。如：选 MSS MICROSOFT SQL SERVER 右键-NEW PROFILE 按要求填定一些参数后在--PREVIEW中可以看到代码，把它复制到INI文件中就行了。
3.编程经验--PB数据库连接
作者:郭洪建 无法确定网上来源,如有准确首发,请与本站联系
通过这些年的信息系统开发经验,使我对POWERBUILDER的理解更进一步，最近在开发某子系统模块时，遇到了一个奇怪的问题，这里给大家介绍一下.
通常在使用PB和数据库管理系统(DBMS)连接时，使用两种方式：
一、开放数据源接口(ODBC)连接
ODBC是通过支持美国微软公司开放服务结构（WOSA,Windows Open Services Architecture）中的一部分.在PB 中通过配置 SQLCA.DBMS=‘ODBC’对象的属性可使应用程序通过ODBC连接到数据库。
ODBC的具体配置包含了数据源、驱动程序类型、缓冲池等各种细节参数。
例子：
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm="C,C"
PWD="',C"
二、专用数据库接口
每个数据库管理系统(DBMS)均提供相应的客户端驱动,为了更好的服务于数据库。
在这里我们使用的是Microsoft sqlserver 2000 的客户端程序。通过设置 SQLCA.DBMS ="MSS Microsoft SQL Server" 使客户端通过专用数据库接口连接到数据库。
该类接口的参数配置除了服务器名、数据库名、LogId、LogPass外还包含了连接协议等用户验证方式等，可通过服务器端或客户端的配置程序进行配置。
SQLCA.dbms= "MSS Microsoft SQL Server" //接口类型
SQLCA.database= "master" //数据库
SQLCA.userid= ""
SQLCA.dbpass= ""
SQLCA.logid= "sa"
SQLCA.logpass= "xxxx"
SQLCA.serverName= ".\xxx"//服务器名
SQLCA.dbparm= "Commit"
SQLCA.autocommit= false
以上介绍的是PB与数据库连接时常用的方法。
往往根据不同的应用环境选择连接方式, 在单机环境下多采用的是ODBC连接,因为在发行环节上相对要容易些。在网络环境下多采用专用数据库连接,这样可以提高系统的可靠性与执行效率。专用数据库的发行环节往往要配上相应DBMS客户端的动态连接库(DLL),并把它.
PB与ASA数据库连接问题!
一.连接步骤
1.添加数据源。WINDOWS98中----我的电脑---控制面版----ODBC数据源32位-----系统DSN---添加---选择你使用的数据库
2.在工具条上点击DB PROFILE 选择已建立好的数据库连接，单击EDIT在弹出的对话框中选PREVIEW里面就是连接数据库的语句，COPY就OK了。
二.DB_profile写法(以lin.com的tax例程为例)
http://down.laozang.com/lin/code/tax.zip
tax.ini
[Database]
DBMS=ODBC
Database=test
DbParm=c
三.打包所需文件
参看以下文章:
http://www.laozang.com/pbbbs/htm_data/12/0505/233.html
四.容易出现的问题及解决方法
导致ASA数据库无法连接的问题有以下几种：
1、ODBC配置错误。没有配置数据源，数据库的用户名或口令错误等都会导致数据库无法连接。
解决的办法：检查数据源的配置，如果没有在ODBC中配置数据源则按照向导添加数据源即可；口令错误只需改为正确的即可。
2、连接时提示LOG文件错误。这样的问题大多出现在重装系统后、源码移植到其他系统、数据库文件路径改变之后。
解决的办法：在创建ASA数据库的时候不创建LOG文件，如果已经创建了LOG文件则可以利用PB自带的工具Sybase central来去掉LOG文件和数据库文件的关联。操作步骤如下：
a)启动Sybase central在左边的树型目录中选择Utilities；
b)双击右边出现的条目中的change log file settings，直接next；
c)点Browse选择需要去除log文件的数据库文件，选好后next；
d)这里你会看到一些数据库的信息，log文件名，文件大小等。next；
e)去掉Maintin the following transaction log file前面的对勾，Finish；
f)配置ODBC连接数据库就可以了。
3、数据库文件损坏。此类错误一般不常见，可能由于病毒破坏或误操作引起。
解决的办法：如果以前有备份用备份文件覆盖原文件即可，如果没有备份文件就只能重新建库了！
PB8如何使用OLE DB练到ASA数据库
(本文来自sybase网站 翻译 by 金色年华)
原文出处:
http://www.sybase.com.cn/cn/content/support/exp_jszc_pb_dbms_00017.htm
Connecting to ASA Server (7.01 GA) via OLE DB in PowerBuilder 8
Adaptive Server Anywhere includes an OLE DB provider named ASAProv. One of the features of ASAProv (dboledb7.dll) is that you do not have to deploy ODBC. In other words, you can connect to an ASA database either via OLE DB or via OLE DB/ODBC bridge.
在pb中通过OLE DB连接到ASA数据库的步骤如下:
在命令提示符下键入如下命令,启动 ASADEMO:
dbsrv7 asademo -x tcpip -n asademo
("asademo" - 你选择运行的数据库. 确定你没有正在运行一个同名的数据库,否则会出错)
有两个方法通过 OLE DB 连接到 ASA Server:
1) OLE DB/ODBC bridge
对于这种连接,你必须在数据库参数中,指定有效的 ODBC 数据源,连接的脚本如下:
// Profile asa_oledb
SQLCA.DBMS = "OLE DB"
SQLCA.LogPass = "sql"
SQLCA.LogId = "dba"
SQLCA.AutoCommit = False
SQLCA.DBParm = "PROVIDER='ASAProv',DATASOURCE='asa'"
2) OLE DB (不需要配置 ODBC)
你可以通过一个扩展名为.udl的单独的文件,提供连接信息,在OLE DB中访问数据.这个文件与 Microsoft DataLink (.udl) file 类似. 你必须在系统中安装 Datalink API 以便于创建和使用 .udl 文件.
创建 .udl文件的方法:
在当前目录里的空白处单击鼠标右键,选择新建文件,选择 Microsoft Data Link.如果没有创建 Microsoft Data Link 的选项,需要创建一个文本文件,然后更改扩展名为 .udl.双击这个文件,添加连接信息.详情请访问msdn.microsoft.com 搜索 Data Link(此处原文有乱码,具体内容不详).
【讨论】pb连接MS SQL Server问题!
一.连接步骤
1）服务器安装SQL Server并启动，创建数据库。
2）客户机安装SQL Server客户端。
3）启动PB，配置数据源描述（通过直连接口，不建议用ODBC）。
4）连接。
二.DB_profile的写法
在ini文件里设置
[Database]
DBMS=MSS Microsoft SQL Server 6.x
Database=databasename
UserId=
LogID=
DatabasePassword=
LogPass=
ServerName=
AutoCommit=False
在程序里用profilestring读取
附加资料:ms sql server 配置文件设置
ms sql server 配置文件设置:
dbms="mss"//只须在*.ini文件中用这个代码便告诉pb使用的ms sql server
Database:所用数据库
LogId:sql server的登陆账号
LogPass=口令
servername:允许数据库服务器连接的计算机名
autocommit:控制pb 是工作在事务处理范围内还是工作在事务处理范围外
dbparm:dbms的专用连接参数
以下参数:
language:在显示错误消息和日期格式时指定要使用的语言,在服务器上必须设置该直.
lock:事务处理隔离层
log:文本和图像数据的更新是否应该纪录到事务日志中.
systemprocs:系统存储过程和用户定义的存储过程是否显示在各种各样的pb画板中.
pbcatalogowner:pb存储中表的缺省者.
async:允许在服务器上进行同步操作.0:同步,1:异步
dbgettime:当async=1时,使用该参数设置用户在检索行时pb等待来自pb的响应的秒数.
cursorlock:release和cursorscroll参数一起使用可设置光标的锁定选项.lock,opt,optval,readonly
cursorscroll:设置光标的滚动选项.
staticbind:控制pb是否在检索数据前获取dbms中的结果集描述.
dbtextlimit:控制返回的文本字段的最大长度而不用将文本作为二进制大型数据对象来处理.
appname:设置连接时所使用的应用程序名.
host:设置连接似的工作站名.
packetsize:设置使服务器向pb传送数据时所设置的包大小.
secure:设置是否想使用winnt集成逻辑安全性和安全sql server连接 缺省0使用标准安全性,1集成安全性.
PowerBuilder与Oracle的连接
PowerBuilder(PB)和Oracle分别是前端开发工具和RDBMS的主流产品。PB提供了两种与Oracle连接的接口：PowerSoft内置的数据库接口(Native Database Interface)和ODBC接口。本文介绍使用PB6.0内置Oracle接口的方法，包括数据描述文件的设置、存储过程的调用和存储过程作为数据窗口数据源的操作方法等内容，使用的RDBMS的Oracle 7.3。
PowerBuilder与Oracle的连接
假定已安装Oracle客户端应用程序。可用Sqlplus或Tnsping等是否能连接到Oracle数据库，确定在SQLNET配置文件中使用的数据库别名(Database Alias，又称服务器名，Server Name)。如有疑问，可在Oracle客户端程序目录下tnsname.ora文件中找到。另外保证搜索路径已包括SQLNET应用程序的安装目录(如C:\ORAWIN95\BIN)。
进入PB的Database Profiles画笔，可看到所有已安装的数据库接口(PB6.0缺省安装的是Oracle 7.3版的接口，如使用低版本的Oracle，需在安装时指定)，选择“O73 Oracle 7.3”，点击“New”按钮，进入Database Profile Setup对话框。在“Connection”页输入下列信息：
Profile Name：为该Database Profile起一个有意义的名称；
Server：TNS:ServerName，其中ServerName为上述数据库别名(服务器名)，如@TNS:ORA73；
Login ID：Oracle数据库中实际的用户名，由于PB初次连接到数据库时要自动建立五个系统表(PowerBuilder Catalog Table;SCATTBL,PBCATCOL,PBCATEDT,PBCATFMT,PBCATVLD,存储表的扩展属性)，因此第一个连接到Oracle的用户必须具有建表、给PUBLIC角色授权等权限。例如可用SYSTEM用户进行第一次连接，此后的连接对用户则无特殊要求；
Password：该用户的口令。
设置上述内容后，即可连上Oracle。为优化数据库连接，还可设置下列选项：
Prompt for Database Information：连接时是否提示用户输入用户名和口令；
Generate Trace：启动DB跟踪工具，跟踪连接；
Thread Safe：开发需要多线程环境支持的分布式应用时，选择该项。缺省为未选，适用于非分布应用；
PBDBMS：与存储过程调用方式有关的参数。Oracle为7.2或更高版本时，清除该选项，此时带IN OUT参数的存储过程可作为数据窗口数据源。7.2版本以下，选择该项，调用PBDBMS.Put－Line建立存储过程的SQL语句，缺省是选中；
Commit on Disconnect：断开连接时，指定提交或回退未提交的事务；
Case Sensitive：连接的Oracle服务器是否区分大小写。注意该项选中时，所有主键、包含主键的表名、外键须全为大写字符。
PowerBuilder Catalog Tables Owner：指定拥有PB系统表的用户，缺省为“SYSTEM”。如果要使用多种显示格式或有效性规则，可以在不同的用户下建立几套系统表；
Table Criteria：指定满足哪些条件的表、视图和同义词可在“Select Tables”对话框中显示出来。例如DEV用户下销售子系统的表都以SALE开头，则可以用SALE％、DEV、“TABLE”、“VIEW”指定只显示DEV用户以SALE开头的表和视图；
Asynchronous：选择该项，可在一个复杂的SQL语句执行过程中，返回第一行结果前，切换到其他操作；
Number of Seconds to Wait：若上一项选中，还可进一步通过该项指定检索数据时，等待数据库响应的时间；
Retrieve Blocking Factor：决定数据窗口对象一次可从数据库取出的记录数；
Number of SQL Staments Cached：PB可将数据窗口对象产生的SQL语句和嵌入式SQL语句保存在SQL语句缓冲区，该参数指定缓冲区为PB保留的SQL语句数目。该数值可由下式计算：SQLCache=服务器OPEN—CURSORS数－5(保留的游标数)－本连接预期使用的最大游标数；
Disable Bind：指定是否将输入变量与SQL语句绑定，此参数影响PB为数据窗口对象生成INSERT语句的方式；
Static Bind：数据窗口对象检索数据前是否检测SELECT语句的合法性；
在Syntax页，还可指定日期、时间的格式等。在Preview页可查看Database Profile设置对应的PowerScript写法。
Oracle存储过程的使用
归纳起来PB6.0中调用Oracle存储过程有以下四种方法。
方法一：以关键字RPCFUNC声明存储过程；
方法二：以DECLARE PROCEDURE语句声明存储过程；
方法三：以动态SQL语句实现；
方法四：调用函数PBDBMS.Put－Line。
一般情况下，方法一能得到较好的运行效率和更完善的功能。因此推荐使用方法一。但是某些类型的存储过程只能使用其他方法。以下重点介绍方法一和方法二。
两种方法比较起来，有以下几点主要区别：
1)方法一适用于具有IN、OUT和IN OUT参数的存储过程，而方法二仅支持IN
PB10连接SQL Server的配置
可能初次使用pb10的朋友无法顺利连接到sql server，一方面没有了mssql server专用接口了，另一方面数据库管理系统(DBMS)换成了“OLE DB”，配置起来有点不顺手！下面就来介绍pb10中用OLE DB连接sql 2000数据库。
在安装pb10的时候选择custom/full方式安装（默认的安装方式不会安装ole db接口），next－》如果你没有安装.net则不要选择列表中的ADO.net....项。一路next完成安装。
在数据库画板中找到OLE microsoft OLE DB项，在其上右键新建一个配置，在弹出的配置窗口中：
profile name：填写配置文件名 //任意即可
provider：选择数据库管理系统类型，这里选择“SQLOLEDB”项
data source：服务器名（和之前的版本不太一样）。可以在下拉列表中选择，也可以填入服务器名或IP地址如：127.0.0.1等。如果上面的provider不是“SQLOLEDB”则此下拉列表中可能没有选项。
user ID：用户名。我的用户名是默认的sa
password：对应上面user ID的密码，我的密码是空的，所以不填。
到这里你就可以顺利的连接到sql server了。但是连接到哪个数据库呢？上面的参数都没有指明，我也找了半天。不要着急，在Extended里填入 “database=数据库名” 就可以了。（不要引号）
最后的配置文件内容为：
// Profile his
SQLCA.DBMS = "OLE DB"
SQLCA.LogId = "sa" //我的用户名是sa
SQLCA.AutoCommit = False
SQLCA.DBParm = "PROVIDER='SQLOLEDB',DATASOURCE='NETMANAGER',PROVIDERSTRING='database=zs'" //我的数据库名是：zs；datasource后面也可以是IP地址：DATASOURCE='127.0.0.1'
至此就完成了pb10下用OLE DB连接sql server的配置！
在PB中使用FoxPro数据库的方法
重庆工业管理学院 蒋波
---- Power Builder 是十分优秀的用于客户/服务器环境信息管理系统开发工具，其优秀之处不仅是因为可以开发基于客户/服务器模式的系统，而且简单、易学，Power Builder 自身是没有数据库管理系统（DBMS）的，它是首先通过不同的驱动程序联接不同的数据库，再通过这种联接，实现对数据的管理。Power Builder同时随盘附带有一个小型的数据库管理系统：SQL Anywhere，所以用户也可以直接开发用于单机的完整的信息管理系统。
---- 本人以前曾开发过基于FoxPro环境下的数据库系统，但FoxPro的编程太麻烦，不但要处理数据的管理，而且还要花大量的精力处理输入、输出的格式等。但有着可视化编程环境的Power Builder却不同，处理输入、输出是件相当简单的事情，于是，本人偿试用Power Builder来管理以前的数据库。 c在Power Builder系统中，使用FoxPro的数据库有两种方法：一是利用ODBC联接FoxPro数据库；另一种方法是将FoxPro的数据库转换到SQL Anywhere的数据格式。
---- 一、 利用ODBC联接FoxPro数据库
---- 在Power Builder中，直接访问FoxPro数据库只能通过ODBC方式。
---- 在开发环境下，可以直接在PowerBar画板上配置ODBC，联接FoxPro数据库，方法如下：
单击Configure ODBC工具钮
在Installed Drivers目录框中选择：Microsoft Foxpro Driver (*.dbf)
单击“Create”按钮
命名数据源名、选择版本
取消“使用当前工作目录”选项
单击选定目录，选择被联接数据库所在的目录
确定退出
---- 通过ODBC方式联接的FoxPro的数据库，一定要满足FoxPro的数据库格式，即数据库文件结构必须是：“32字节文件描述若干个32字节的字段描述 结构描述结束符（0D） 记录1，记录2，…… 文件结束符（1A）”。由此看来，传统的DBF数据库文件均可通过该方式联接。对于Visual FoxPro环境下建立的表（Table），其结构与传统的数据库结构是不同的，它在字段描述结束符（0D）与记录之间加上了二百多个字节的内容，但在未纳入VFP的数据库（Dbc）之前，其内容为“00”，此时仍可以通过这种方式联接，一旦纳入数据库中，该段字节已被填上了其它内容，无法再联接。
---- 在Power Builder应用程序中，使用事务处理对象来联接数据库，这种事务处理对象，即有默认的SQLCA，用户也可以自己生成，以方便访问多个数据库。在程序中使用事务处理对象时，一般必须先指明DBMS、DbParm两个属性，对于FoxPro数据库，还必须指明 Database、 userid、servername、几个属性，这一点是与访问其他类型的数据库不同的地方。
sqlca.dbms="ODBC" // 指定联接方式ODBC
sqlca.database="D:\prg\pubdata" // 指定被联接数据库所在目录
sqlca.userid="public" // 用户识别号，都为 public
sqlca.servername="FOXPRO" // 服务器名：均为FOXPRO
sqlca.dbparm="C" //数据源名
connect using sqlca; // 实施联接
……
---- 通过对FoxPro数据库的联接，用户便可以在Power Builder开发环境下、应用程序中使用这些数据库，快速地开发出自己的信息管理系统，实现对这些数据库的维护与管理。
---- 二、 将DBF文件转换为SQL Anywhere 的DB文件格式
---- 在Power Builder环境下，附带有一个数据库系统——SQL Anywhere，在Power Builder中利用它，用户可以直接建立、维护数据库。在SQL Anywhere中，数据库结构虽然与VFP不同，但概念是一致的，即：数据库是系统中相关的各种数据，这些数据又因不同用途组织成不同的表，这些表共同构成数据库，与传统的数据库（DBF）相类比，PB、VFP中的表即是传统意义的数据库，PB、VFP中的数据库类似于传统的数据库（DBF）文件所在的目录。SQL Anywhere中提供了将传统的DBF文件转换为该系统下的数据库文件（DB）中的表的工具。为了实现这一转换，用户必须先建立一个新的表，再将DBF格式的文件内容导入该表中。
---- 对于DBF文件，必须是传统意义上的数据库，如FoxPro、dBase、FoxBASE环境下的数据库文件。该种数据库文件严格遵循“数据文件==数据库结构+数据库记录”这一格式。其结构如下：“32字节文件描述若干个32字节的字段描述 结构描述结束符（0D） 记录1，记录2，…… 文件结束符（1A）”
03 62 0A 07 02 00 00 00 - 81 00 4C
00 00 00 00 00 // 文件描述：时间、长
00 00 00 00 00 00 00 00 - 00 00 00
00 00 00 00 00 度、记录长、记录数
4E 41 4D 45 00 00 00 00 - 00 00 00
43 01 00 00 00 // 第一个字段：名、类
28 00 00 00 00 00 00 00 - 00 00 00<
F. PB中如何做到SQL数据库的异地备份
原始的备份肯定是要备份在本地的，本地的备份好后再通过ftp等方式发把备份文件传到其他电脑上；
可以用pb调用命令行语句执行相关的ftp语句，或者调用其他的文件传输程序来达到传输的目的。
G. pb中的备份数据库和恢复数据库的代码怎么写
备份：
integer msg
string ls_bardir,ls_path,ls_date,ls_exesql,ls_dbname
//调用API
//CloseBitmapClient(Handle(this))
msg = messagebox("提示","进行数据库备份吗?",Question!,YesNoCancel!,3)
if msg = 2 then
return 0
elseif msg = 3 then
return 1
else
if m_main.m_系统管理.m_数据库备份.enabled = true and m_main.m_系统管理.m_数据库备份.visible = true then
SetPointer(HourGlass!)
//获取备份的数据库名
ls_dbname = ProfileString(gs_profile,"Database","SQLCA.Database","")
//获取备份路径
ls_bardir = ProfileString(gs_profile,"path","backpath","")
if not FileExists(ls_bardir) then
CreateDirectory(ls_bardir)
end if
ls_bardir = ls_bardir + "\"
ls_date = string(today(),"yyyymmddhhmmss")
SQLCA.AutoCommit = true
//设置备份文件名
ls_path = ls_bardir + ls_dbname + ls_date + ".bak"
//建立备份设备
ls_exesql = "EXEC sp_admpdevice 'DISK' " + ",'" + ls_dbname + "'" + "," + "'" + ls_path + "'"
EXECUTE IMMEDIATE :ls_exesql using sqlca;
//备份数据库
ls_exesql = "BACKUP DATABASE " + ls_dbname + " TO " + ls_dbname
EXECUTE IMMEDIATE :ls_exesql using sqlca;
//删除备份设备
ls_exesql = "EXEC sp_dropdevice '" + ls_dbname + "'"
EXECUTE IMMEDIATE :ls_exesql using sqlca;
SQLCA.AutoCommit = false
if sqlca.sqlcode = 0 then
messagebox("数据库备份","数据库备份完成!")
else
messagebox("数据库备份",sqlca.sqlerrtext)
end if
else
messagebox("提示","该用户没有备份数据库的权限!")
return 0
end if
end if
看看代码改一下即可，恢复的话差不多，自己研究研究吧