| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 363 人关注过本帖
标题:有关“查询”代码的问题
只看楼主 加入收藏
comfortable
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2011-7-7
收藏
 问题点数:0 回复次数:2 
有关“查询”代码的问题
数据库表中有发票起号和发票止号两项,输入中间号码查询信息,以下是我写的“查询”click代码,但执行以后查不出来,麻烦大侠们帮忙修改一下,谢谢
t1=alltrim(thisform.text1.value)
t1=val(t1)
loca for t1>=val(发票起号) and t1<=val(发票止号)
if found()
  sele * from 发票信息 where t1>=val(发票起号) and t1<=val(发票止号) into cursor "temp"
  thisform.grid1.recordsource="temp"
 else
  messagebox("未找到相关记录!",64,"提示")
endif
搜索更多相关主题的帖子: 号码查询 数据库 
2011-07-08 21:17
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
改成下面的方式试试:
t1=val(thisform.text1.value)
sele * from 发票信息 where val(发票起号)>=t1 and val(发票止号)<=t1 into cursor "temp"
if _tally=0
  messagebox("未找到相关记录!",64,"提示")
else
  thisform.grid1.recordsource="temp"
  thisForm.refresh
endif

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2011-07-22 10:55
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
收藏
得分:0 
t1=val(thisform.text1.value)
sele * from 发票信息 where BETWEEN(T1,val(发票起号),val(发票止号) into cursor temp
IF RECCOUNT()>0
    MESSAGEBOX("未找到相关记录!",64,"提示")
ELSE
    thisform.grid1.RecordSourceType = 4
    thisform.grid1.RecordSource = "temp"
    thisForm.refresh
ENDIF

相互学习,互相交流,共同提高。
2011-07-22 13:37
快速回复:有关“查询”代码的问题
数据加载中...
 
   



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

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