Ready to improve network connectivity? Watch this webinar to learn how SD-WANs and a one-click instant connect tool can boost provisions, deployment, and management of your cloud connection.
On Error GoTo Command13_Click_Err 'Call the macro to check for empty records If IsNull(Me.SerialNumber) = True Then GoTo DirtyCheck Else 'Forms!frmSkusEntry!SerialNumber.Requery GoTo Command13_Click_Exit End If DirtyCheck: If Me.Dirty = True Then msgbox "Not All Fields Were Completely Filled Out! Do you want to Still Exit Without Saving?", vbYesNo If vbNo Then Exit Sub Else Me.Undo Else If Me.Dirty = False Then GoTo Command13_Click_Exit End If End If Command13_Click_Exit: DoCmd.Close ObjectType:=acForm, ObjectName:=Me.Name, Save:=acSavePrompt Exit Sub Command13_Click_Err: msgbox Error$ Resume Command13_Click_Exit End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.