안녕하세요. 또다시 질문 올립니다.
procedure TForm1.Button1Click(Sender: TObject);
begin
Query2.Active := False;
with Query2 do
begin
Close;
SQL.Clear;
SQL.Add('Delete From Temp_Bill');
end;
Query2.Active := True;
end;
위 문장을 실행 하면 'Error Creating Cursor Handle.'
이라는 에러가 나네요.
뭐가 잘못 된 건지???
그리고 질문이 하나더 있는데요...
procedure TForm1.Button2Click(Sender: TObject);
begin
with Query2 do
begin
Close;
SQl.Clear;
SQL.Add('Insert Into Temp_Bill');
SQL.Add('Select * From Estimate');
SQL.Add('Where Est_Code =:sCode');
ParamByName('sCode').AsString := 'Est199810001';
ExecSQl;
end;
Query2.Active := True;
end;
Insert문에는 Where절이 들어가지 못하나요.
아니면 Where처럼 특정한 레코드를 선택해서 Insert하려면 어떻게 해야 하는지
염치 불구하도 또다시 질문을 올리네요...
도사를 꿈꾸며...
|