Data type mismatch in criteria expression



I am using the following parameters to execute an insert query using Delphi
7 and MS Access 97.

I get the error "Data type mismatch in criteria expression.

Can anyone tell me what I am doing wrong?



INSERT INTO tblInventoryDetailsUsed_TEMP ( MaterialID, DateIn, CostEach,
VendorID, POID, PODetailID, Qty, ROGID, BinID, UOM, Product, FtWd, FtLg,
BinLocation, DyeLot, DoPrint, Notes, RollNo, JobNo, AmountRemaining,
ReleaseAmount, TagNo, ProductNo, WarehouseID, DateOut, FromStock,
ProductName, InstallerID )

SELECT tblInventoryUsed.MaterialID, tblInventoryUsed.DateIn,
tblInventoryUsed.CostEach, tblInventoryUsed.VendorID, tblInventoryUsed.POID,
tblInventoryUsed.PODetailID, tblInventoryUsed.Qty, tblInventoryUsed.ROGID,
tblInventoryUsed.BinID, tblInventoryUsed.UOM, tblInventoryUsed.Product,
tblInventoryUsed.FtWd, tblInventoryUsed.FtLg, tblInventoryUsed.BinLocation,
tblInventoryUsed.DyeLot, tblInventoryUsed.DoPrint, tblInventoryUsed.Notes,
tblInventoryUsed.RollNo, tblInventoryUsed.JobNo,
tblInventoryUsed.AmountRemaining, tblInventoryUsed.ReleaseAmount,
tblInventoryUsed.TagNo, tblInventoryUsed.ProductNo,
tblInventoryUsed.WarehouseID, tblInventoryUsed.DateOut,
tblInventoryUsed.FromStock, tblInventoryUsed.ProductName,
tblInventoryUsed.InstallerID

FROM tblInventoryUsed

WHERE (((tblInventoryUsed.MaterialID)=:intProductID) AND
((tblInventoryUsed.DateOut) Between :dteFrom And :dteTo));



The procedure is as follows:



procedure TfrmInventoryHistory_Details.cxFromPropertiesCloseUp(
Sender: TObject);



var dteFrom, dteTo : TDate;



dteFrom := cxFrom.Date;
dteTo := cxTo.Date;



qryInventoryDetailsUsed_TEMP.Parameters.ParamByName('dteFrom').Value :=
dteFrom;
qryInventoryDetailsUsed_TEMP.Parameters.ParamByName('dteTo').Value :=
dteTo;
qryInventoryDetailsUsed_TEMP.Parameters.ParamByName('intProductID').Value
:= intProductID;
qryInventoryDetailsUsed_TEMP.ExecSQL;




.



Relevant Pages

  • Re: Lebans Calendar code problem
    ... ....will be interpreted as dteFrom as Variant. ... Dim dteFrom As Date, dteTo As Date ... > Private Sub butSetTarget_DblClick ...
    (microsoft.public.access.forms)
  • Re: Lebans Calendar code problem
    ... only dteTo will be created as a Date. ... Dim dteFrom As Date ... > Private Sub butSetTarget_DblClick ...
    (microsoft.public.access.forms)
  • Re: need help with inserting a set of records
    ... tblDates with field Ddate inserted starting from txtDateFr and adding ... Dim db As DAO.Database ... Dim dteFrom As Date ... Dim dteTo As Date ...
    (comp.databases.ms-access)
  • Re: Lebans Calendar code problem
    ... "Brendan Reynolds" wrote: ... only dteTo will be created as a Date. ... > Dim dteFrom As Date ... >> Dim dteFrom, dteTo As Date ...
    (microsoft.public.access.forms)