CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
花落谁家,你作主! 盛大widget设计大赛英雄榜
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  Delphi >  数据库相关

急,菜鸟求助,高手帮帮忙啊~~

楼主redsea317(水纹)2005-06-04 13:27:47 在 Delphi / 数据库相关 提问

pm:=ADOQuery1.Fields[i].AsVariant;  
                                          name:=ADOQuery1.Fields[i].FieldName;//保存下当前列的名字和值  
                                          self.ADOQuery2.Active:=false;  
   
                                          if   self.RadioButton2.Checked=True   then  
                                              self.ADOQuery2.SQL.Text:='select   *   from   女子七项成绩   where   :han>:lin'  
                                          else  
                                              self.ADOQuery2.SQL.Text:='select   *   from   男子十项成绩   where   :han>:lin'   ;  
                                          Self.ADOQuery2.Parameters.ParamByName('lin').Value:=pm;  
                                          Self.ADOQuery2.Parameters.ParamByName('han').Value:=name;  
                                          self.ADOQuery2.Active:=true;  
   
  每次都提示找不到lin这个变量,请问是我的变量类型设置的有错误吗?还是我的SQL语句写的有问题?  
  我写“where   :han>:lin”这样可以吗?  
  还有,我老是遇见找不到变量的问题,请问一般都是什么情况会出现这种错误呢? 问题点数:0、回复次数:7Top

1 楼xzl_kye(xiezhangliang)回复于 2005-06-04 13:41:49 得分 0

adoquery1.Close;ADOQuery1.SQL.Clear;  
  ADOQuery1.SQL.Add('select   *   from   bominfo   where   字段名=:參數名'   );  
  ADOQuery1.Parameters.ParamByName('參數名').Value:=參數值;  
  ADOQuery1.Open;Top

2 楼redsea317(水纹)回复于 2005-06-04 16:16:55 得分 0

xzl_kye兄,还是不行啊,我按照你的格式写,但还是提示lin找不到,晕,这几天就要交程序了,急啊~Top

3 楼beicun(陪我看日落)回复于 2005-06-04 16:30:08 得分 0

不懂,比较一个字段的值和字段名?Top

4 楼redsea317(水纹)回复于 2005-06-04 16:47:14 得分 0

对啊,从当前的记录中取字段名,然后比较这个字段中大于自己的条数。  
  由于循环的每次字段名都是不一样的,比方有100米的,有400米的,所以每次都得临时取,就写成了  
  :han>:lin,呵呵,没有办法啊,也不知道能不能这样写  
  Top

5 楼redsea317(水纹)回复于 2005-06-05 14:06:11 得分 0

兄弟姐妹们帮帮忙,很急啊~~Top

6 楼5043682(投身于..??)回复于 2005-06-05 14:22:13 得分 0

你可以在SQL语句里面把变量定义了啊Top

7 楼duanhai(段海)回复于 2005-06-05 14:29:52 得分 0

self.ADOQuery2.Active:=false;  
   
      if   self.RadioButton2.Checked=True   then  
          self.ADOQuery2.SQL.Text:=  
              'select   *   from   女子七项成绩   where   '   +   name   +   '='   +   QuotedStr(pm)  
      else  
          self.ADOQuery2.SQL.Text:=  
              'select   *   from   男子十项成绩   where   '   +   name   +   '='   +   QuotedStr(pm);  
      self.ADOQuery2.Active:=true;  
  Top

相关问题

  • 菜鸟急题!
  • 菜鸟急救
  • 菜鸟急问
  • 菜鸟急需
  • 菜鸟问(急!!!!!!!!!!)
  • 菜鸟问题。。。。急。
  • 菜鸟问题,急
  • 菜鸟问题 急!!
  • 菜鸟一问,急!!!
  • 菜鸟提问:(急)

关键词

  • active
  • pm
  • sql
  • adoquery
  • lin
  • self
  • 參數
  • 字段名
  • han
  • 变量

得分解答快速导航

  • 帖主:redsea317

相关链接

  • Delphi类图书
  • Delphi类源码下载
  • Delphi控件下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
北京创新乐知广告有限公司 版权所有, 京 ICP 证 070598 号
世纪乐知(北京)网络技术有限公司 提供技术支持
Copyright © 2000-2008, CSDN.NET, All Rights Reserved
GongshangLogo