帮忙

Question

sql.Add(' insert into s1m values (');
        sql.Add(format(' ''%s'',',[trim(edt1.Text)]));
我新建的一个表  s1m  想把edit中的内容加入到 s1m的ID 中
如上代码实现不了，有错误 请大家帮忙

Answer 1

with adoquery1 do
begin
  close;
  sql.clear;
  sql.Add(' insert into s1m values ('); 
  sql.add('ID)'+quotedstr(trim(edit1.text)));
  execsql;
end;

Answer 2

试试这个 
adoquery1.close; 
adoquery1.sql.clear; 
adoquery1.sql.add(' INSERT INTO slm(ID) VALUES'''+StrToInt(trim(edit1.text)+'''');  
adoquery1.execsql; 

Answer 3

adoquery1.close; 
adoquery1.sql.clear; 
adoquery1.sql.add(' INSERT INTO slm(ID) VALUES'''+StrToInt(trim(edit1.text)+'''');  
adoquery1.execsql; 

Answer 4

var
  vSQL: string;
begin
  vSQL := ' INSERT INTO slm(ID) VALUES( '+ QuotedStr(trim(edit1.text)) + ')';
  with adoquery1 do
  begin
    close; 
    sql.clear; 
    sql.Text := vSQL;
    execsql; 
  end;
end;

Answer 5

不好意思，有些問題，現在沒事了
with adoquery1 do
begin
close;
sql.clear;
sql.Add(' insert into s1m (ID) ');
sql.add('values('+quotedstr(trim(edit1.text))+')');
execsql;
end;
ADOConnection1.CommitTrans;

Answer 6

晕 大家都用的是ADO
我用的是BDE