碧海奇缘:急急急!用ADOQuery查询MDB数据库,无法获得想要的值

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/02 00:00:10
procedure TFormModifyRKD.ComboBox1Change(Sender: TObject);

begin
ADOQueryModifyRKD.Close;
ADOQueryModifyRKD.SQL.Clear;
ADOQueryModifyRKD.SQL.Text:='SELECT * FROM rukudan WHERE RKDNo='+'''+combobox1.text+''';
ADOQueryModifyRKD.Open;

Edit1.Text :=Trim(combobox1.Text);
Edit2.Text :=ADOQueryModifyRKD.Fieldbyname('ProductName').AsString;
Edit3.Text :=ADOQueryModifyRKD.Fieldbyname('Amount').AsString;
Edit4.Text :=ADOQueryModifyRKD.Fieldbyname('Date').AsString;

ADOQueryModifyRKD.Close;

end;

Edit2,3,4都无法获得值。请高手指点!!谢谢!

你的combobox1里有值吗?或者值在数据表中真在其值。记住,你可是按combobox1的值进行筛选的。
你应该在窗体创建的时候,将表rukudan 中字“RKDNo”的所有值都读入到combobox1的列表中(用ADOtable就可以读入),并且最好将combobox1的style属性设置成csDropDownList,让它只可以去选,即设置成为只读的。
试试吧,这校会保证确有其值。

'SELECT * FROM rukudan WHERE RKDNo='+'''+combobox1.text+''';

确定有记录吗?

并且, Amount, Date 都是字符型吗?

还有,你的 RKDNo 是什么类型的字段?