Auto OK on UPDATE Dialog

Cr0vaX · June 9th, 2004, 08:26 AM

DoCmd.RunSQL "UPDATE Contador SET Contador.OTrabalho = " & _
CStr(rsContador.Fields(0).Value + 1) & _
" WHERE (((Contador.Ano)='" & CStr(intAnoCorrente) & "'));"

I have this code to update a table, but when it comes to this it'll show a dialog box asking OK or Cancel.

What I want to do is "auto click" OK, or don't ask just update, is there anyway?

embreyo · June 9th, 2004, 11:06 AM

Use the SETOPTION method prior to your DoCmd statement. It would look similar to the following:

Code:

'Turn off Update Confirmation
SETOPTION "Confirm Action Queries", No

DoCmd.RunSQL "UPDATE Contador SET Contador.OTrabalho = " & _
                 CStr(rsContador.Fields(0).Value + 1) & _
                 " WHERE (((Contador.Ano)='" & CStr(intAnoCorrente) & "'));"

'Turn on Update Confirmation
SETOPTION "Confirm Action Queries", Yes

Darrell L. Embrey

Cr0vaX · June 11th, 2004, 04:54 AM

That's it !

it works just fine :D

thank you

abdusalam · June 24th, 2004, 01:24 AM

Why not this... :)

DoCmd.SetWarnings 0 or 1

I know both or same but it save space ... and easy ..too

Stay Beautiful,

Abdul Salam

There is no moving creature on Earth whose sustenance is not provided by Allah. He knows its living and its resting place,
and all that is recorded in a glorious Book. (Al-Quran)