with Form1.ADOQuery1 do
begin
Form1.ADOQuery1.Close;
Form1.ADOQuery1.SQL.Clear;
Form1.ADOQuery1.SQL.Add('select csdd_csmc,jhd_spmc,jhd_gg,jhd_dj,jhd_sl,jhd_jbr from 进货订单表jhdb where jhd_spid=:M');
Form1.ADOQuery1.Parameters.ParamValues['M']:=Edit1.Text;
Form1.ADOQuery1.Open;
Edit2.Text:=Form1.ADOQuery1.FieldByName('csdd_csmc').AsString;
Edit3.Text:=Form1.ADOQuery1.FieldByName('jhd_spmc').AsString;
Edit4.Text:=Form1.ADOQuery1.FieldByName('jhd_gg').AsString;
Edit5.Text:=Form1.ADOQuery1.FieldByName('jhd_dj').AsString;
Edit6.Text:=Form1.ADOQuery1.FieldByName('jhd_sl').AsString;
Edit7.Text:=Form1.ADOQuery1.FieldByName('jhd_jbr').AsString;
end;
我运行的时候提示"Field csdd_csmc not Found"
这是怎么回事?
进货订单表jhdb 的结构jhd_id,csdd_id,csdd_csid,csdd_csmc,jhd_spid,jhd_spmc,jhd_gg,jhd_dj,jhd_sl,jhd_jbr,jhd_je
begin
Form1.ADOQuery1.Close;
Form1.ADOQuery1.SQL.Clear;
Form1.ADOQuery1.SQL.Add('select csdd_csmc,jhd_spmc,jhd_gg,jhd_dj,jhd_sl,jhd_jbr from 进货订单表jhdb where jhd_spid=:M');
Form1.ADOQuery1.Parameters.ParamValues['M']:=Edit1.Text;
Form1.ADOQuery1.Open;
Edit2.Text:=Form1.ADOQuery1.FieldByName('csdd_csmc').AsString;
Edit3.Text:=Form1.ADOQuery1.FieldByName('jhd_spmc').AsString;
Edit4.Text:=Form1.ADOQuery1.FieldByName('jhd_gg').AsString;
Edit5.Text:=Form1.ADOQuery1.FieldByName('jhd_dj').AsString;
Edit6.Text:=Form1.ADOQuery1.FieldByName('jhd_sl').AsString;
Edit7.Text:=Form1.ADOQuery1.FieldByName('jhd_jbr').AsString;
end;
我运行的时候提示"Field csdd_csmc not Found"
这是怎么回事?
进货订单表jhdb 的结构jhd_id,csdd_id,csdd_csid,csdd_csmc,jhd_spid,jhd_spmc,jhd_gg,jhd_dj,jhd_sl,jhd_jbr,jhd_je
解决方案 »
- 历时3年半,终于把房贷还清,放分庆祝!
- 在广州怎么找工作?在网上投简历都没人理我的。
- 如何在调用ActiveX的控制端响应ActiveX的事件。
- delphi程序员工资水平大致是多少?
- 关于api函数的问题
- 有关图形刷新的问题
- 关于读代码时遇到的困惑,,请在标记为"*"的代码行给我加注释,谢谢!
- 哪位有关于把图标等文件转换为RCDATA的编译器?
- 如何制作 类似于 Access 查询界面 的 TListBox控件的Item 可以拖到 另一个 TListBox (如图)
- 从“熊猫烧香”中学程序
- 当一个应用程序在编译过程中或编译完后出现 Exception EAcessViolation错误时有什么方法来发现错误?
- RyanGT(笑书神侠) 请进来 我一次只能给100分,没办法,大不了我分5次给了 呵呵,现在是第一个100分
======================================
你的表名就是:进货订单表jhdb???????
如果不行的话,说明你的SQL语句生成的有问题,
很可能是字段名写错了或与数据表中的字段名不一致。
试试这种方法:
Edit2.Text:=Form1.ADOQuery1.Fields(0).AsString;
Edit3.Text:=Form1.ADOQuery1.Fields(1).AsString;
Edit4.Text:=Form1.ADOQuery1.Fields(2).AsString;
Edit5.Text:=Form1.ADOQuery1.Fields(3).AsString;
Edit6.Text:=Form1.ADOQuery1.Fields(4).AsString;
Edit7.Text:=Form1.ADOQuery1.Fields(5).AsString;
Form1.ADOQuery1.Close;
Form1.ADOQuery1.SQL.Clear;
Form1.ADOQuery1.SQL.Add('select csdd_csmc,jhd_spmc,jhd_gg,jhd......
....
.
.
.
Form1.ADOQuery1.Parameters.ParamByName('M').Value:=Edit1.Text;
这样试试