利用PowerBuilder开发WEB应用论文 第3页
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