我要向数据库表中加入数据? 怎么这段代码运行没错,确不能加入啦。怎么修改,有别的简单写法吗?
procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.SQL.Clear;
adoquery1.SQL.Add('INSERT INTO temp_lixz');
adoquery1.SQL.Add('(name , pass,limit ) VALUES( )' );
adoquery1.SQL.Add(''''+Edit1.Text+'''');
adoquery1.SQL.Add(''''+edit2.Text+'''');
adoquery1.SQL.Add(''''+edit3.Text+'''');
adoquery1.ExecSQL;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from temp_lixz') ;
adoquery1.Close;
adoquery1.Open;
adoquery1.Last;

解决方案 »

  1.   

    edit1.text、edit2.text、edit3.text应该写在VALUES里吧
      

  2.   

    1,可以用参数来实现 没有必要非得把EDIT写上 不清晰
    2,edit应该写在VALUES当中
    3,EXECSQL后面最好加一句close个人见解 大家进步
      

  3.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    adoquery1.SQL.Clear;
    adoquery1.SQL.Add('INSERT INTO temp_lixz');
    adoquery1.SQL.Add('(name , pass,limit ) VALUES('''+Edit1.Text+''','+Edit2.Text+''','+Edit3.Text+''' )' );
    adoquery1.ExecSQL;
    adoquery1.SQL.Clear;
    adoquery1.SQL.Add('select * from temp_lixz') ;
    adoquery1.Close;
    adoquery1.Open;
    adoquery1.Last;
      

  4.   


    这样
    var
     str:string;str:='INSERT INTO temp_lixz' +'(name , pass,limit ) VALUES( '''+Edit1.Text+''','''+edit2.Text+''','''+edit3.Text+''')';adoquery1.SQL.Clear;
    adoquery1.SQL.Add(str);
    adoquery1.ExecSQL;
    adoquery1.SQL.Clear;
    adoquery1.SQL.Add('select * from temp_lixz') ;
    adoquery1.Close;
    adoquery1.Open;
    adoquery1.Last;
      

  5.   

    第一行前插入adoquery1.close;
    然后再执行语句试试