Sending parameters to queries - Revisited

[Merkava]

Hello All,

Chris was a great help with this subject. I have two questions

Sub QueryTest()
Dim qryTemp As Object
Dim rstTemp As Object
' Ordinal position of Parameter.
Const StartDate As Date = "12/1/07"

Set qryTemp = CurrentDb.QueryDefs("qryActivityLogByDate")
qryTemp.Parameters(StartDate) = Date

Set rstTemp = qryTemp.OpenRecordset
'Personal Details

rstTemp.Close
Set rstTemp = Nothing

qryTemp.Close
Set qryTemp = Nothing

End Sub
Question #1 - I am receiving Data Type conversion error. What is this and how would I avoid ths.



Question #2 - I there a source of information in a simple format?

Thank you in advance.

Cheers,
Aaron

[Merkava]

Would someone be able to point to me where I can read about this issue. I need to resolve it

Cheers,
Aaron

[PianoMan64]

Hello All,

Chris was a great help with this subject. I have two questions

Sub QueryTest()
Dim qryTemp As Object
Dim rstTemp As Object
' Ordinal position of Parameter.
Const StartDate As Date = #12/1/07# ' When Defining a DATE in MS Access using the # sign to enclose the date or datetime specified.

Set qryTemp = CurrentDb.QueryDefs("qryActivityLogByDate")
qryTemp.Parameters(StartDate) = Date

Set rstTemp = qryTemp.OpenRecordset
'Personal Details

rstTemp.Close
Set rstTemp = Nothing

qryTemp.Close
Set qryTemp = Nothing

End Sub
Question #1 - I am receiving Data Type conversion error. What is this and how would I avoid ths.

Question #2 - I there a source of information in a simple format?

Thank you in advance.

Cheers,
Aaron

Const StartDate As Date = #12/1/07# ' When Defining a DATE in MS Access using the # sign to enclose the date or datetime specified.

[Merkava]

Hello,

I am still getting the data conversion error on this line

qryTemp.Parameters(StartDate) = Date

Cheers,
Aaron