标题:精典查询!但运行不通啊??虎哥博客原文引用也不成!
取消只看楼主
vfp_yang
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2006-9-5
 问题点数:0 回复次数:0 
精典查询!但运行不通啊??虎哥博客原文引用也不成!



设计表单如上图:
1、数据环境:有一个视图(prtst)、有一个表(dwdm)。
2、combo1的rowsourcetype=field rowsource= dwdm.dwmc

3、过滤按钮的代码是:

schfilter=[.t.]
IF NOT EMPTY(ALLTRIM(THISFORM.combo1.Value))
SchFilter=SchFilter+[.AND. dwmc=']+THISFORM.combo1.VALUE+[']
ENDIF
IF NOT EMPTY(thisform.text1.Value)
SchFilter=SchFilter+[.AND. xm=']+THISFORM.text1.VALUE+[']
ENDIF
IF NOT EMPTY(thisform.text2.Value)
schfilter=schfilter+" and xjh='"+ALLTRIM(thisform.text2.Value)+" '"
ENDIF

SELECT prtst
SET FILTER TO
SET FILTER TO &schfilter
GO top
thisform.Refresh

这种方法查询,在虎哥的博客里也介绍过啊!我的dwdm库里存的是所以学校的名称,但查询结果总是不对的。请fown、虎哥等朋友帮忙诊断一下吧!!!!!

搜索更多相关主题的帖子: 博客 精典 原文 运行 查询 
2006-09-20 15:47



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




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

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