数据传值
B定义结构体:S_YH_PARM
说明:dw_name(数据窗口名),columnname(列名)
通过数据窗口传递制作新增,修改,保存窗口
1.主窗口刷新代码:
dw_name.settransobject(sqlca)//连接数据库
dw_name.retrieve() //刷新数据窗口
2.主窗口新增按钮代码:
long il_row //定义行变量il_row
s_yh_parm yh_parm
yh_parm.busi=’add’
yh_parm.columnname=’0′
openwithparm(w_name,yh_parm)//打开新增窗口w_name
il_row=0//行变量赋值为0
dw_name.retrieve()//刷新数据窗口
3.主窗口数据显示代码:
long il_row//定义行变量il_row
if row=0 or dw_name.rowcount()<row then return//判断当前行数
dw_name.selectrow(0,false)
dw_name.selectrow(row,true)
il_row=row
4.新增主窗口代码:
s_yh_parm yh_pram
yh_parm=message.powerobjrctparm
dw_name.settransobject(sqlca)//连接数据库
if yh_parm.busi=’add’ then//判断是否为添加状态
dw_name.retrieve(”)//刷新数据窗口
dw_name.insertrow(1)//插入一行
else
dw_name.retrieve(yh_parm.columnname)
end if
5.新增窗口保存按钮代码:
sqlca.autocommit=false//设置数据提交方式为手动
dw_name.update()//更新数据窗口
if sqlca.sqlcode<>0 then //判断数据更新状态
rollback;//回滚数据
messagebox(‘系统提示’,’保存失败!’+sqlca.sqlerrtext)//提示数据保存失败
return//返回窗口
end if//结束
commit;//连接数据库
messagebox(‘系统提示’,‘保存成功!’+sqlca.sqlerrtext)//提示保存成功
dw_name.reset()//刷新数据窗口
dw_name.insertrow(1)//插入一行数据
本文出自:https://www.cnblogs.com/hanhande-cainiao/p/13260547.html
admin:系统自动奖励,+10,