procedure TForm1.Button1Click(Sender: TObject);
var
id,name,did:string;
begin
id := trim(edit1.Text);
name := trim(edit2.Text);
did := trim(edit3.Text);
with ADOQuery1 do
begin
close;
SQL.Clear;
SQL.Add('insert into employee values(:id,:name,:did)');
ExecSQL;
end
end;3个edit都有值,但为什么报错说插入NULL值(:id 为主键)?初次求解!
var
id,name,did:string;
begin
id := trim(edit1.Text);
name := trim(edit2.Text);
did := trim(edit3.Text);
with ADOQuery1 do
begin
close;
SQL.Clear;
SQL.Add('insert into employee values(:id,:name,:did)');
ExecSQL;
end
end;3个edit都有值,但为什么报错说插入NULL值(:id 为主键)?初次求解!
解决方案 »
- 程序运行出错问题请教
- [高分请教]如何加快和放慢flash的播放速度?
- 哪位朋友能讲讲FastReport中的Child是干吗用的?另外,如何补空行?
- DLL调用DLL中的问题
- 关于图像算法和MOVE函数问题????????????????????????????
- 高分求教:修改了计算机名称之后,怎样使SQLServer7.0能够继续干活???
- 请问程序的要连上SQL服务器,客户机上要有些什么驱动啊?
- 各位高手请帮小弟一忙,急用!
- 请问如何用adoquery.savetofile 方法存为TXT文件??
- 更改,add,delete数据库字段名,数据库类型为delphi自带的那种,扩展名是.db。
- 急!打印格式问题
- 两关实时更新的问题
var
id,name,did:string;
begin
with ADOQuery1 do
begin
close;
SQL.Clear;
SQL.Add('insert into employee values(:id,'':name'',:did)');
Parameters[0].Value=trim(edit1.Text);
Parameters[1].Value=trim(edit2.Text);
Parameters[2].Value=trim(edit3.Text);
ExecSQL;
end
end;或者直接用SQL写吧,不设参数