Having some difficulties getting the Query String to work correctly.

The date comes in as 2/5/2004
************************************************** ******
qDate = Format(qDate, "mm/dd/yyyy")

'Open the Datasource
wrdDoc.MailMerge.OpenDataSource Name:="data.xls", _
ConfirmConversions:=False, LinkToSource:=True, ReadOnly:=True, _
Format:=wdOpenFormatAuto, Connection:="Data", _
SQLStatement:="", SQLStatement1:=""

'Set the DataSource and the Query

theSql = "SELECT * FROM data.xls WHERE (( Date_Received = #" & qdate & "#))"

wrdDoc.MailMerge.DataSource.QueryString = theSql
************************************************** *******
It says no records are found and I know they contain records.

Any help would be greatly appreciated!

Thanks

Jerami Tainter

qDate = Format(qDate, "mmm/dd/yyyy")
debug.pring qdate

Try that it should show you your problem. My guess is your looking for 5 feb and the date gets interperted as 2 may.

Regards