VB Code:
On Error Resume Next 'Err handling ADOCn.BeginTrans 'setup your rs here ADOCn.Execute "DELETE FROM Permits WHERE [Tract_ID] = " & Combo1.SelText If Err.Number <> 0 Then ADOCn.Rollback Else ADOCn.Execute "DELETE FROM Permitsw WHERE [Tract_ID] = " & Combo1.SelText If Err.Number <> 0 Then ADOCn.Rollback Else ADOCn.CommitTrans End If End If rsvalues.Update rsvalues.moveprevious On Error GoTo 0
So basically I want it to delete the record that is tied to the field "Tract_ID" And a user selects which record out of the field from a combobox....
BUT ITS ADDING A BLANK NEW FIELD![]()





Reply With Quote