大侠！再次请教你一个问题！关于用delphi的ADO组件对access数据库插入数据的问题！纠结了一个星期了！

添加一个ADOConnection1，设置一下，应该会的吧（这里指定数据库的）

添加一个ADOQuery1，设置SQL属性：select * from tablename,我一般都直接写死的，再设置active为true, 有问题的话，没有启动成功的话，检查一下，然后下面是添加数据的代码：

//****************添加数据**********************************************
ADOQuery1.Insert;
ADOQuery1['这里是表中的列名']:=Edit1.Text;
ADOQuery1['这里是表中的列名']:=Edit2.Text;
ADOQuery1.Post;
Application.MessageBox('添加成功','恭喜',0);

我有个做了一半的源码，你可以拿来研究一下，需要的话，留邮箱，谢谢

第一个，你用的不是adotable，所以不适合用post
第二个，（错误信息很明确）你的query根本还没有连接数据库。具体做法可以放一个adoconnection，然后设定连接串，connected:=true; 之后再做你的代码中的insert。

第一种方法应该在DataModule里定义的,你打开Data MOdule的内容应该可以看见对象表名.及有关连接内容.
第二种方法,是因为你的Sql语句错误,无法进行这个操作.可以代码改为如下:
query1.SQL.Add('insert into cpmessage(cpname,cpmoney) values(:a,:b)');
query1.parambyname('a').AsString:=trim(proname.Text);
query1.ParamByName('b').AsFloat:=strtofloat(trim(price.Text));
query1.ExecSQL