Hi Graham,
You are right I am clicking X to close. I will try a close button rather.
Thanks for your help.
Dan
"Graham R Seach" wrote:
> Dan,
>
> It sounds to me like you are closing the form by clicking X, because that's
> the only thing that would try to force a save. Disable the Close box, and
> provide users with a Close button. Validate your controls in the Close
> button's Click event.
>
> Regards,
> Graham R Seach
> Microsoft Access MVP
> Canberra, Australia
> ---------------------------
>
> "danh" <(E-Mail Removed)> wrote in message
> news:B501EC90-2878-49ED-B7BD-(E-Mail Removed)...
> > Hi Graham,
> >
> > The Before Update is on the form (Form_BeforeUpdate) and this is when I do
> > the validation of txtPayment. It must be entered so if the user doesn't
> > enter it I Set the focus to this field so that he enters it before the
> > record
> > is saved. But the focus doesn't stay on txtPayment but it tries to save
> > the
> > record as I have an error saying that:
> >
> > You can't save this record at this time.
> > Ms Office may have encountered an error while trying to save a record. If
> > you close this object now the data changes you made will be lost ...
> >
> > When I say No to the above question it is only then that the focus goes to
> > txtPayment.
> >
> > Can you help me?
> > Thanks,
> > Danielle
> >
> >
> >
> > "Graham R Seach" wrote:
> >
> >> Dan,
> >>
> >> I'm assuming this is the txtPayment_BeforeUpdate event. Firstly, you
> >> can't
> >> set the focus to anything while the BeforeUpdate event is running. It
> >> seems
> >> that all you're trying to do is to retain the focus if the control's
> >> value
> >> is Null. If you set Cancel=True, then the focus will remain with that
> >> control anyway.
> >>
> >> Also, you don't need the Exit Sub line.
> >>
> >> Regards,
> >> Graham R Seach
> >> Microsoft Access MVP
> >> Canberra, Australia
> >> ---------------------------
> >>
> >> "danh" <(E-Mail Removed)> wrote in message
> >> news:11E442E3-70AB-49A5-9D95-(E-Mail Removed)...
> >> >I have the following in my Before Update:
> >> >
> >> > If IsNull(Me.txtPayment) Then
> >> > MsgBox "Pse Enter Payment....", vbCritical, "Error ..."
> >> > Me.txtPayment.SetFocus
> >> > Cancel = True
> >> > Exit Sub
> >> > End If
> >> > and it doesn't seem to Set the focus on txtPayment as it tries to
> >> > update
> >> > the record and gives me an error.
> >> > Can somebody help me ?
> >> > Thanks,
> >> > Dan
> >> >
> >> >
> >>
> >>
> >>
>
>
>
|
Similar Threads
