个绝对实用技巧用pb建立b

1、用 PB 建立B-S 结构应用程序（：独孤求败 2003-05-27）摘要：本文主要论述 PB 实现 Browser/Server 结构的种重要模块的数据流程进行论述，最后给出实例。ernet 解决方案和工作方式，对实现该方式的几PB 实现“Web 浏览器-数据库服务器”方案的前提条件是构建分布式应用体系。将 PB 应用分布到ernet结构下，也就是把 PB 客户端应用分布到 Web 服务器上，当浏览器客户端向 Web 服务器发出服务请求时，Web 服务器自动调用 PB 应用系统, 从而实现各种业务的ernet 结构功能。一、组成 Browser/Server 结构的模块结构。由上图所示， 用

2、 PB 开发的各种基于ernet 的应用，是利用 PB 提供的分布式应用技术及erScripts 编程技术来实现的，相当于编写分布式应用环境下的服务器应用。例如采用erScripts 语言环境、数据窗术等。其制作流程及工作原理是:1、建立及配置 Web 服务器。PB 中自带 OReilly 公司基于 WindowsNT 3.51 以上版本和 Win 95/98 平台的 32 位多线程个人 Web 服务器 WebSite 1.1 版。该 Web 服务器提供了完整的Web 服务创建、管理环境和安全机制。2、在 Web 服务器上建立可执行程序(Web.Pb)。Web.pb(Pbcgi60.exe)程

3、序主要功能是调用 PB 应用服务器中预置的处理程序，包括分析执行用户对象中的用户函数,反馈HTML 控制流和生成解释件程序等。Web.PB 是用来开发基于Web 应用的基本，该本身就是Web 上的一个网关应用程序。该工具提供从 Web 服务器到 PB 应用服务器的，允许用户在ernet 以及ranet 下，通过 Web 对数据库进行近于完全的。同时，通过 Web.PB，动态创建 HTML 文档亦成为可能。Web.PB 程序是Web 服务器和 PB 应用服务器相连接的桥梁。使用Web.PB 构建 Web 应用有如下优点：a、支持 CGI、ISAPI、NSAPI、MSAPI 等多种网关程序接口。b

4、、支持 PB 中数据窗口的。c、易于将以前编写的 PB 应用移植到 Web 环境下。d、易于创建嵌入 PB 应用程序的 HTML 文件，应用服务器在运行环境下，将根据用户需求， 动态生成 HTML 语法，发布完全动态的信息。e、支持数据库连接。PB 所能够连接到的数据库都可以被浏览器用户通过 PB 完整地结合起来。到，使得 Web 服务与数据库服务3、建立 PB 应用服务器。PB 应用服务器主要是一些用于激活 PB 业务应用的类库程序组成。创建上图所示的 PB 应用服务器时，须PB Web 类库，类库中定义了五种定制的类用户对象，封装了创建HTML 语法及事务管理所需的函数、结构和实例等多种实

5、体，可用来创建 HTML 语法、管理客户浏览器连接的状态等。PB 应用服务器相当于分布式应用中客户端应用，用于向 PB 业务应用发出调用请求。执行方法是：当 PB 应用服务器到Web.PB 的请求后，则启动 PB 应用服务器中已预定义的业务处理程序。例如，当用户在浏览器端使用Web 浏览器(IE 或etsc)浏览页面时，通过在 HTML 页面中嵌入的 或元素，Web 服务器可自动激活 Web.PB 应用。活动的Web 服务器首先调用 PB 的 Web.PB 类程序，作为 PB 分布式应用中的客户端应用，建立与 PB 应用服务器的连接,然后调用 PB 应用服务器中定义的各个业务功能，也就是用户自

6、定义对象中封装的用户函数,包括数据库和文件处理等数据处理功能。4、建立 PB 业务应用程序。在用户自定义对象中，创建用户自定义函数。功能要求是根据浏览器端用户的需求，进行业务数据处理，把处理结果以 HTML 页格式，反馈给 web.pb 程序，经常用于人事管理、信息数据处理和系统管理等业务工作。务管PB 业务应用程序有件(Plug_ins)和嵌入 HTML 文件两种风格。Plug-ins(件)的使用方法又分成Window plug-ins 和 Datawindow plug-ins 两种。Window plug-ins件编制业务程序的的方法是 : 在HTML 页面上，嵌入并显示 PB 中 Ch

7、ild 类型的窗口对象，可放置数据窗口(DataWindow)、树状浏览(TreeView)、Tab 页等丰富多彩的控件类型， 丰富 HTML 页面的表现形式。当客户端用浏览器浏览页面时，Web 服务器将 PSR 文件或PBD 文件卸载给客户,客户浏览器接收到 PSR 文件和PBD 文件,将 Child 窗口对象嵌入在 Web 页面中，如果嵌入的是窗口对象，则窗口上定义的功能在浏览器环境下同样能使用，如窗口上定义了数据库的功能，则在浏览器客户端能直接连接数据库。Plug-ins 起到了将 PB 对象嵌入到页面中的作用，数据窗口具有丰富的显示风格，用户比较欢迎浏览器上“PB Child 类数据窗

8、口”的数据表现形式。Window ActiveX 的使用方法与Window plug-ins 类似，用来在 HTML 页面中嵌入并显示 PB 中 Child 类型的窗口对象。该组件可以和HTML 中的 VBScripts 和 javascripts 交互使用。单纯嵌入 HTML 文件的方法是流行的编程趋势， 也就是说根本不用件产品,客户端只需安装常规的 Web 浏览器，便能实现真正“瘦”的 Browser/Cnt/Server 结构体系。总之，PB 应用服务器将业务处理程序的执行结果以 HTML 格式返回给 Web 服务器。Web 服务器再将 HTML发布给用户,客户浏览器端在浏览器上接收到结

9、果。二、简单的ernet 应用实例1、选用Web 服务器，配置Web.pb 程序。Web 服务器种类很多，在此选用 Websuit1.1 服务器，其它种类的Web 服务器类似。Web.pb 程序包括pbcgi60.exe、psisa60.dll、pbnsl60.dll、pbns260.dll、webbagent.dll 和pbweb.ini 等文件。 注意：设置目录/scripts/为 c: website cgi-shl；将上述 Web.pb 文件到/scripts/目录下；将 pbweb.ini 文件拷贝到 WINDOWS NT 或 WINDOWS 95 的系统目录下；在 webpb.in

10、i 文件中加入以下内容：pb60driver=winsockapplication=10082location=202.201.208.62、在 PB 开发上，选取ernet 选项，创建 PB 应用服务器。技术要点是：建立ernet 应用，加入 webpb.pbl 类库文件并作启动服务器的，内容是：transport.mytransportmytransport=create transportmytransport=winsockmy transport.location=202.201.208.6/PB 应用服务器地址mytransport.application=10082/服务端myt

11、ransport.listen()/启动服务return3、设置业务数据库服务器和 sybase SQL Anywhere 本地库wedpb.db 的连接。其务数据存放到数据库服务器，例如:SQL6.5、Sybase 11、Informix 、Ingres 和 DB2 等类型的数据库；本地库 webpb.db 中，只存放 PB 应用服务器的控制信息。4、创建用户对象，并为该用户对象编写处理。例如：创建用户对象ur,并给 constructor 事件编写如下：mytranion=create tranionmytranion.dbms=ODBCmytranion.dbparm=Connectst

12、ring=DSN=WebPbConnectusing mytranion;if mytranion.sqlcode0 thenmessagebox(mytranion.error=+string(mytranion. &sql_dbcode)，mytranion.sqlerrtext)end ifsqlca.dbms=MSS (Msoft) SQL Server 6.5sqlca.DataBase=xywsqlca.Userid=sasqlca.ServerName=Serversqlca.logid=saConnect using sqlca;if sqlca.sqlcode0 thenme

13、ssagebox(sqlca.error=+string(sqlca.sql_dbcode)，sqlca.sqlerrtext)end if给 destructor 事件编写如下：disconnect using mytraniondisconnect using sqlca目的是：当Web.pb 调用 PB 服务器时，用户对象自动先建立与数据库的连接，调用结束后断开连接。、编写用户自定义函数，各种业务工作的数据处理都由该类函数来完成。例如,在用户对象 UR 上,创建一查询功能的函数fp()，其内容是：string return_htmllong iidatastore data_fpdata_fp=create datastoredata_fp.dataobject=dw_fp/dw_fp 为已经做好的查询数据窗口data_fp.settransobject(mytranion)ii=date_fp.retrieve()/检索到的数存入变量 iiif ii=1 thenreturn_html+=data_fp.objec