1 PowerBuilder中
WEB应用模块 PowerBuilder中含有开发WEB应用
模块
通过这些模块可以连接WEB服务器和PowerBuilder应用．该模块包括以下及部分,Web.PB:是几个可以在WEB服务器上执行
被服务器激活后
PowerBuilder应用完成客户端任务和对数据库事务操作．Plug_ins(插入件):包括Window plug_in和Datawindow Plug_in此方式可将PowerBuilder对象嵌入到页面中在浏览器端执行PowerBuilder应用．Window Activex: 此方式和Window plug_in类似, 所区别在于该方式可以和HTML中JavaScripts,VBscripts交互．本文主要讨论利用Web.PB开发WEB应用． 2 用Web.PB开发WEB应用
Web.PB本身就是个CGI
它提供了从服务器到PowerBuilder应用访问．所以在Web.PB的上可以利用PowerBuilder强大功能开发复杂WEB应用如采用PowerBuilderPowerScripts语言环境数据窗口技术等．PowerBuilderWEB应用构建前提是分布式应用体系．PowerBuilder客户端应用分布到WEB服务器上可将Web.PB看作为客户端应用．当客户端应用Web.PB被WEB服务器激活后PowerBuilder服务器应用执行在服务器应用中定义思路方法实现业务逻辑. 这种模式是真正
“廋”客户机模式客户端不需要安装其它软件Software只安装浏览器软件Software．所有事务操作都在服务器端完成下面将结合例子详细介绍说明: 利用PowerBuilder开发
个网上购书应用．对于分布式PowerBuilder应用首先应向客户Web.PB指明PowerBuilder服务器应用在网络上位置(Location)其应用名使用文件PBWEB.INI来记录服务器应用信息．在此例中取服务器应用名为TUTORIAL, Driver=Winsock, Application=10099/tcp, Location=Localhost. 建
个数据库(book_dealing)其中有 3个表分别为: “ book”: b_name
b_no b_publisher b_priceb_num “customer”: c_name
c_telc_addr “dealing”: b_name
c_name d_num, d_time 建
个数据窗口dw_book其SQL语法为: SELECT “book”.”b_name”,
“book”.”b_no”,
“book”.”b_publisher”,
“book”.”b_price”,
“book”.”b_num”
FROM “book”
创建PB服务器应用
用户界面
在窗口w_server上有两个按钮cb_1,cb_2再定义个transport类型例子变量mytransportcb_1clicked事件有关如下: ..........
mytransport = create transport
mytransport .driver = “winsock”
mytransport.location = “localhost”
mytransport.application = “10099”
.........
创建
个不可视用户对象u_
ernet定义个transaction类型全局变量mytransaction在该用户对象constructor事件中定义连接到数据库(book_dealing)事务对象mytransaction和连接到数据库(webpb)事务对象sqlca在该对象destructor事件中分别取消这两个事务对象 在u_
ernet上定义两个
分别为f_book, f_book_dealing这两个返回值都为
类型在f_book中利用数据窗口dw_book作数据库查询再利用数据窗口属性将查询结果以HTML形式返回给web.pb有关如下: 
_html datastore dd
dd = create datastore
dd.dataobject = ”dw_book”
dd.
transobject(mytransaction) dd.retrieve
.... .
_html=_html+dd.object.datawindow.data.htmltable ......
_html 在
f_dealing中定义参数分别为:book_name, deal_num, custom_name, deal_time, custom_tel, custom_addr用来接受FORM元素传来信息再利用PowerScripts语言对数据库(book_dealing)进行修改有关如下: _html …………
connection using mytransaction;
insert
o “customer” (“c_name”,
“c_tel”,
“c_addr”)
values( :custom_name, :custom_tel, :custom_addr);
insert
o “dealing” (“b_name”,
”d_num”,
”d_time”,
”c_name”)
value(:book_name, :deal_num, :deal_time, :custom_name);
mytransaction.sqlcacode>0 then _html=”定货成功！” 
_html=”定货失败！” end
………..
_html 主页上
“浏览书库”超连接为: 〈A HERF=”/scripts/pbcgi60.exe/tutorial/u_
ernet/f_book”〉 浏览书库</A> 定书信息页上应有几个单行编辑器,用来录入用户购书信息(例如:书名,用户名,购书数量.,等等)其FORM元素
ACTION为: <form action= “/scripts/pbcgi60.exe/tutorial/u_
ernet/f_book_dealing”method= “get”>以上
可实现简单网上购书功能既用户可浏览书库也可订购所需图书
最新评论