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   mytransaction.sqlcacode>0  then

　　return_html=“定货成功！”

　　else

　　return_html=“定货失败！”

　　endif

　　……………

　　return  return_html

　　主页上的“浏览书库”的超连接为：

　　〈A HERF=“/scripts/pbcgi60.exe/tutorial/u_internet/f_book”〉 浏览书库

　　定书信息页上应有几个单行编辑器，用来录入用户购书信息（例如：书名，用户名，购书数量。，等等）其FORM元素的ACTION为：

　　<FORM&NBSP；&NBSP；ACTION=

　　method= “get”>

　　以上程序可实现简单的网上购书的功能，既用户可浏览书库，也可订购所需的图书。

　　参考文献

　　1 《PowerBuilder  Internet/Intranet 解决方案 》晓通数据库研究与发展中心

　　2 《PowerBuilder  Internet技术详解》肖兵    电子工业出版社

上一页  [1] [2] 

文章转载请注明来源于：汕头自考网