修改表中数据出现“缺少更新或刷新的键列信息”

Question

当我对表中的数据进行修改提交时出现“缺少更新或刷新的键列信息”，不知为何，求助！

Answer 1

我也遇到同样的问题，是在用ADOQUERY产生的。当从一个表中选的数据更新没问题但是在多个表中选出的数据就有问题。
不过我还没有找到觖决问题的方法。
哪位知道就回贴吧，不应该是主键问题。

Answer 2

为了说明问题，举个书籍数据库的例子如下：  
一个mdb数据库中有两个数据表：Book和Author。  
Book表中记录的是书籍的信息，字段依次为：BookID、BookName、AuthorID。  
Author表中记录的是作者的信息，字段依次为：AuthorID、AuthorName。  
用TADOQuery+TDataSource+TDBGrid来形成一个数据库维护的demo。并且在TADOQuery的SQL属性中添加如下SQL代码：  
 SELECT  Book.BookName,  Author.AuthorName  
 FROM  Book  INNER  JOIN  Author  ON  Book.AuthorID  =  Author.AuthorID  
但程序修改TDBGrid中任意字段的值后会出现如下错误：  
Project  xxxx.exe  raised  exception  class  EOleException  with  message  '缺少更新或刷新的键列信息。'  Process  stopped.  Use  Step  or  Run  to  continue.  
 
     对于用上面这样的SQL得到的记录集，可以使用下面这样的更新方法：  
 
       在DataSouce组件的OnUpdateData事件中执行以下（伪）代码：  
1)    从DBGrid->SelectedRow->Filed（具体记不清了，总之其中有一个Tfield类型的子对象），从它的OldValue和Value属性中得到改变前后的数据，据此产生一个如下所示的自定义的SQL的UPDATE命令：  
       UPDATE    Book  INNER  JOIN  Author  ON  Book.AuthorID  =  Author.AuthorID  
       SET  Book.BookName  =  'Think  In  C++'  
       WHERE  (  ((Book.BookID)='100')  AND  ((Author.AuthorName)='xxx')  )  
 
2)    执行Cancel，放弃修改在DBGrid中的修改。  
3)    通过TADOConnection组件开始事务处理。  
4)    用一个新的临时创建的TADOQuery组件来执行更新操作，更新用的SQL命令从上面得到。  
5)    结束TADOConnection组件的事务处理。  
6)    执行TADOQuery中的refresh以刷新TDBGrid中的数据。  
 
 
以下是在DataSource组件的OnUpdateData事件中的实现代码：  
       //  从DBGrid得到要修正的字段及值，形成SQL命令，  
       //  并把该命令保存到AnsiString类型的变量SQLCmd中。  
       TADOQuery  *q  =  new  TADOQuery(this);  
       q->Connection  =  adoc;  
       q->SQL->Clear();  
       q->SQL->Add(SQLCmd);  
       //  关闭DBGrid与数据库的连接。  
       DBGrid->DataSource->DataSet->Close();  
       //  执行更新操作。  
       adoc->BeginTrans();  
       q->Close();  
       q->ExecSQL();  
       adoc->CommitTrans();  
       //  重新建立DBGrid和数据库的连接。  
       DBGrid->DataSource->DataSet->Open();  
 
       关键在于：根据TDBGrid中的值来产生一条UPDATE命令，然后在执行，以避免TDBGrid自动执行相关的更新操作，从而抛出  
Project  xxxx.exe  raised  exception  class  EOleException  with  message  '缺少更新或刷新的键列信息。'  Process  stopped.  Use  Step  or  Run  to  continue.  
这样的错误讯息。