开发数据库的WEB查询

ds_tf.dataobject="d_a01"

ds_tf.SetTransObject(sqlca)

li_rowcount=ds_tf.Retrieve(date,time)

if li_rowcount=0 then

disconnect using sqlca;

return "no record!"

elseif li_rowcount< 0 then

disconnect using sqlca;

Return "retrieve failure!"

end if

ls_html = ds_tf.Object.DataWindow.data.HTMLTable

destroy ds_tf

disconnect using sqlca;

return ls_html

　　七、使用

　　1、在主页中添加如下代码：

< form name="form1" method="post"

action="http://134.65.5.212/scripts/

pbcgi60.exe/internet/u_web_ct1/f_get_2a01?" >

< font size="-3" >< b >< p >日期： < input type="text" name=

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

< p >< b >< font size="-7" >时间: < /font >< font size="-3" >

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

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

< /form >

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

　　八、小结

　　由于POWERBUILDER是专业级的数据库开发工具，可以不受数据库的种类和平台的限制，采用它的WEB.PB技术来进行Internet/Intranet开发，能够将开发者的精力都集中到业务逻辑的实现上，而不是花费大量的时间去考虑和数据库连接的问题。这种基于浏览器/服务器结构的应用优势在于系统的维护简单，几乎所有的工作都集中在WEB服务器上，大大减少了对多个客户端的维护工作。另外，由于能够将运算任务合理地分布在浏览器和服务器之间，整个系统运行的费用也将大大降低。