知识大全利用POWERBUILDER开发数据库的WEB查询

Posted 2022-07-16 知

篇首语：业无高卑志当坚，男儿有求安得闲？本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全利用POWERBUILDER开发数据库的WEB查询相关的知识，希望对你有一定的参考价值。

利用POWERBUILDER开发数据库的WEB查询 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　一 WEB PB的工作原理

　　POWERBUILDER对分布式计算的支持使得它能够通过INTERNET/INTRANET来调用远程对象服务通过WEB PB 可以将POWERBILDER的分布式计算能力扩展到WWW网中 WEB PB允许服务器动态地将内容转换成HTML传送到客户端的浏览器中当一个HTML文档调用了一个远程对象的方法或者函数时 WEB PB将请求结果传送给POWERBUILDER的服务应用由POWERBUILDER的服务应用执行相应的代码并将结果返回给浏览器这就是WEB PB的工作原理它实际上是通过网关接口(CGI)来调用PB应用服务的在HTML中有两个标签可以用来调用PB的应用服务窗体< FORM >和锚点< A > 前者是在窗体命令中激活一个PB应用后者是通过调用超链接来指向PB应用的

　　二系统的运行环境

　　合肥市电信局网管中心目前运行的电话网网管系统有本地网集中监控和维护系统和长途网管系统其中本地网网管系统采用安徽省自行开发的一套系统服务器为ALPHA 小型机操作系统为Digital Unix 长途网管采用邮电部电信总局统一开发的ROMA系统操作系统为SCO UNIX 数据库均为SYBASE SQL SERVER 我们另外采用了一台IBM Netfinity 作为WEB服务器采用Microsoft Windows NT 为操作系统 IIS 提供WWW服务在安装POWERBUILDER 时选择自定义安装然后选择Internet Tools中的WEB PB选项即可

　　三配置IIS服务器

　　Microsoft Internet Information Server(IIS)的主目录下有一个子目录\\scrips 这是IIS用来存放CGI程序的目录如果需要使用标准CGI程序则将\\PB \\IT\\BIN\\PBCGI EXE复制到这个目录下即可如果使用ISAPI接口则需要复制的文件是pbisa dll

　　但是为了保证服务能正常运行还必须自行查看IIS服务的目录映像表其步骤如下

　　确定IIS已经安装且运行正常

　　运行Internet Service Manager程序

　　选择需要安装配置的Web服务(IIS支持多种服务并能够对多台计算机的服务进行管理)

　　从菜单条中选择属性菜单下的服务属性菜单项

　　选择Directories页

　　确定有一个别名为/scripts/的目录项(别名即虚拟目录名)

　　选择/scripts/ 并单击Properties按钮

　　确定Execute是在Access组中唯一被选中的项目(在这个目录中不允许客户机执行读写操作)

　　如果对属性作了修改选择OK进行保存

　　如果没有/scripts目录可以添加一个

　　四编辑hosts 和 services 文件

　　采用任何一个文本编辑器编辑这两个文件通常hosts文件在c:\\winnt\\system \\driver\\etc目录下添加下面一行:

　　 HFSA

　　其中HFSA为主机名为IP地址

　　在c:\\winnt\\services文件中添加下面一行

　　myapp /tcp

　　这一行的意义在于将所创立的PB服务添加到Windows的服务注册文件中使用TCP/IP协议的应用程序都需要使用一个端口服务应用程序将在这个端口布置一个监听程序这个程序能够捕捉到任何发送到这个端口的请求并将请求输送到应用程序中比如 HTTP协议协议使用端口 FTP采用TCP的端口这里指定myapp 使用TCP的端口获取一个可用端口的方法是把上一行的端口号加即可

　　五查询目标

　　SQL SERVER名: HFWG _SYB

　　数据库名 exsydb

　　表名和表结构 s _a

　　字段名数据类型长度字段意义

　　Ofcnamechar 局名

　　Dateint 日期

　　Timesmallint 时间

　　Namechar 路由名称

　　NcitInt 电路数

　　Ncctfloat 可用电路数

　　Pegsint 呼叫次数

　　SeizInt 占用次数

　　Succint 成功次数

　　AnswInt 应答次数

　　Serlfloat 占用话务量

　　Rerlfloat 通话话务量

　　Retriesint 中继重选次数

　　no_answint 久叫不应次数

　　cong_dist int 对端拥塞次数

　　ls_busyint 对端市话忙次数

　　ts_busyint 对端长话忙次数

　　要求在浏览器中输入日期和时间对表s _a 查询并在网页中反映出结果

　　六创建Powerbuilder应用程序

　　新建一个应用(myapp)

　　新建一个窗口(w_ ) 定义一个instance 变量(i_server_transport)

　　单击应用画板中的script按钮为myapp应用的open事件编写代码如下

　　open(w_ )

　　打开窗口w_ 为它的open事件编写代码如下

　　int li_ListenReturnCode

　　/*创建传输对象并设置其属性*/

　　i_server_transport = CREATE transport

　　i_server_transport driver= winsock //采用TCP/IP协议

　　i_server_transport application= myapp //应用名称

　　i_server_transport location= HFSA //本地连接

　　/*监听客户并返回状态值*/

　　li_ListenReturnCode= i_server_transport Listen()

　　if(li_ListenReturnCode< > ) then

　　MessageBox( 服务器监听出错 &

　　服务器不能正常进行监听 ~r~n~r~n +&

　　请确保当前TCP/IP服务不能被其它埠占据以及 +&

　　 myapp /tcp stopsign!)

　　Halt

　　Endif

　　为w_ 的close事件编写代码如下:

　　i_server_transport stopListening() //停止在埠的监听

　　DESTORY i_server_transport //从内存中清除传输对象

　　close(parent)

　　创建一个datawindow(d_zy) 查询条件为日期时间这是POWERBUILDER的特色之一这里就不作详细解释

　　定义一个用户对象u_web_ct 并定义一个UserObject Function f_get_ a (integer date integer time) return string

　　其代码如下

　　datastore ds_tf

　　string ls_

　　int li_rowcount

　　//连接数据库

　　sqlca DBMS= SYC Sybase System CTLIB

　　sqlca Database= exsydb

　　sqlca UserId= sa

　　sqlca Dbpass=

　　sqlca LogPass=

　　sqlca ServerName= HFWG _SYB

　　sqlca LogId= sa

　　sqlca DbParm=

　　connect using sqlca;

　　if sqlca sqlcode < > then

　　Messagebox( connect error )

　　end if

　　ds_tf = create datastore

　　ds_tf dataobject= d_a

　　ds_tf SetTransObject(sqlca)

　　li_rowcount=ds_tf Retrieve(date time)

　　if li_rowcount= then

　　disconnect using sqlca;

　　return no record!

　　elseif li_rowcount< then

　　disconnect using sqlca;

　　Return retrieve failure!

　　end if

　　ls_ = ds_tf Object DataWindow data HTMLTable

　　destroy ds_tf

　　disconnect using sqlca;

　　return ls_

　　七使用

　　在主页中添加如下代码

　　< form name= form method= post

　　action= // /scripts/

　　pbcgi exe/internet/u_web_ct /f_get_ a ? >

　　< font size= >< b >< p >日期 < input type= text name=

　　 date size= > < /b >< /font >< /p >

　　< p >< b >< font size= >时间: < /font >< font size= >

　　< input type= text name= time size= > < /font >< /b >< /p >

　　< p >< input type= submit name= Submit value= Submit > < /p >

　　< /form >

　　运行myapp应用启动浏览器输入日期和时间结果如下:

　　八小结

cha138/Article/program/SQL/201311/16361

知识大全 利用POWERBUILDER开发数据库的WEB查询

知识大全利用POWERBUILDER开发数据库的WEB查询