这是为什么？

Question

ADOQueryXJ1.SQL.Add('INSERT INTO 销毁案卷信息表(案卷类别号,案卷卷号,标题,页数,保管期限,起始日期,终止日期,移交日期,移交人,接交人,鉴证人,备注,销毁日期,销毁原因)');
  ADOQueryXJ1.SQL.Add('VALUES ('''+ADOQueryZJ.FieldByName('案卷类别号').AsString+''','''+
  ADOQueryZJ.FieldByName('案卷卷号').AsString+''','''+
  ADOQueryZJ.FieldByName('标题').AsString+''','''+
  ADOQueryZJ.FieldByName('页数').AsString+''','''+
  ADOQueryZJ.FieldByName('保管期限').AsString+''+',:k,:b,:c,'+''+
  ADOQueryZJ.FieldByName('移交人').AsString+''','''+
  ADOQueryZJ.FieldByName('接交人').AsString+''','''+
  ADOQueryZJ.FieldByName('鉴证人').AsString+''','''+
  ADOQueryZJ.FieldByName('备注').AsString+''',:d,'''+
  Edit2.Text+''','''+
  Memo1.Text+''')');  ADOQueryZJ.Parameters.ParamByName('k').Value:=strtodate(ADOQueryZJ.FieldByName('起始日期').AsString);
  ADOQueryZJ.Parameters.ParamByName('b').Value:=strtodate(ADOQueryZJ.FieldByName('终止日期').AsString);
  ADOQueryZJ.Parameters.ParamByName('c').Value:=strtodate(ADOQueryZJ.FieldByName('移交日期').AsString);
  ADOQueryZJ.Parameters.ParamByName('d').Value:=strtodate(ADOQueryZJ.FieldByName('借阅日期').AsString);
  ADOQueryZJ.ExecSQL;
错误为：ADOQueryZJ　parameter 'k' not found

Answer 1

你那太多的“‘”之类的，懒的看。在执行EXCUTE之前，加上一句
Showmessage(ADOQueryXJ1.SQL.text)；看看你将要执行的SQL语句，看看啊有哪里引号没有放对地方