标题:单选控件的cheched问题请教
只看楼主
lichenbo
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2006-7-14
 问题点数:0 回复次数:3 
单选控件的cheched问题请教

if rb_1.checked then
select * from company where comptype = '1';
dw_1.settransobject(sqlca)
dw_1.retrieve()
end if
我想实现当rb_1被选中时显示特定的数据记录,我写了这段代码他总提示我
select * from company where comptype = '1';
这句话中有语法错误
error c0031 syntax error

搜索更多相关主题的帖子: cheched 控件 
2006-07-24 19:07
fgypblt
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-6-27
得分:0 

通过dw_1预设或赋予筛选条件。

error:
select * from company where comptype='1';
//select emp_name into :ls_emp_name from employee where .....
如果寻到的值可能不止一个,则考虑用数组配合dw_1定义或参照
本页"【求助] 求助!数据窗口查询的问题!已解决!" 主题内容
使用dw_emp.setsqlselect()


2006-07-25 09:13
潇洒老乌龟
Rank: 5Rank: 5
等 级:贵宾
威 望:18
帖 子:407
专家分:0
注 册:2005-12-13
得分:0 
if rb_1.checked then
select * from company where comptype = '1';
dw_1.settransobject(sqlca)
dw_1.retrieve()
end if

上面的select * from company where comptype = '1';
要用动态数据库完成.



乌龟学堂http://www. 承接各种软件开发、系统集成、网络搭建。 QQ:124030710
2006-07-25 22:06
潇洒老乌龟
Rank: 5Rank: 5
等 级:贵宾
威 望:18
帖 子:407
专家分:0
注 册:2005-12-13
得分:0 

STRING Ls_Sql , Ls_Syntax , Ls_Error

Ls_Error = ""
Ls_Sql = "select * from company where comptype = '1'"
Ls_Syntax = SQLCA.SyntaxFromSql(Ls_Sql , "Style(Type=Grid)" , Ls_Error)
IF LEN(TRIM(Ls_Error)) > 0 THEN
MessageBox("系统提示!" , "语法有错!~r~n~r~n" + Ls_Error)
RETURN
END IF
Ls_Error = ""
//创建数据窗口
dw_1.Create(Ls_Syntax,Ls_Error)
IF LEN(TRIM(Ls_Error)) > 0 THEN
MessageBox("系统提示!" , "创建数据窗口出错!~r~n~r~n" + Ls_Error)
RETURN
END IF


乌龟学堂http://www. 承接各种软件开发、系统集成、网络搭建。 QQ:124030710
2006-07-25 22:07



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-80068-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.709723 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved