为什么相似的代码没有相同的结果?

phoenixsoft 2002-12-13 02:45:37
filterexp='month(fcrq)==thisform.combo1.value'
select cpwxjl
set filter to &filterexp
thisform.pageframe1.page1.grid1.recordsource='cpwxjl'
thisform.pageframe1.page1.grid1.refresh
&&按月查

以上的代码可以查询我要的数据,以下的代码却查不到任何结果
filterexp='year(fcrq)==thisform.combo2.value'
select cpwxjl
set filter to &filterexp
thisform.pageframe1.page1.grid1.recordsource='cpwxjl'
thisform.pageframe1.page1.grid1.refresh
&&按年查


...全文
89 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
phoenixsoft 2002-12-22
  • 打赏
  • 举报
回复
to newfang(方方):
搞定了!
能说说为什么这么做吗?
newfang 2002-12-21
  • 打赏
  • 举报
回复
如果在环境下运行,就在命令窗口中执行:set talk off
如果在程序内运行,就在主程序内写:set talk off
boomit 2002-12-20
  • 打赏
  • 举报
回复
你用什么查询的,,什么地方出现了,是不是电脑显示的问题,总是出吗。。
phoenixsoft 2002-12-20
  • 打赏
  • 举报
回复
有个新问题,各位帮帮忙:
我在表单上放了个pageframe(有四页)和一个查询按钮,每一页都建了一个grid和文本框,我的想法是点击查询按钮后,按我输入的查询条件查询四个表,刷新grid,并将计算结果放在文本框中。
但是为什么每次运行时,文本框出现计算结果的同时,表单上另外一个固定的地方也出现了计算结果,这是怎么回事啊???
boomit 2002-12-13
  • 打赏
  • 举报
回复
这个条件肯定有问题。你可以在命令窗口中调试一下,如:1、查看原库确实有符合条件的记录。2、原来字段经过year()操作是不是取到年,是几位的。3、thisform.combo2.value是不是和2中的位数相同,有没有空格,如有应该用allt()清除。。4、再试试。。。
phoenixsoft 2002-12-13
  • 打赏
  • 举报
回复
select cpxh,yhdw,sl;
from cpwxjl;
where year(cpwxjl.fcrq)==thisform.combo2.value
into cursor yue
thisform.pageframe1.page1.grid1.recordsource='yue'
thisform.refresh

而且我把代码改成上面这样后,不仅表格框没有结果,还弹出临时表yue的浏览框,不过没有数据,能不能解释一下是怎么回事?
szjhxu 2002-12-13
  • 打赏
  • 举报
回复
注意你的年份是四位的还是两位的。

2,749

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧