pb中利用窗口修改数据

来源:百度知道 编辑:UC知道 时间:2024/06/20 15:20:44
现用pb做了一个窗口w_1,上有dw_1,sle_1,cb_1,cb_2。dw_1对应数据库表为d_emp(员工表),先点击cb_1查询出相关数据.现在要通过点击cb_2修改所有查出记录中某个字段gz(工资),改为sle_1中输入的值,请问cb_2以及相关控件代码如何写?高手指点!!!急!!!!
我是想修改查询出来的记录,再问一下,badboy4539,我用你给的代码,但点cb_2时,按钮沉下去了好像没反映了。进去查了一下记录没有修改。这是怎么回事啊!我是oracle数据库,是不是差了where条件?
找到问题原因了,是差了where条件,当然我没跟你讲先前有个条件的输入框sle_1,是录入员工工号的。

你是把查询出来的记录的所有gz这个字段的值修改成一样的吗?还是点击某一条记录后修改相应的工资啊?
(1)全部修改
double ld_gz
ld_gz=double(sle_1.text)
update d_emp set gz=:ld_gz using sqlca ;
if sqlca.sqlcode<> 0 thrn
messagebox('提示','数据修改失败!')
rollback using sqlca;
else
messagebox('提示','数据修改成功!')
commit using sqlca;
end if

(2)选中某一条进行修改
long ll_row
double ld_gz
ld_gz=double(sle_1.text)
ll_row=dw_1.getrow()
dw_1.object.gz[ll_row]=ld_gz
if dw_1.update=1 then
messagebox('提示','数据修改成功!')
else
messagebox('提示','数据修改失败!')
end if

希望能对你有所帮助!