| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1319 人关注过本帖
标题:查询结果不能看“下一个”
只看楼主 加入收藏
玲子
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2006-8-24
收藏
 问题点数:0 回复次数:11 
查询结果不能看“下一个”

我把几个字段拖到了表单上,然后自己做了几个按钮,有:第一个,上一个,下一个,最后一个 。 然后用了一个text1
来输入查询,我的下一个的代码是:
skip
if eof()
messagebox(......)
skip-1
this.parent.command3.enalbed=.f.
this.parent.command4.enalbed=.f.
else
this.parent.command3.enalbed=.f.
this.parent.command4.enalbed=.f.
endif
this.parent.command1.enalbed=.f.
this.parent.command2.enalbed=.f.
thisform.refresh
这段代码可以运行的 一般书上都有写的
下面的利用输入的text1里的内容查询的按钮代码:
mm=trim(thisform.text1.value)
if empty(mm)
message(......)
thisform.text1.setfocus
return
endif
select ttt && ttt是一个表 里面有学号 姓名 分数等字段
locate for 学号=mm
if found()
select 姓名,学号,分数from ttt where 学号=mm into cursor cur
。。。。。。后面的都不重要了
到这里 我可以实现把查找的 记录放到表单的各个字段text里 但是有些查到有多个记录的
我点击“下一个” 就出错了 报错说“这已经是最后一个记录了” 但是我查询到的明明有好多
不是哪里出问题了?

搜索更多相关主题的帖子: 下一个 结果 查询 
2006-08-31 19:40
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
SET FILTER TO 条件

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2006-08-31 21:06
玲子
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2006-8-24
收藏
得分:0 
在哪里加这句?

2006-08-31 22:59
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
mm=trim(thisform.text1.value)
if empty(mm)
message(......)
thisform.text1.setfocus
return
endif
select ttt && ttt是一个表 里面有学号 姓名 分数等字段
SET FILTER TO mm$学号
GO TOP

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2006-08-31 23:08
lndsqfyq
Rank: 1
等 级:新手上路
帖 子:232
专家分:0
注 册:2006-1-16
收藏
得分:0 
如果用loca的话那么配对的应该用continue
也就是说你在下一条中得用continue但这种用法不好,我建议你还是用select 建立临时表能方便一些。

2006-09-01 08:31
啸凡
Rank: 8Rank: 8
等 级:贵宾
威 望:45
帖 子:1356
专家分:885
注 册:2006-2-22
收藏
得分:0 

locate for 条件:查找一个符合条件的记录
SET FILTER TO 条件:筛选出符合条件的所的记录


两人行已有我师……
2006-09-01 08:45
oopp
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2006-8-11
收藏
得分:0 
以下是引用啸凡在2006-9-1 8:45:23的发言:

locate for 条件:查找一个符合条件的记录
SET FILTER TO 条件:筛选出符合条件的所的记录

查找结束,在退出时后记住要加句
SET FILTER TO
要不就只能看附合条件的记录了,我前天试过这样,运行完后,退出,忘了要显示全部记录了
浏览下数据表,只有几条同样条件的记录,挺郁闷的,后来知道啦。哈哈

2006-09-01 10:29
啸凡
Rank: 8Rank: 8
等 级:贵宾
威 望:45
帖 子:1356
专家分:885
注 册:2006-2-22
收藏
得分:0 
是啊,VFP表具有“记忆”功能,一般情况下是默认Brows Last

两人行已有我师……
2006-09-01 10:34
玲子
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2006-8-24
收藏
得分:0 
我是把表的字段拖到了表单上啊 都是text框 不是grid浏览
用了tiger 大哥的方法还是不行啊

2006-09-01 12:18
wzxc
Rank: 9Rank: 9Rank: 9
来 自:齐鲁大地
等 级:贵宾
威 望:39
帖 子:985
专家分:1296
注 册:2006-4-25
收藏
得分:0 
改:
select ttt && ttt是一个表 里面有学号 姓名 分数等字段
SET FILTER TO 学号=mm
GO TOP

*** locate for 学号=mm
*** if found()
*** select 姓名,学号,分数from ttt where 学号=mm into cursor cur
***。。。。。。后面的都不重要了
在关闭表前,
SET FILTER TO
注释部分不要了。
问题就出在select 上。
不知道你生成这个临时表干吗?
大老虎的答案是正确的。

[此贴子已经被作者于2006-9-1 13:31:34编辑过]


认真看书学习,弄通Fox主义。
2006-09-01 13:26
快速回复:查询结果不能看“下一个”
数据加载中...
 
   



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

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