利用PowerBuilder开发WEB应用

【本文由PB创新网为您整理】
利用PowerBuilder开发WEB应用

发布时间： 2004-04-10 作者：唐晓波 龚晶

摘 要   介绍了几种PowerBuiler开发WEB应用的几种方法,分析其原理和  



结构,并给出了用WEB.PB开发简单的网上应用的实例.







关键词   WEB应用; CGI; 分布式应用







Abstract   The methods of developing web application using powerbuiler and the



structure of that are introduced. An example of shopping in Internet developed using



web.pb is given.



１ 引言

随着计算机网络技术的日趋成熟,Internet的发展迅速,Internet应用开发将是现在和将来信息系统开发的主要技术方向之一。PowerBuilder是Sybase公司推出的用于企业级应用的开发工具，该工具不仅具有Client/Server应用的各种先进技术，还提供了基于浏览器/服务器的应用开发模式．



２　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应用．



３　利用Web.PB开发WEB应用

Web.PB本身就是一个CGI程序，它提供了从服务器到PowerBuilder应用的访问．所以在Web.PB之上，可以利用PowerBuilder的强大功能开发复杂的WEB应用，如采用PowerBuilder的PowerScripts语言环境，数据窗口技术等．PowerBuilder的WEB应用构建前提是分布式应用体系．PowerBuilder的客户端应用分布到WEB服务器上，可将Web.PB看作为客户端应用．当客户端应用Web.PB被WEB服务器激活后，调用PowerBuilder的服务器应用，执行在服务器应用中定义的方法，实现业务逻辑，如下图所示：













这种模式是真正的“廋”客户机模式，客户端不需要安装其它软件，只安装浏览器软件．所有的事务操作都在服务器端完成，下面将结合实例详细说明：



利用PowerBuilder开发一个网上购书应用．对于分布式PowerBuilder应用，首先应向客户Web.PB指明PowerBuilder服务器应用在网络上的位置（Location），其应用名，使用文件PBWEB.INI来记录服务器应用信息．在此例中，取服务器应用名为TUTORIAL, Driver=Winsock, Application=10099/tcp, Location=Localhost.



建一个数据库（book_dealing）其中有三个表，分别为：



“ book”： b_name， b_no， b_publisher， b_price，b_num



“customer”： c_name， c_tel，c_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类型的实例变量mytransport，cb_1的clicked事件有关程序如下：



  ..........



mytransport = create transport



mytransport .driver = “winsock”



mytransport.location = “localhost”



mytransport.application = “10099”



  .........







创建一个不可视的用户对象u_internet，定义一个transaction类型的全局变量mytransaction，在该用户对象的constructor事件中定义连接到数据库(book_dealing)的事务对象mytransaction和连接到数据库(webpb)的事务对象sqlca，在该对象的destructor事件中分别取消这两个事务对象。



在u_internet上定义两个函数分别为f_book, f_book_dealing，这两个函数的返回值都为字符类型。在f_book中，利用数据窗口dw_book作数据库查询，再利用数据窗口的属性将查询结果以HTML形式返回给web.pb，有关程序如下：



string return_html



datastore dd



dd = create datastore



dd.dataobject = ”dw_book”



dd.settransobject(mytransaction)



dd.retrieve()



  .... .



return_html=return_html+dd.object.datawindow.data.htmltable



......



return   return_html







在函数f_dealing中，定义参数分别为：book_name, deal_num, custom_name, deal_time, custom_tel, custom_addr，用来接受FORM元素传来的信息。再利用PowerScripts语言对数据库（book_dealing）进行修改。有关程序如下：



string   return_html







  …………



connection using mytransaction;



insert into “customer”



      (“c_name”,



        “c_tel”,



        “c_addr”)



values( :custom_name, :custom_tel, :custom_addr);



insert   into “dealing”



      (“b_name”,



      ”d_num”,



      ”d_time”,



      ”c_name”)



value(:book_name, :deal_num, :deal_time, :custom_name);



   



if   mytran

[1] [2]  下一页