代码如下:
procedure TForm2.FormCreate(Sender: TObject);
begin
ADOConnection2.Connected := true;
aPower := form12.power;
ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('select * from cpm_AccessControl where powerLevel=aPower');
aCommunity := ADOQuery2.FieldByName('communityName').AsString;
ADOQuery2.Open;
end;
里面用到的两个参数是在该unit的private区声明的
private
{ Private declarations }
aPower: string;
aCommunity: string;
////////////////////////////////////////////////////////////////////////////////
出错信息如下:
ADOQuery2: Field 'communityName' not found.在我建好的cpm_AccessControl 表里面确实有communityName这个字段啊,郁闷,请问是为什么会出错啊?谢谢
procedure TForm2.FormCreate(Sender: TObject);
begin
ADOConnection2.Connected := true;
aPower := form12.power;
ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('select * from cpm_AccessControl where powerLevel=aPower');
aCommunity := ADOQuery2.FieldByName('communityName').AsString;
ADOQuery2.Open;
end;
里面用到的两个参数是在该unit的private区声明的
private
{ Private declarations }
aPower: string;
aCommunity: string;
////////////////////////////////////////////////////////////////////////////////
出错信息如下:
ADOQuery2: Field 'communityName' not found.在我建好的cpm_AccessControl 表里面确实有communityName这个字段啊,郁闷,请问是为什么会出错啊?谢谢
解决方案 »
- 结构和类的不同实例之间如何复制数据呢
- 表格权限的设计问题,请大虾们赐教!!!
- 映射网络驱动器,当机器重新启动或注销后驱动器消失,我想驱动器一直存在,可以吗?
- 我的系统出了点问题,不知道那里出错了,谁能帮我调调?
- 请问大虾:将一个OldList:TStringlist的值赋给newList: TStringList,对newList的更改总会影响到oldList,有没有办法避免这个问题?
- 滚动控件绘图刷新问题
- 怎样一起清空面板上或GROUPBOX上所有输入控件的TEXT
- 如何分割字符串?
- 请hjd_cw接200分,谢谢.
- 如何将表格转为Excel时,表格标头也带过去?
- 请问如何用SQL语句实现下面查询?
- 生日,散分,为什么我在她面前会失去自信 ~
ADOQuery2.Open;
aCommunity := ADOQuery2.FieldByName('communityName').AsString;
aCommunity := ADOQuery2.FieldByName('communityName').AsString;
ADOQuery2.Open;这两句换个顺序,你还没打开那个数据集怎么能从里面取得数据呢??
begin
ADOConnection2.Connected := true;
aPower := form12.power;
ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('select * from cpm_AccessControl where powerLevel=')+ QuotedStr(aPower);
ADOQuery2.Open;
aCommunity := ADOQuery2.FieldByName('communityName').AsString;
end;
aCommunity := ADOQuery2.FieldByName('communityName').AsString;
ADOQuery2.Open;
这两句顺序是反了,呵呵,居然没看出来。惭愧!还有redleaf80(帅の很遗憾)的是对的,不过括号需要做一下改动:
ADOQuery2.SQL.Add('select * from cpm_AccessControl where powerLevel='+ QuotedStr(aPower));谢谢各位了。