看看pb中sql为什么没有执行?

john816

新手上路

Rank: 1

帖子：1
精华：0
积分：110
在线：0 小时
注册：2007-4-23

1^# 大中小发表于 2007-4-23 23:34 只看该作者

看看pb中sql为什么没有执行?

我在pb中需要执行sql语句,但程序就是不执行,请各位帮忙看看什么原因?
String ls_sql
dec {2} v1

ls_sql="select count(*) into :v1 from ren"
execute immediate :ls_sql;
If sqlca.sqlcode <> 0 Then
rollback;
MessageBox("错误", sqlca.sqlcode);
else
commit;
MessageBox("成功", sqlca.sqlcode);
End If
如果把into :v1去掉,则执行成功,否则错误,问题在于sqlca.sqlcode都是0

搜索更多相关主题的帖子: sql

TOP

路過

注册会员

Rank: 2

帖子：134
精华：0
积分：1442
威望：7
在线：1 小时
注册：2006-12-15

2^# 大中小发表于 2007-4-26 08:42 只看该作者

要用這個動態語句。
DECLARE my_cursor DYNAMIC CURSOR FOR SQLSA ;

PREPARE SQLSA FROM :mysql ;

OPEN DYNAMIC my_cursor ;

FETCH my_cursor INTO : num;

CLOSE my_cursor ;

TOP

黎明前的黑暗

新手上路

Rank: 1

帖子：16
精华：0
积分：260
在线：0 小时
注册：2007-6-7

3^# 大中小发表于 2007-6-7 15:57 只看该作者

:V1在""内被作为字符串看待.绝对不符合SQL语法,所以一定是错的,
对于PB来说,你这个简单的SELECT语句完全可以直接执行,不必那么麻烦.

TOP

fyh

注册会员

Rank: 2

帖子：52
精华：0
积分：622
威望：1
在线：1 小时
注册：2006-4-5

4^# 大中小发表于 2007-6-9 21:46 只看该作者

select count(*) into :v1 from ren; //sql语句可在PB脚本中执行啊

If sqlca.sqlcode <> 0 Then
rollback;
MessageBox("错误", sqlca.sqlcode)
else
commit;
MessageBox("成功", sqlca.sqlcode)
End If

TOP

langzping

新手上路

Rank: 1

帖子：10
精华：0
积分：200
威望：1
在线：0 小时
注册：2007-6-13

5^# 大中小发表于 2007-6-13 21:34 只看该作者

晕啊，为什么还要 rollabck 和 commit 直接写不就可以了吗

Long ll_count
SELECT count(*) INTO :ll_count FROM ren;
If ll_count > 0 Then
MessageBox('','找到资料',exclamation)
Else
没有
End If

TOP

‹‹ 上一主题 | 下一主题 ››