After Update Event

[halem2]

Good morning you all Access Elders:

running Access 2000.

I have a form with the following code (I found somewhere in the forum and modified it to fit my needs) in the BeforeUpdate event of a form


On Error GoTo Err

If Me.VeroDivisions_ID = "" Or IsNull(Me.VeroDivisions_ID) = True Then
MsgBox "Division can't be left blank"
DoCmd.SetWarnings False
Cancel = True
DoCmd.SetWarnings True
End If

Exit Sub

Err:

but it is not working. I'm trying to force the user to populate the field before moving to the next record.

Can anyone tell me what I'm doing wrong?

thanks.

 

[rainman89]

If (Me.VeroDivisions_ID & ""="") Then
MsgBox "Division can't be left blank"
DoCmd.SetWarnings False
Cancel = True
DoCmd.SetWarnings True
End If

Better way to do this

 

[halem2]

thanks for the help rainman89 but it still doesn't work. Am I using the correct Event? I have it on the BeforeUpdate event of the form.

 

[rainman89]

Is this the only field required that u need to have required?
also u should probably put it in the afterupdate of the form. not before

Im sure one of the "Wiser" members here will correct me.

 

[halem2]

yeap, that's the only field. I also tried the AfterUpdate but got nothing either.

 

[rainman89]

is the default of the divisionID set to 0 or null?

 

[halem2]

set to null. that's whay I included the evaluation for Null in my original ?

" If Me.VeroDivisions_ID = "" Or IsNull(Me.VeroDivisions_ID) = True Then "

 

[rainman89]

If you set default to Null in the table design and then place what i gave u in the after update of the form it will work!
edit: it will throw the error but allow the change

 

[rainman89]

Do you have a button that moves to the next record?
if so put this in the buttons on click

If (Me.VeroDivisions_ID & "" = "") Then
MsgBox "Division can't be left blank"
Cancel = True
Else
DoCmd.GoToRecord , , acNewRec
End If

 

[halem2]

let me try setting it ot null...
and no, I don't have a button. I'm using the form's controls

 

[rainman89]

ok then in the table design set it to required. that should fix the problem

 

[halem2]

your code works just fine when setting the table's default value to Null.

I can KICK myself in the rear for not remembering about the "Required" on the table.

thanks Rainman89...

 

[rainman89]

I can KICK myself in the rear for not remembering about the "Required" on the table.
thanks Rainman89...

Ah it happens to us all.
Glad to help

 

[Rich]

Any validation code belongs in the BeforeUpdate event of the form, not the AfterUpdate