请总结下Powerbuilder开发应用窗口程序的概要步骤。

1、建立数据库

2、使用PB建带行困立工作空间PBW，目标文件PBT，库文件PBL。如果应用比较大，建立多个库文件以分门别类存储不同类别的对象。

3、使用PB建立DB

Profile以连接数据库。

4、开发应用、运行、调试。

5、建立资源文件PBR，将应用源文件编译成可执行文件EXE。

6、将应用程序正常运行必要的带历文件（如PBVM##.DLL、PBDWE##.DLL等）拷贝到应用程序所在的目录中。将所有程序在没有PB的环境下运行，查看是否正常！

7、如果需要，可以制作电子说明书(CHM或HLP)

8、如果需要，可将所有蠢念文件(除源文件外)制作成SETUP安装包。发布！

三 实例

先看如下两个图 图二表示DTS端 图三表示Client端 其中DTS已经建立了与数据库服务器的连接 数据窗口中显示的是所有的数据 Client并没有数据库接口 而是通过DTS间接的访问数据 在数据宽悔窗口中显示的是所有男性职工

图(二)

图(三)

该程序的大部分源代码如下

DTS端

首先定义一个全局变量 Transport mytrans

在 开始监听 按钮中输入如下代码

long ll

mytrans=create transport

mytrans driver= winsock

mytrans application= //端口号

mytrans location= //本地服务器

ll=mytrans listen() //开始监听

if ll<>then

messagebox(string(mytrans errcode) mytrans errtext)

return

end if

server settranspool( ) //设置连接缓冲 注意 server 为应用的名称

this text= 正在监听中

this enabled=false

在 结束监听 按钮中输入如下慎李正代码

mytrans stoplistening() //结束监听

destroy mytrans

cb_ text= 开始监听

cb_ enabled=true

建立一个NVO

利用PB的User Objects画板建立一个classàcustom的用户对象 建立用扰派户对象函数nvoretrieve(ref blob buffer string filter) returns long 函数体如下

long ll

SQLCA DBMS = ODBC

SQLCA AutoCommit = False

SQLCA DBParm = Connectstring= DSN=person

connect//建立与数据库的连接

datastore datastore_buffer

datastore_buffer=create datastore

datastore_buffer dataobject= dw_person //dw_person是一个数据窗口

datastore_buffer settransobject(sqlca)

datastore_buffer retrieve()

datastore_buffer setfilter(filter)

datastore_buffer filter()

ll=datastore_buffer getfullstate(buffer) //函数getfullstate()和setfullstate()常用于分布式应用程序

disconnect

return ll

建立NVO的代理对象

在用户对象上点鼠标右健 选择 Set Proxy Name 输入 NVO_dw 保存用户对象

打开Library画板 将 NVO_dw 输出为文件 以便在客户端导入该代理

Client端

打开Library画板 将刚才输出的文件导入

定义两个全局变量

connection myconn

nvo_dw proxy_dw

在 连接 按钮中输入如下代码

long ll

myconn=create connection

myconn driver= winsock

myconn application= //必须和DTS端的端口号一致

myconn location= //DTS的IP地址

ll=myconn connecttoserver() //建立连接

if ll<>then

messagebox(string(myconn errcode) myconn errtext)

return

end if

this text= 正在连接中

this enabled=false

cb_ enabled=true

cb_ enabled=true

在 断开 按钮中输入如下代码

myconn disconnectserver() //断开连接

destroy myconn

cb_ enabled=true

cb_ text= 连接

cb_ enabled=false

this enabled=false

在 查询 按钮中输入如下代码

long result

blob buffer

myconn createinstance(proxy_dw) //建立代理对象

result=proxy_dw nvoretrieve(buffer sex= 男 ) //检索所有男性职工

result=dw_ setfullstate(buffer) //dw_ 是一个数据窗口控件

四 小结及注意事项

以上程序在WINDOWS PB 环境中调试通过 在客户数量很多 数据量很大的情况下 查询的速度会快很多

编程时注意 如果NVO的函数体发生变化 则无须重新生成代理 如果NVO的函数接口发生变化 则必须重新生成它的代理并将它输入到客户端中

lishixinzhi/Article/program/SQL/201311/16219

推荐以这么一个流程学习PB。

1、《例说PB软件项目开发》。里面怎么说你就怎么做，先不管里面是什么意思。

2、《powerbuilder 9.0程序设计一周通》。详细了解PB的所有控件信息及使用方法。

3、《pb函数详解》，详细学习常用的PB函数。

我学PB9.0花了不到一个月时间，PB是一启谈个上手非常快的编辑工具，只要对SQL语句有认识，学起来绝对亩旁判不是迅改难事。

---