752
社区成员
发帖
与我相关
我的任务
分享程序界面提取数据库中数据问题？
我做了一个界面为了提取数据库中信息，数据库已经连接成功：
// Profile fp
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=fp;UID=ta;PWD=ta'"
connect using sqlca;
现在我的界面上有一个sle_1控件，我想通过一个button让其显示数据库中某条信息。
SQL比如：select netamt from transmedia where transid = '201003010005'
cb_1的clicked事件我怎么写呢？
// Profile fp
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=fp;UID=ta;PWD=ta'"
connect using sqlca;
现在我的界面上有一个sle_1控件，我想通过一个button让其显示数据库中某条信息。
SQL比如：select netamt from transmedia where transid = '201003010005'
cb_1的clicked事件我怎么写呢？
...全文
请发表友善的回复…
发表回复
fengkoulangjian 2010-03-02
- 打赏
- 举报
谢谢谢谢
结贴喽~
结贴喽~
flashixj61 2010-03-02
- 打赏
- 举报
接
分
啦。。。。。。
分
啦。。。。。。
jlwei888 2010-03-02
- 打赏
- 举报
在执行insert update操作之后，
if sqlca.sqlcode=0 then
commit;
messagebox('','成功')
else
messagebox('','失败')
rollback;
end if
if sqlca.sqlcode=0 then
commit;
messagebox('','成功')
else
messagebox('','失败')
rollback;
end if
fengkoulangjian 2010-03-02
- 打赏
- 举报
谢谢，那要是button实现
update from transheader set usrid = '9999' where transid = '201003010005'
修改呢？
update from transheader set usrid = '9999' where transid = '201003010005'
修改呢？
fengkoulangjian 2010-03-02
- 打赏
- 举报
我的书上木有，嘿嘿~
jlwei888 2010-03-02
- 打赏
- 举报
书上都有！
string s
select netamt into :s from transmedia where transid = '201003010005';
sle_1.text = s
string s
select netamt into :s from transmedia where transid = '201003010005';
sle_1.text = s
