3

我收到此错误消息：

[FireDAC][Phys][MySQL] 键 'PRIMARY' 的重复条目 '1111'

尝试将数据插入数据库时​​。数据库中唯一的数据是一个主键为“0000”的元组，所以我知道主键不是另一个键的副本。数据已正确插入数据库，那么当主键不重复时，有什么方法可以阻止错误弹出？

我正在使用 Delphi XE7、MySQL 6.2FDConnection和FDQuery. 我的代码是：

FDQuery1.SQL.Clear;
FDQuery1.SQL.Add(
  'Insert into Customer (' +
    'CustID,' +
    'Forename,' +
    'Surname,' +
    'Address,' +
    'PostCode' +
  ') ' +
  'Values (' +
    QuotedStr(CustID) + ',' + 
    QuotedStr(Forename) + ',' +
    QuotedStr(Surname) + ',' +
    QuotedStr(Address) + ',' +
    QuotedStr(Postcode) +
  ')'
);
FDQuery1.ExecSQL;
FDQuery1.Open;
4

1 回答 1

3

您正在执行相同的 SQL 语句两次。先用ExecSQL，再用Open。您应该只使用其中一个，具体取决于您的 SQL 语句是否实际返回任何结果。

在您的情况下，您编写了一个简单的INSERT查询，因此ExecSQL是正确的选择。请注意，如果您使用Open此查询（没有ExecSQL），您仍然会收到错误，因为“没有要打开的数据”（可以这么说）。

强调规则：使用Openif SQL 语句返回 data。这是一个示例，Open即使您的语句插入一行，您也会这样做。

LQuery.SQL.Text :=
    'INSERT INTO Customer (CustId, CustomerName)'#13#10 +
    'VALUES ('+QuotedStr(ACustId)+','#13#10 +
               QuotedStr(ACustomerName)+');'#13#10 +
    'SELECT  CustId, CustomerName, DateAdded'#13#10 +
    'WHERE   CustId = '+QuotedStr(ACustId)
LQuery.Open;

如图所示，如果数据库分配了任何值（例如默认值、自动键、行版本），您可能希望在插入后立即返回新行。如果是这样的话，那么你应该使用Open.

旁注：根据您的问题，我坚持使用动态查询。但是，通常建议使用参数化查询甚至存储过程。

于 2015-02-25T17:20:00.883 回答