delphi insert 语句错误

来源:百度知道 编辑:UC知道 时间:2024/06/10 19:33:31
SQL.Add('insert into user_info user_type_id,username,password values :user_id,:user_name,:user_password');

帮看下。

全代码如下:

〕procedure TForm2.Button3Click(Sender: TObject);
var
user_id:integer;
user_name,user_password:string;
begin
if user_opquery.Active=true then
begin
if (id_edit.Text='') or (new_name_edit.Text='') or (new_pass_edit.Text='') then
begin
showmessage('请写入完整或正确的数据');
exit;
end;
end;

user_id:=strtoint(id_edit.Text);
user_name:=new_name_edit.Text;
user_password:=new_pass_edit.Text;
with user_opquery do
begin
close;
sql.Clear;
SQL.Add('insert into user_info user_type_id,username,password values :user_id,:user_name,:user_password');
{f2_query.SQL.Add('insert into [user] ');
f2_query.SQL.Add('(user_type_id,username,password) ');

下面的语句SQL不对:
SQL.Add('insert into user_info user_type_id,username,password values :user_id,:user_name,:user_password');

查两对小括号,修改为:
SQL.Add('insert into user_info (user_type_id,username,password) values (:user_id,:user_name,:user_password)');

阳光上的桥说的对....
你这个问题问的很奇怪哦..
最好找本sql的书看一下吧.