我的代码:
qryT.SQL.Text:='insert into CM_Contract_C(ConGUID, strContractID, strContractGrp, dtZbjStartDate, dtZbjEndDate )'+
' select :ConGUID, strContractID, :ContractGrp, :dtZbjStartDate, :dtZbjEndDate from CM_Contract_B where 1=1 ';
qryT.Parameters.ParamByName('ConGUID').Value:=m_strConGUIDC;
qryT.Parameters.ParamByName('ContractGrp').Value:=GetID('|',edtContractGrp.Text);
qryT.Parameters.ParamByName('dtZbjStartDate').DataType:=ftDateTime;
if dtpZbjStartDate.Checked then
begin
qryT.Parameters.ParamByName('dtZbjStartDate').Value:=DateTimeToStr(dtpZbjStartDate.Date);
end
else
begin
qryT.Parameters.ParamByName('dtZbjStartDate').Value:=null;
end;
if dtpZbjEndDate.Checked then
begin
qryT.Parameters.ParamByName('dtZbjEndDate').Value:=DateTimeToStr(dtpZbjEndDate.Date);
end
else
begin
qryT.Parameters.ParamByName('dtZbjEndDate').Value:=null;
end;
qryT.ExecSQL;
其中dtZbjStartDate 和 dtZbjEndDate 字段类型为 datetime
但是执行的时候一直报错,不正常地定义参数对象。提供了不一致或不完整的信息,检查发现是 dtZbjStartDate 和 dtZbjEndDate自动识别类型为nvarchar(19)
于是在赋值之前我增加了:
qryT.Parameters.ParamByName('dtZbjStartDate').DataType:=ftDateTime;
qryT.Parameters.ParamByName('dtZbjEndDate').DataType:=ftDateTime;
然后问题完美解决。
总结:对于ADOQuery变量操作这种类型的定义最好变成手工定义才能确保类型正确,以避免不必要的错误发生类似于这样类型不匹配的问题