F
fstao
Unregistered / Unconfirmed
GUEST, unregistred user!
delphi问题:
用MSSQL7建一新表table2,其字段和数据如下:
id name
1 a
2 b
在form1里添加query1、edit1、edit2和button1,query1连接Mssql7。我想实现这样
的功能:假如在edit1和edit2分别输入“3”和“c”,就把这两个数据insert into到table2,
其实这样做比较简单,语句为:
with query1 do
begin
close;
sql.clear;
sql.add('insert into table2(id,name) valuesid,name)');
parambyname('id').AsFloat:=strtofloat(edit1.text);
parambyname('name').AsString:=edit2.text;
execsql;
end;
但是如果在edit1里输入“1”或“2”时,我不想让table2的id重复,那么得在sql语句加入判断句where,
那么where后面又如何写?如:
with query1 do
begin
close;
sql.clear;
sql.add('insert into table2(id,name) valuesid,name)');
sql.add('where ?');
parambyname('id').AsFloat:=strtofloat(edit1.text);
parambyname('name').AsString:=edit2.text;
execsql;
end;
用MSSQL7建一新表table2,其字段和数据如下:
id name
1 a
2 b
在form1里添加query1、edit1、edit2和button1,query1连接Mssql7。我想实现这样
的功能:假如在edit1和edit2分别输入“3”和“c”,就把这两个数据insert into到table2,
其实这样做比较简单,语句为:
with query1 do
begin
close;
sql.clear;
sql.add('insert into table2(id,name) valuesid,name)');
parambyname('id').AsFloat:=strtofloat(edit1.text);
parambyname('name').AsString:=edit2.text;
execsql;
end;
但是如果在edit1里输入“1”或“2”时,我不想让table2的id重复,那么得在sql语句加入判断句where,
那么where后面又如何写?如:
with query1 do
begin
close;
sql.clear;
sql.add('insert into table2(id,name) valuesid,name)');
sql.add('where ?');
parambyname('id').AsFloat:=strtofloat(edit1.text);
parambyname('name').AsString:=edit2.text;
execsql;
end;