CheckUserForm.ADOQuery1.SQL.Clear;
    CheckUserForm.ADOQuery1.SQL.Add('insert into card values('+Edit1.Text+','''+Edit3.Text+''','''+Edit2.Text+''','''+Edit4.Text+''','''+Edit5.Text+''','''+Main.UserName+''',#'+FormatDateTime('yyyy-mm-dd',Now)+'#)'');
    CheckUserForm.ADOQuery1.ExecSQL;
 
说明:DELPHI7.0+SQL2000

解决方案 »

  1.   

    SQL语法不正确insert into TableName (Field1,Field2,Field3..)values(value1,value2,value3...)
      

  2.   

    前面写你的值对应的字段,values后边是具体的值:adoquery1.sql.text:='insert into card (field1,field2,field3,field4,field5,'
                       +'field6,field7) values('+Edit1.Text+','''+Edit3.Text+''','''
                       +Edit2.Text+''','''+Edit4.Text+''','''+Edit5.Text+''','''
                       +Main.UserName+''',#'+FormatDateTime('yyyy-mm-dd',Now)+'#)'');showmessage(adoquery1.sql.text);//edit.text最好加上trim