We help IT Professionals succeed at work.
Get Started

Need a way to cancel changes if Error in Access DB

Last Modified: 2012-05-12
I use the below code to change values in a access database which has linked tables to a SQL DB.
Most of the entries in the DB will change with no problem but some will have to be changed manually because of some other issues.
What I need is a way to modify the code attached so that if the DB throws an error like the image that I have attached, the code will cancel any changes to the record and move on to the next record.       SQL Error
RecNum = DCount("*", "LECaseSubjectQ")
MsgBox (RecNum)

    DoCmd.GoToRecord , , acFirst
Crec = 1

Do Until Crec > RecNum

strSubjectType = Form_LECaseSubjectQ.txtSubjectType.Text

If strSubjectType = "-18309" Then
    strSubjectType = "804"
End If

Form_LECaseSubjectQ.txtSubjectType.Text = strSubjectType

strSubjectType = ""

DoCmd.GoToRecord , , acNext
Crec = Crec + 1


Open in new window

Watch Question
Top Expert 2016
This problem has been solved!
Unlock 1 Answer and 2 Comments.
See Answer
Why Experts Exchange?

Experts Exchange always has the answer, or at the least points me in the correct direction! It is like having another employee that is extremely experienced.

Jim Murphy
Programmer at Smart IT Solutions

When asked, what has been your best career decision?

Deciding to stick with EE.

Mohamed Asif
Technical Department Head

Being involved with EE helped me to grow personally and professionally.

Carl Webster
CTP, Sr Infrastructure Consultant
Ask ANY Question

Connect with Certified Experts to gain insight and support on specific technology challenges including:

  • Troubleshooting
  • Research
  • Professional Opinions
Did You Know?

We've partnered with two important charities to provide clean water and computer science education to those who need it most. READ MORE