Question

我为pos销售建立了一个项目。

我使用组合框从db显示项目，我使用代码

  ComboBox1.Items.Clear;
  while not Zpem1.Eof do
  begin
    combobox1.Items.Add(Zpem1.fieldbyname('nama').AsString);
    Zpem1.Next;
  end;

我尝试使用

输入购物车

begin
con;
  Zpem4.Close;
  Zpem4.SQL.Clear;
  Zpem4.SQL.Add('insert into cart (service,jumlah) values ('+QuotedStr(ComboBox1.text)+','+Edit5.Text+')');
  Zpem4.Open;

我收到错误消息

当前提供程序不支持从单次执行返回多个记录集

我尝试了几个代码，我从谷歌搜索并仍然得到了相同的结果

Answer 1

我认为 zpem4 和 zpem1 都使用相同的连接？

在使用 zpem4

之前，您需要关闭 zpem1

提供程序是允许Delphi代码与SQL数据库交互的代码。根据提供程序的设计方式，可能不允许您同时打开两个记录集。如果您是第一块代码，则打开ZPEM1以填充组合框。在第二个代码中，您将打开ZPEM4以执行更新。两者都创建记录集，而提供只允许一个..

插入时出错

1 个答案: