delphi 报语'''附近法异常

2013-04-20

delphi 报语''：'附近法错误~FORM1.ADOQuery1.CloseFORM1.ADOQuery1.SQL.ClearFORM1.ADOQ

delphi 报语''：'附近法错误~
FORM1.ADOQuery1.Close;
FORM1.ADOQuery1.SQL.Clear;
FORM1.ADOQuery1.SQL.Add('insert into T_order(time,name,adress,tel,carid,amout,status) values(:atime,:name,:adress,:tel,:carid,:amout,:status)');
FORM1.ADOQuery1.Parameters.ParseSQL(FORM1.ADOQuery1.SQL.Text, True);
FORM1.ADOQuery1.Parameters.items[0].Value:= formatdatetime('yyyy-MM-dd',now);
FORM1.ADOQuery1.Parameters.Items[1].Value:= trim(LabeledEdit6.Text);
FORM1.ADOQuery1.Parameters.Items[2].Value:= trim(LabeledEdit9.Text);
FORM1.ADOQuery1.Parameters.Items[3].Value:= trim(LabeledEdit7.Text);
FORM1.ADOQuery1.Parameters.Items[4].Value:= trim(LabeledEdit10.Text);
FORM1.ADOQuery1.Parameters.Items[5].Value:= StrToInt(LabeledEdit8.Text);
FORM1.ADOQuery1.Parameters.Items[6].value:= trim(Edit1.text);
FORM1.ADOQuery1.ExecSQL; delphi insert
[解决办法]
注意：的半角全角
[解决办法]
我的建议是别用参数的。我不肯定是不是value的问题。
用QuotedStr（）

'insert into T_order(time,name,adress,tel,carid,amout,status) values('+QuotedStr() + ',' + QuotedStr() + ',' + QuotedStr() + ',' + QuotedStr() + ',' + QuotedStr() + ',' + QuotedStr() + ',' + QuotedStr())
[解决办法]

Quote: 引用:

我的建议是别用参数的。我不肯定是不是value的问题。
用QuotedStr（）

建议还是用参数，清晰，易于维护。

上面的错误大概只能出在那个time上，可以在那上面查查，比如先删掉这个参数试试还出不出问题。。。
[解决办法]
引用:
我的建议是别用参数的。我不肯定是不是value的问题。
用QuotedStr（）

'insert into T_order(time,name,adress,tel,carid,amout,status) values('+QuotedStr() + ',' + QuotedStr() + ',' + QuotedStr() + ',' + QuotedStr()……

参数传递可以加快执行速度啊，我不建议用那么多引号，初学者很容易搞错。
[解决办法]
用的什么数据库，是不是关键字错误，比如time,name可能和数据库中的关键字冲突了
[解决办法]
showmessage 一下。sql.text 你自然知道是什么，谁都是那么过来的。

热点排行

.NET

delphi 报语'''附近法异常