ACCESS FEED: Re: [MS_AccessPros] Error 3061 Too Few Parameters

Minggu, 08 September 2013

Re: [MS_AccessPros] Error 3061 Too Few Parameters

I tried that Duane.

This is what I got:

SELECT * FROM [diagnosis] WHERE (CDate(StartDate))>#7/5/2013#

So it does look like the (CDate(StartDate)) is not producing a date, and all records with all StartDates are being passed. Therefore, I assume that my error in the (CDate(StartDate)).

Do you have any ideas about that?

Thanks,

Patty

On Sun, Sep 8, 2013 at 2:44 PM, Duane Hookom <duanehookom@hotmail.com> wrote:

Patty,
If something isn't working as expected in code, add some debugging. Try add this line after the variable is updated:

Debug.Print strSQL

Then open the debug window (press Ctrl+G) to view the statement. You can copy the select statement and paste it into the SQL view of a new query for troubleshooting.

Duane Hookom MVP
MS Access

________________________________
> To: MS_Access_Professionals@yahoogroups.com
> From: patty.mapes@gmail.com
> Date: Sun, 8 Sep 2013 14:39:43 -0400
> Subject: Re: [MS_AccessPros] Error 3061 Too Few Parameters
>
>
>
> Duane,
> I have tried different variations (=, <,>) that should change the data
> but nothing is having any impact. It appears that entire WHERE section
> of the statement is just being ignored, but not throwing any error
> message.
>
>
> On Sun, Sep 8, 2013 at 2:00 PM, Duane Hookom
> <duanehookom@hotmail.com<mailto:duanehookom@hotmail.com>> wrote:
>
>
> I believe you are missing the delimiters around your date value
>
> strSQL = "SELECT * FROM [diagnosis] WHERE (CDate(StartDate))>&"
> & DateOfVisit & "&"
>
> Duane Hookom MVP
> MS Access
>
> ________________________________
>> To:
> MS_Access_Professionals@yahoogroups.com<mailto:MS_Access_Professionals@yahoogroups.com>
>> From: patty.mapes@gmail.com<mailto:patty.mapes@gmail.com>
>> Date: Sun, 8 Sep 2013 12:09:31 -0400
>> Subject: [MS_AccessPros] Error 3061 Too Few Parameters
>>
>>
>>
>> I have the following code, failing on the last line:
>>
>>
>> DateOfVisit = CDate(Forms!Select_Diagnosis![VisitList])
>>
>>
>> Set db = CurrentDb
>> Set rs = db.OpenRecordset(Domain)
>> 'select all events
>>
>> strSQL = "SELECT * FROM [diagnosis] WHERE (CDate(StartDate))>" &
>> DateOfVisit
>>
>>
>> If someone can see my error, I will be very grateful.
>>
>> Thank you,
>>
>> Patty
>> --
>> Patricia Mapes
>
>
>
> --
> Patricia Mapes
>
>
>
>