如何用Query来insert一条记录？

[ilovedelphi]

我在用Query Insert一条记录：
Query1.SQL.Add('Insert into Userinf');
Query1.SQL.Add('Values(001,'Tom',20,'male')');
报错(关于“‘”）。
请问要如何写insert？

[ilovedelphi]

没有 Query1.ExecSQL 就不能执行吗？

[hamzsy]

Query1.SQL.Add('Values("001","Tom",20,"male")');
Query1.ExecSQL;

[ilovedelphi]

执行不了！怎么半？

[karalme]

就是引号惹得祸：应该为：
Query1.SQL.Add('Insert into Userinf');
Query1.SQL.Add('Values(001,'''+'Tom'''+',20,'''+'male'')');

[ihihonline]

还不行呀？
1、
Query1.Append;
Query1.FieldByName('字段名').value:='你要插入的值';
Query1.Post;

2、 with Query1 do
begin
Close;
SQL.Text:='insert TableName(field1.field2,field3...) values(value1,value2,value3,....) '
Open;
end;

[karalme]

with Query1 do
begin
close;
sql.clear;
SQL.Add('Insert into Userinf');
SQL.Add('Values(''001'',''Tom'',20,''male'')'); //都是单引号
execsql;
end;

[xxzxwl]

query1.Cachedupdates:=true;
query1.Requestlive:=true;
query1.insert;
query1.fieldbyname('id').asstring;='str';
query1.post;

[net_quite]

将该sql语句提交数据库执行。

[ilovedelphi]

那没有Query1.ExecSQL不也执行了吗？请教！

[ilovedelphi]

我用了Query1.SQL.Add('Values(001,"Tom",20,"male")');
好象还是不行。
报错说什么001是字段名，只能用常量，表达式，变量等等。
我用的是SQL 2000

[prometheusphinx]

这样写
Query1.SQL.Add('Values(001,''Tom'',20,''male'')');

[kukuchen]

那你检查一下字段设置

[ilovedelphi]

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
在执行下列语句时：
SQL.Clear;
SQL.Add('Insert Into Question Values("JSJ100","选择题","适 中","CPU 是什么？","中央处理器","方 逵","2002-02-04","2002-02-04","计算机图形学")');
ExecSQL(); //分步调试时出错的语句，到这一步出错了！
错误信息：
[Microsoft][ODBC SQL Server Driver][SQL Server]在此上下文中不允许使用'JSJ100'。
此处只允许使用常量，表达式或变量。不允许使用列名？。

到底是什么问题呀！

[ilovedelphi]

在执行：
SQL.Clear;
SQL.Add('Insert Into Question Values("DDD","选择题","适 中","CPU 是什么？","中央处理器","方 逵","2002-02-04","2002-02-04","计算机图形学")');
ExecSQL();
时分步调试；
出错语句是：ExecSQL();

[Microsoft][ODBC SQL Server Driver][SQL Server]在此上下文中不允许使用'DDD'。
此处只允许使用常量，表达式或变量。不允许使用列名？。

[ilovedelphi]

到底是什么问题呀！怎么没人理我！

[solocom]

query.sql.add('insert into db (db_f1,db_f2,db_f3) values(:f1,:f2,:f3)');
query.parambyname('f1').asstring:='';
..
..
query.prepare;
query.execsql;

[shadowno]

同志改用下面试试
SQL.Clear;
SQL.Add('Insert Into Question Values('''JSJ100''','''选择题''','''适 中''','''CPU 是什么？''','''中央处理器''','''方 逵''','''2002-02-04''','''2002-02-04''','''计算机图形学''')');
ExecSQL(); //分步调试时出错的语句，到这一步出错了！


我想可能是分号的原因！

[sql_man]

把你的SQl语句打印出来，如：Showmessage(sql.text);

再将该语句拿到SQl server 的Query Analyzer里执行，差错

[ilovedelphi]

我觉得我的SQL语句应该没有问题。因为它可以在SQL Server中正常执行。但是在Delphi中用不了。

[ilovedelphi]

怎么没人说话了？