可用分押宝游戏火热进行中...	专题改版：Java Web 专题

一条记录的添加（菜问题）

楼主piml（走人了）2004-08-02 13:53:51 在 PowerBuilder / 基础类提问

小弟建立了个w_1和dw_1
想在控件cb_1中
使编辑好的记录加入数据库、

可是cb_1事件中的代码我不会写啊问题点数：50、回复次数：11Top

1 楼crsit（常乐笑）回复于 2004-08-02 13:59:22 得分 5

insert into tablename(字段1,..) values(:变量1,....);
commit;Top

2 楼luotitan（泰坦）回复于 2004-08-02 14:21:53 得分 0

建议看看书，估计任何一本pb的书籍都能找到你要的答案的。Top

3 楼piml（走人了）回复于 2004-08-02 14:23:44 得分 0

不好意思

我急用来不及找书学习Top

4 楼hwh88888（努力升星中）回复于 2004-08-02 16:18:40 得分 5

dw_1.SetTransObject(Sqlca)
dw_1.InsertRow(0)
If dw_1.Update()=1 Then
Commit;
Else
Rollback;
End IfTop

5 楼hwh88888（努力升星中）回复于 2004-08-02 16:21:46 得分 10

最好在dw_1的constructor事件或w_1的open事件中写
dw_1.SetTransObject(Sqlca)
dw_1.InsertRow(0)
然后在cb_1的click事件里写
If dw_1.Update()=1 Then
Commit;
Else
Rollback;
End IfTop

6 楼zysys（黑色易拉罐）回复于 2004-08-02 16:56:32 得分 5

dw_1.SetTransObject(Sqlca)
dw_1.InsertRow(0)
If dw_1.Update()=1 Then
Commit;
end if
Top

7 楼10975037（猩猩）回复于 2004-08-02 21:51:47 得分 5

分两步，insert 按钮和save 按钮
insert 按钮
dw_1.insertrow(0)
save 按钮

If dw_1.Update()=1 Then
Commit;
else
rollback;
end if

Top

8 楼cxwsoftware（方宇）回复于 2004-08-02 22:56:57 得分 0

一定记住commit;Top

9 楼tonyu（中山小伙子）回复于 2004-08-03 01:37:17 得分 10

1.更新数窗方法：
Dw_1.SetTransObject(SqlCa)
Dw_1.Retrieve()
Dw_1.InsertRow(0)
Dw_1.SetItem(Dw_1.RowCount(),"列名1",值1)
Dw_1.SetItem(Dw_1.RowCount(),"列名2",值2)
.
.
.
If Dw_1.Update() = 1 Then
Commit Using SqlCa;
MessageBox("提示","提交成功！")
Else
RollBack Using SqlCa;
MessageBox("提示","提交失败！",StopSign!)
EndIf

2.SQL更新方法：
Insert Into 数据表名 (字段1,字段2...) Values (值1，值2) Using SqlCa;
If SqlCa.SqlCode = 0 Then
Commit Using SqlCa;
MessageBox("提示","提交成功！")
Else
RollBack Using SqlCa;
MessageBox("提示","提交失败！",StopSign!)
EndIf
Top

10 楼standlyduke（）回复于 2004-08-03 09:48:20 得分 10

在open事件中写dw_1.settransobject(sqlca)
在CB_1的Click事件下写dw_1.insertrow(0)
dw_1.scrolltorow(dw_1.rowcount())
在窗体的closequery或close写
long ll_ask,ll_updateornot
if ll_ask=dw_1.modificount()>1 then
ll_updateornot=dw_1.messagebox('提示','数据已经更新，是否保存？'，question!,okcancel,1)
if ll_updateornot=1 then
if dw_1.update()=1 then
commit using sqlca;
messagebox('提示：','数据保存成功')
else
rollback using sqlca;
messagebox('提示：','数据保存失败：'＋sqlca.sqlerrcode,stopsign!)
end if
end if
return
end if

Top

11 楼freedom2001（天翔）回复于 2004-08-03 11:11:16 得分 0

看书比你这么问来的快Top