Worked in 97, no go in XP

[Preston]

This code used to work in 97. Even though the error
handler catches the error: It still hangs access. Can't
go to design view. What gives?

Method 'Recalc' of Object '_Form_APItems_SubNLI' failed

On Error GoTo Err_Amount_AfterUpdate
Forms![AP_NLI]![Mk_Pmt_PdItems_NLI].Form.Recalc
Forms![AP_NLI]![Credit] = Forms![AP_NLI]!
[Mk_Pmt_PdItems_NLI].Form.[Ctotal]
'MsgBox "Waiting"
'SendKeys "{PGDN}{RIGHT}{Right}"
Exit_Amount_AfterUpdate:
Exit Sub

Err_Amount_AfterUpdate:
MsgBox Err.Description
Resume Exit_Amount_AfterUpdate

End Sub

Thanks,

Preston

 

[Maria from Sweden]

Hi there!

I'm sorry to say but it seems likes one has make some
pages/forms over again when one goes from an older version
of Access to XP....I had the same problem...

Maybe you could help me with my problem (see further down),

Cheers
//Maria

 

[Preston]

Acutually, hitting F9 will cause access to shut down also.

Thanks, I'll rebuild the form and see if that works.

-----Original Message-----
Hi there!

I'm sorry to say but it seems likes one has make some
pages/forms over again when one goes from an older version
of Access to XP....I had the same problem...

Maybe you could help me with my problem (see further down),

Cheers
//Maria

-----Original Message-----
This code used to work in 97. Even though the error
handler catches the error: It still hangs access. Can't
go to design view. What gives?

Method 'Recalc' of Object '_Form_APItems_SubNLI' failed

On Error GoTo Err_Amount_AfterUpdate
Forms![AP_NLI]! [Mk_Pmt_PdItems_NLI].Form.Recalc
Forms![AP_NLI]![Credit] = Forms![AP_NLI]!
[Mk_Pmt_PdItems_NLI].Form.[Ctotal]
'MsgBox "Waiting"
'SendKeys "{PGDN}{RIGHT}{Right}"
Exit_Amount_AfterUpdate:
Exit Sub

Err_Amount_AfterUpdate:
MsgBox Err.Description
Resume Exit_Amount_AfterUpdate

End Sub

Thanks,

Preston
.

.