请问各位先进： with ADODataset1. do begin CommandText:=''; CommandText:='delete * from jlinfo where jldm=:para1' ; parameters.ParamByName('para1').Value:=Edit1.text; end; 怎么执行不了啊？

您好﹗    ADODataSet元件主要适用作于有回傳資料的SQL指令﹐如Select敘述﹐配合Open方法回傳查詢資料﹐如果是執行無回傳資料的SQL指令﹐如Delete, Insert, Update等﹐則需用ADOCommand或者ADOQuery元件之ExecSQL方法﹐將您的程式碼用ADOQuery元件來代替如下﹕

with ADOQuery1. do
begin
  SQL.Text := 'Delete * from jlinfo where jldm=:para1' ;
  Parameters.ParamByName('para1').AsString:=Edit1.text;
  ExecSQL;
end;

參考看看﹗ ========================= 大病初愈﹐休養調整中... =========================

------
忻晟