To few perimiters. Exopected 1 Run_Time Error 3061

[CHEECO]

Hello everyone. I am trying to run this code and I keep getting the (To few perimiters. Exopected 1 Run_Time Error 3061) What the code does is count home many times a button is pushed and the " WHERE (((tblMystery.EntryDate)=Date()));" is part of current date.. Well that is what it is suppose to do. When I push the btnVisible button the error pops up when it is suppose to count 1 more click. Thank-you everyone. I am running Access 2016

Private Sub btnVisible_Click()
 CurrentDb.Execute "UPDATE tblMystery SET btnVisible.Clicks = Clicks + 1" & _
        " WHERE (((tblMystery.EntryDate)=Date()));"
        
    Me.Requery
Me.TextBox2.Visible = True
Dim rs As DAO.Recordset
Me.TimerInterval = 0
Set rs = CurrentDb.OpenRecordset("Select * From tblMysteryLog")
rs.AddNew
rs!StartOfTest = Me.txtSessionStart
rs!EndOfTest = Now()
rs!ActualMinutes = Me.txtActualMinutes
rs!ActualSeconds = Me.txtActualSeconds
rs.Update
rs.Close
Set rs = Nothing
'MsgBox "Data logged.", vbOKOnly, "Logged"
  
End Sub

[June7]

I suspect btnVisible.Clicks should just be Clicks.

However, if Clicks is Null, the calc will return Null. Consider: Nz([Clicks],0) + 1

[isladogs]

You need to update the clicks field value in the table ... not btnVisible
Also, use date delimiters in the WHERE section of the query:

CurrentDb.Execute "UPDATE tblMystery SET tblMystery.Clicks = Clicks + 1" & _
        " WHERE (((tblMystery.EntryDate)= #" & Date & "#));"

If not already in format mm/dd/yyy, then you need this:

CurrentDb.Execute "UPDATE tblMystery SET tblMystery.Clicks = Clicks + 1" & _
       " WHERE (((tblMystery.EntryDate)= #" & Format(Date,"mm/dd/yyyy") & "#));"

[June7]

@ridders52, delimiters and concatenation not necessary. The SQL will evaluate Date() function. However, I think Date() is a VBA function (not SQL) and might be a tad more efficient to retrieve the date value and concatenate it instead of having the SQL call the VBA Date() function. But I doubt it is enough to make a noticeable difference.

[CHEECO]

Ok my big mistake, I never explained the situation well enough. The btnVisible Button reveals the answer to the mystery. That text box is hidden until the boy gives up on the riddle and hits the btnVisible button to reveal the answer to the mystery. But I am also trying to set it up so that it keeps tracks of how many times he gives up and clicks the button. The code below the red text is code for the timer of how long it takes him to solve or give up. It works fine and the date part in the red code works fine just the number of clicks does not work properly.

[isladogs]

@ridders52, delimiters and concatenation not necessary. The SQL will evaluate Date() function.

True - I'm so used to selecting one or two dates on a form prior to doing a query like this that I went into automatic mode when replying ....

[June7]

Did you make the suggested edit to the SQL statement?

[CHEECO]

Yes I did but I don't think I did right so It would not work. However I did get it working. I had to create a new table and now it is working fine. Thanks again everyone. I would lost with out your hard work replying to all these post.