Msg: You are about to append.....

Access 2007 - - I have a tblLog that at the opening and closing of the main
form gets written to with the date and time. I have set warnings unchecked
in Access Options. All is well UNTIL I convert it to an MDE, then I get the
message about appending when I open or close the main form, and ONLY the
main form. No other table writes trigger the warning msg. Any ideas? Here
is the code in the form's load event:

'DoCmd.SetWarnings = False (I tried adding this and it triggered an error
msg)
strsql = "INSERT INTO tblLog (LogonTime) values( Now() )"
DoCmd.RunSQL (strsql)
DoCmd.OpenForm "hfrmCloseAccess", , , , , acHidden
ChangeProperty "AllowBypassKey", DB_Boolean, False


And here is the quit button:

Private Sub cmdQuit_Click()
On Error GoTo Err_cmdQuit_Click
Dim strsql As String
'DoCmd.SetWarnings = False (again, commented out because of error msg)
strsql = "INSERT INTO tblLog (LogoutTime) values( Now() )"
DoCmd.RunSQL (strsql)
CloseAllOpenForms
Application.Quit acQuitSaveAll

Exit_cmdQuit_Click:
Exit Sub

Err_cmdQuit_Click:
MsgBox Err.Description
Resume Exit_cmdQuit_Click

End Sub

Any help is appreciated. I am baffled why it only occurs in the MDE
compilation.

Damon

"Damon Heron" wrote in message
...
Access 2007 - - I have a tblLog that at the opening and closing of the
main form gets written to with the date and time. I have set warnings
unchecked in Access Options. All is well UNTIL I convert it to an MDE,
then I get the message about appending when I open or close the main form,
and ONLY the main form. No other table writes trigger the warning msg.
Any ideas? Here is the code in the form's load event:

'DoCmd.SetWarnings = False (I tried adding this and it triggered an error
msg)
strsql = "INSERT INTO tblLog (LogonTime) values( Now() )"
DoCmd.RunSQL (strsql)
DoCmd.OpenForm "hfrmCloseAccess", , , , , acHidden
ChangeProperty "AllowBypassKey", DB_Boolean, False


And here is the quit button:

Private Sub cmdQuit_Click()
On Error GoTo Err_cmdQuit_Click
Dim strsql As String
'DoCmd.SetWarnings = False (again, commented out because of error msg)
strsql = "INSERT INTO tblLog (LogoutTime) values( Now() )"
DoCmd.RunSQL (strsql)
CloseAllOpenForms
Application.Quit acQuitSaveAll

Exit_cmdQuit_Click:
Exit Sub

Err_cmdQuit_Click:
MsgBox Err.Description
Resume Exit_cmdQuit_Click

End Sub

Any help is appreciated. I am baffled why it only occurs in the MDE
compilation.


You don't say what error message you get, but I would suggest you bypass the
whole question and use CurrentDb.Execute rather then RunSQL:

CurrentDb.Execute strsql, dbFailOnError

That won't generate any warning, though it will raise an error if the SQL
statement fails.

--
Dirk Goldgar, MS Access MVP
Access tips: www.datagnostics.com/tips.html

(please reply to the newsgroup)

Thanks, Dirk. That solved the problem with the warning.

Damon

"Dirk Goldgar" wrote in message
...
"Damon Heron" wrote in message
...
Access 2007 - - I have a tblLog that at the opening and closing of the
main form gets written to with the date and time. I have set warnings
unchecked in Access Options. All is well UNTIL I convert it to an MDE,
then I get the message about appending when I open or close the main
form, and ONLY the main form. No other table writes trigger the warning
msg. Any ideas? Here is the code in the form's load event:

'DoCmd.SetWarnings = False (I tried adding this and it triggered an error
msg)
strsql = "INSERT INTO tblLog (LogonTime) values( Now() )"
DoCmd.RunSQL (strsql)
DoCmd.OpenForm "hfrmCloseAccess", , , , , acHidden
ChangeProperty "AllowBypassKey", DB_Boolean, False


And here is the quit button:

Private Sub cmdQuit_Click()
On Error GoTo Err_cmdQuit_Click
Dim strsql As String
'DoCmd.SetWarnings = False (again, commented out because of error msg)
strsql = "INSERT INTO tblLog (LogoutTime) values( Now() )"
DoCmd.RunSQL (strsql)
CloseAllOpenForms
Application.Quit acQuitSaveAll

Exit_cmdQuit_Click:
Exit Sub

Err_cmdQuit_Click:
MsgBox Err.Description
Resume Exit_cmdQuit_Click

End Sub

Any help is appreciated. I am baffled why it only occurs in the MDE
compilation.


You don't say what error message you get, but I would suggest you bypass
the whole question and use CurrentDb.Execute rather then RunSQL:

CurrentDb.Execute strsql, dbFailOnError

That won't generate any warning, though it will raise an error if the SQL
statement fails.

--
Dirk Goldgar, MS Access MVP
Access tips: www.datagnostics.com/tips.html

(please reply to the newsgroup)

On Fri, 2 Apr 2010 18:24:17 -0400, Dirk Goldgar wrote:

"Damon Heron" wrote in message
...
Access 2007 - - I have a tblLog that at the opening and closing of the
main form gets written to with the date and time. I have set warnings
unchecked in Access Options. All is well UNTIL I convert it to an MDE,
then I get the message about appending when I open or close the main form,
and ONLY the main form. No other table writes trigger the warning msg.
Any ideas? Here is the code in the form's load event:

'DoCmd.SetWarnings = False (I tried adding this and it triggered an error
msg)
strsql = "INSERT INTO tblLog (LogonTime) values( Now() )"
DoCmd.RunSQL (strsql)
DoCmd.OpenForm "hfrmCloseAccess", , , , , acHidden
ChangeProperty "AllowBypassKey", DB_Boolean, False


And here is the quit button:

Private Sub cmdQuit_Click()
On Error GoTo Err_cmdQuit_Click
Dim strsql As String
'DoCmd.SetWarnings = False (again, commented out because of error msg)
strsql = "INSERT INTO tblLog (LogoutTime) values( Now() )"
DoCmd.RunSQL (strsql)
CloseAllOpenForms
Application.Quit acQuitSaveAll

Exit_cmdQuit_Click:
Exit Sub

Err_cmdQuit_Click:
MsgBox Err.Description
Resume Exit_cmdQuit_Click

End Sub

Any help is appreciated. I am baffled why it only occurs in the MDE
compilation.

You don't say what error message you get, but I would suggest you bypass the
whole question and use CurrentDb.Execute rather then RunSQL:

CurrentDb.Execute strsql, dbFailOnError

That won't generate any warning, though it will raise an error if the SQL
statement fails.

Shouldn't the SetWarnings commands have been written
DoCmd.SetWarnings False
DoCmd.SetWarnings True

(without the = sign)?

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail

Yes,
but I tried it both ways (still got an error msg) and the code below was
remarked out

Damon

"fredg" wrote in message
...
On Fri, 2 Apr 2010 18:24:17 -0400, Dirk Goldgar wrote:

"Damon Heron" wrote in message
...
Access 2007 - - I have a tblLog that at the opening and closing of the
main form gets written to with the date and time. I have set warnings
unchecked in Access Options. All is well UNTIL I convert it to an MDE,
then I get the message about appending when I open or close the main
form,
and ONLY the main form. No other table writes trigger the warning msg.
Any ideas? Here is the code in the form's load event:

'DoCmd.SetWarnings = False (I tried adding this and it triggered an
error
msg)
strsql = "INSERT INTO tblLog (LogonTime) values( Now() )"
DoCmd.RunSQL (strsql)
DoCmd.OpenForm "hfrmCloseAccess", , , , , acHidden
ChangeProperty "AllowBypassKey", DB_Boolean, False


And here is the quit button:

Private Sub cmdQuit_Click()
On Error GoTo Err_cmdQuit_Click
Dim strsql As String
'DoCmd.SetWarnings = False (again, commented out because of error msg)
strsql = "INSERT INTO tblLog (LogoutTime) values( Now() )"
DoCmd.RunSQL (strsql)
CloseAllOpenForms
Application.Quit acQuitSaveAll

Exit_cmdQuit_Click:
Exit Sub

Err_cmdQuit_Click:
MsgBox Err.Description
Resume Exit_cmdQuit_Click

End Sub

Any help is appreciated. I am baffled why it only occurs in the MDE
compilation.

You don't say what error message you get, but I would suggest you bypass
the
whole question and use CurrentDb.Execute rather then RunSQL:

CurrentDb.Execute strsql, dbFailOnError

That won't generate any warning, though it will raise an error if the SQL
statement fails.

Shouldn't the SetWarnings commands have been written
DoCmd.SetWarnings False
DoCmd.SetWarnings True

(without the = sign)?

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail

Yes,
but as a test, I tried it both ways (still got an error msg) and the code
below was
remarked out to show I had tried setting warnings off....

Damon




"fredg" wrote in message
...
On Fri, 2 Apr 2010 18:24:17 -0400, Dirk Goldgar wrote:

"Damon Heron" wrote in message
...
Access 2007 - - I have a tblLog that at the opening and closing of the
main form gets written to with the date and time. I have set warnings
unchecked in Access Options. All is well UNTIL I convert it to an MDE,
then I get the message about appending when I open or close the main
form,
and ONLY the main form. No other table writes trigger the warning msg.
Any ideas? Here is the code in the form's load event:

'DoCmd.SetWarnings = False (I tried adding this and it triggered an
error
msg)
strsql = "INSERT INTO tblLog (LogonTime) values( Now() )"
DoCmd.RunSQL (strsql)
DoCmd.OpenForm "hfrmCloseAccess", , , , , acHidden
ChangeProperty "AllowBypassKey", DB_Boolean, False


And here is the quit button:

Private Sub cmdQuit_Click()
On Error GoTo Err_cmdQuit_Click
Dim strsql As String
'DoCmd.SetWarnings = False (again, commented out because of error msg)
strsql = "INSERT INTO tblLog (LogoutTime) values( Now() )"
DoCmd.RunSQL (strsql)
CloseAllOpenForms
Application.Quit acQuitSaveAll

Exit_cmdQuit_Click:
Exit Sub

Err_cmdQuit_Click:
MsgBox Err.Description
Resume Exit_cmdQuit_Click

End Sub

Any help is appreciated. I am baffled why it only occurs in the MDE
compilation.

You don't say what error message you get, but I would suggest you bypass
the
whole question and use CurrentDb.Execute rather then RunSQL:

CurrentDb.Execute strsql, dbFailOnError

That won't generate any warning, though it will raise an error if the SQL
statement fails.

Shouldn't the SetWarnings commands have been written
DoCmd.SetWarnings False
DoCmd.SetWarnings True

(without the = sign)?

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail