L
lovenuo
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm2.Button1Click(Sender: TObject);
begin
form1.ADOQuery1.Close;
form1.ADOQuery1.SQL.Clear;
form1.ADOQuery1.SQL.Add('insert ProxyVip(IP,User,Password,Relate,QQ,Data,BZ)');
form1.ADOQuery1.SQL.Add('values IP,:User,assword,:Relate,:QQ,ata,:BZ');
form1.ADOQuery1.Parameters.ParamByName('IP').Value:=Trim(Edit1.Text);
form1.ADOQuery1.Parameters.ParamByName('User').Value:=Trim(Edit3.Text);
form1.ADOQuery1.Parameters.ParamByName('Password').Value:=Trim(Edit4.Text);
form1.ADOQuery1.Parameters.ParamByName('Relate').Value:=Trim(Edit2.Text);
form1.ADOQuery1.Parameters.ParamByName('QQ').Value:=Trim(Edit5.Text);
form1.ADOQuery1.Parameters.ParamByName('Data').Value:=Trim(Edit5.Text);
form1.ADOQuery1.Parameters.ParamByName('BZ').Value:=Trim(Memo1.lines.text);
form1.ADOQuery1.ExecSQL;
end;
运行后点击Button1,出现"insert into语句的语法错误",我那里出错了,请朋友给出代码!
begin
form1.ADOQuery1.Close;
form1.ADOQuery1.SQL.Clear;
form1.ADOQuery1.SQL.Add('insert ProxyVip(IP,User,Password,Relate,QQ,Data,BZ)');
form1.ADOQuery1.SQL.Add('values IP,:User,assword,:Relate,:QQ,ata,:BZ');
form1.ADOQuery1.Parameters.ParamByName('IP').Value:=Trim(Edit1.Text);
form1.ADOQuery1.Parameters.ParamByName('User').Value:=Trim(Edit3.Text);
form1.ADOQuery1.Parameters.ParamByName('Password').Value:=Trim(Edit4.Text);
form1.ADOQuery1.Parameters.ParamByName('Relate').Value:=Trim(Edit2.Text);
form1.ADOQuery1.Parameters.ParamByName('QQ').Value:=Trim(Edit5.Text);
form1.ADOQuery1.Parameters.ParamByName('Data').Value:=Trim(Edit5.Text);
form1.ADOQuery1.Parameters.ParamByName('BZ').Value:=Trim(Memo1.lines.text);
form1.ADOQuery1.ExecSQL;
end;
运行后点击Button1,出现"insert into语句的语法错误",我那里出错了,请朋友给出代码!