同志们，帮我看看一个简单的三层更新的问题！

Question

procedure TForm1.Button1Click(Sender: TObject);
var
  sqlstr:string;
  lanuage:string;begin
   datamodul.SCK.Connected :=TRUE;//dataModuel:TdataModule,sck:TsocketConnect
   datamodul.Cdataset.Active  :=TRUE;//Cdataset:TClientdataset
   lanuage:=edit1.Text;
   sqlstr:='update qrytable set wei=' +lanuage ;
   WITH datamodul.Cdataset  DO
     begin
       close;       commandtext:=sqlstr;       execute;
     end;end;我的后台数据库是SQL，第一次更新时能成功，但我第二次更新是出错：
提示："adoquery1:commandtext does not return a rusult set"
兄弟们，这个问题应该怎么解决？我有点急！！！！！！！！！！！！！！！！

Answer 1

datamodul.Cdataset.Active  :=TRUE
是多余的吧。