1)插入完记录,为什么老是出错?procedure TForm1.BitBtn2Click(Sender: TObject);
begin
adoqy2.Insert;
adoqy2.Close;
adoqy2.SQL.Clear;
adoqy2.SQL.Add('insert into aa (客户代号,业务姓名) values ('+'''11'''+','+'''hh'''+')');
adoqy2.Active:=true;//adoqy2.Open;
//adoqy2.Post;
//adoqy2.Next;
end;2)为什么系统老是说没有SQL的结束符“;”procedure TForm1.BitBtn2Click(Sender: TObject);
begin
adoqy2.Insert;
adoqy2.Close;
adoqy2.SQL.Clear;
adoqy2.SQL.Add('insert into aa (客户代号,业务姓名) values ('+'''11'''+','+'''hh'''+')');
adoqy2.SQL.Add('select * from aa');
adoqy2.Active:=true;
//adoqy2.Refresh;//adoqy2.Open;
//adoqy2.Post;
//adoqy2.Next;
end;以上问题都是关于QUERY的,我不太会用,谁给大概讲一下,谢谢。

解决方案 »

  1.   

    procedure TForm1.BitBtn2Click(Sender: TObject);
    begin
    adoqy2.Insert;
    adoqy2.Close;
    adoqy2.SQL.Clear;
    adoqy2.SQL.Add('insert into aa (客户代号,业务姓名) values ('+'''11'''+','+'''hh'''+')');
    adoqy2.ExecSQL;///***************************改这试试//adoqy2.Open;
    //adoqy2.Post;
    //adoqy2.Next;
    end;procedure TForm1.BitBtn2Click(Sender: TObject);
    begin
    adoqy2.Insert;
    adoqy2.Close;
    adoqy2.SQL.Clear;
    adoqy2.SQL.Add('insert into aa (客户代号,业务姓名) values ('+'''11'''+','+'''hh'''+')');
    adoqy2.ExecSQL;
    adoqy2.Close;
    adoqy2.SQL.Clear;
    adoqy2.SQL.Add('select * from aa');
    adoqy2.Open; 
    //adoqy2.Active:=true;
    //adoqy2.Refresh;//adoqy2.Open;
    //adoqy2.Post;
    //adoqy2.Next;
    end;
      

  2.   

    如果是SELECT语句就用OPEN
    INSERT、DELETE、INSERT要用EXECSQL