Question

delphi中ADOQuery1.SQL.Add语句问题

ADOQuery1.SQL.Add('insert into tbluser(user_name,user_rank,user_pswd) values(aa,,7982D0FD69D1A2BC)' );这句有问题吗？
kingchiwai 你很聪明，但是我已经找到更为简单的方法，就是用变量，而且ADOQuery1.SQL.Add('insert into tbluser
user_name,user_rank,user_pswd) values("aa","2","7982D0FD69D1A2BC")' );
这样才对，要加上双引号！

Answer 1

应该改成：
ADOQuery1.SQL.Add('insert into tbluser values(user_name,user_rank,user_pswd) values(aa,,7982D0FD69D1A2BC)' );

看错了
直接写值就可以了~~~还用什么？
ADOQuery1.SQL.Add('insert into tbluser values(:Name_,:Rank_,:PSWD_)' );
ADOQuery1.Params.ParamByName('Name_').value := 'aa';
ADOQuery1.Params.ParamByName('Name_').value := '';
ADOQuery1.Params.ParamByName('Name_').value := '7982D0FD69D1A2BC';
try
ADOQuery1.Execute;
except
Application.MessageBox('添加出错',‘提示’,MB_OK+MB_ICONWARNING);
exit;
end;
你要看看你的表名、字段数是不是正确，还有不是数字的字段要用引号，

Answer 2

这种 最好是用事物进行
sql:='nsert into tbluser(user_name,user_rank,user_pswd) values(aa,121,7982D0FD69D1A2BC)';
try
if ADOConnection1.Connected then
adoconnection1.Execute(ssql);
adoconnection1.CommitTrans;
except
begin
adoconnection1.RollbackTrans;
OutputDebugString(pChar('数据导入失败!'));
Continue;
end;