Update Query functioning in second attempt

[drunkenneo]

I have written a code in VBA

DoCmd.Save


DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE Nz(table.tktNo," & Chr(34) & "" & Chr(34) & "), Nz(table.flightNo," & Chr(34) & "" & Chr(34) & "), Nz(table.dateofTravel," & Chr(34) & "" & Chr(34) & "), Nz(table.dest," & Chr(34) & "" & Chr(34) & "), Nz(table.origin," & Chr(34) & "" & Chr(34) & ") FROM table WHERE (((table.tktNo) Is Null) OR ((table.flightNo) Is Null) OR ((table.dateofTravel) Is Null) OR ((table.dest) Is Null) OR ((table.origin) Is Null) AND ((table.staffName) = " & Forms!frm_Main!Cmb_Staff & " ))"
DoCmd.SetWarnings True
DoCmd.Close

When i press update after deleting some records it does not delete in forst Attempt, however it does in the second attempt. Please Help

[June7]

DoCmd.Save does not save record, it saves the object and any changes that were made to its design such as altering property settings.
Use DoCmd.RunCommand acCmdSaveRecord

Don't need to specify fields in DELETE action because it is deleting the entire record. The table is actually named table? Is this code behind frm_Main? If so can use Me qualifier.

CurrentDb.Execute "DELETE FROM table WHERE (tktNo Is Null Or flightNo Is Null Or dateofTravel Is Null Or dest Is Null Or origin Is Null) And staffName='" & Me.Cmb_Staff & "'"

Won't need the SetWarnings lines.

Really should use staff ID instead of staffName as criteria.

Note the apostrophe delimiters for the combobox parameter. If the value of combobox is truly text (and not a number ID), need delimiters. If it is number ID then staffName is wrong field reference.

[drunkenneo]

It worked June7, was very helpfull