ADOTable 的数据插入

Question

with adoTable1  do
begin
Insert;
FieldByName('bd_name').AsString:=Edit1.Text;
FieldByName('date_time').AsDateTime:=StrToDate(Edit2.Text);
FieldByName('place').AsString:=Edit3.Text;
FieldByName('attendnum').AsInteger:=StrToInt(Edit4.Text);
FieldByName('toastmaster').AsString:=Edit5.Text;
FieldByName('learn_content').AsString:=Edit6.Text;
post;
end;
当我执行后报错：‘提供者或其它服务返回E_FAIL状态。’
请问这是怎么回事情啊？？？
后来我换BDE的Table后就可以插入记录。 我连接的是sybase数据库。 是不是数据库的问题？？

Answer 1

with adoTable1  do
begin
append;
FieldByName('bd_name').AsString:=Edit1.Text;
FieldByName('date_time').AsDateTime:=StrToDate(Edit2.Text);
FieldByName('place').AsString:=Edit3.Text;
FieldByName('attendnum').AsInteger:=StrToInt(Edit4.Text);
FieldByName('toastmaster').AsString:=Edit5.Text;
FieldByName('learn_content').AsString:=Edit6.Text;
insert;
end;

Answer 2

有关键字么？？？
with adoTable1  do
begin
append;
FieldByName('bd_name').AsString:=Edit1.Text;
FieldByName('date_time').AsDateTime:=StrToDate(Edit2.Text);
FieldByName('place').AsString:=Edit3.Text;
FieldByName('attendnum').AsInteger:=StrToInt(Edit4.Text);
FieldByName('toastmaster').AsString:=Edit5.Text;
FieldByName('learn_content').AsString:=Edit6.Text;
close;
end;
这样应该没问题

Answer 3

with adoTable1  do
begin
append;
FieldByName('bd_name').AsString:=Edit1.Text;
FieldByName('date_time').AsDateTime:=StrToDate(Edit2.Text);
FieldByName('place').AsString:=Edit3.Text;
FieldByName('attendnum').AsInteger:=StrToInt(Edit4.Text);
FieldByName('toastmaster').AsString:=Edit5.Text;
FieldByName('learn_content').AsString:=Edit6.Text;
post;或者用AppendRecord，可以省掉Post
end;

Answer 4

我用了你们的方法了真的不行啊 
还是报：‘提供者或其它服务返回E_FAIL状态’ 插入不了记录
可是我用table就可以插入
这是怎么回事情啊?

Answer 5

没有问题呀
连接都是好的
在tablename都看到表了呀