[AccessD] Error Closing Form

Seems like it might be trying to close it twice or again after it's already 
closed. Try setting a breakpoint at the beginning of this routine and when 
it gets to it use the F8 key to step through. Perhaps it's trying to loop 
back someplace.  Or maybe something is contaminated in the form itself? try 
to create a new form and paste everything into the new form. Long shot but 
I've had that happen. It's worth a shot. You have the name of the form 
spelled right everywhere it's used right? Haven't renamed it or copied from 
another one? Or maybe trying to close it from another form?

Gary Kjos
garykjos at hotmail.com





>From: "Hollis,Virginia" <HollisVJ at pgdp.usec.com>
>Reply-To: Access Developers discussion and problem 
>solving<accessd at databaseadvisors.com>
>To: "'Access Developers discussion and problem solving'" 
><accessd at databaseadvisors.com>
>Subject: RE: [AccessD] Error Closing Form
>Date: Thu, 05 Feb 2004 14:27:08 -0600
>
>It isn't stopping, the form closes, Then I get the message so I don't know
>where the problem is. Is there a way I can tell?
>
>Virginia
>
>-----Original Message-----
>From: Gary Kjos [mailto:garykjos at hotmail.com]
>Sent: Thursday, February 05, 2004 2:10 PM
>To: accessd at databaseadvisors.com
>Subject: RE: [AccessD] Error Closing Form
>
>
>Did you comment out any "on error" statement so it stops an the error line?
>What line is it failing on?
>
>
>
>Gary Kjos
>garykjos at hotmail.com
>
>
>
>
>
> >From: "Hollis,Virginia" <HollisVJ at pgdp.usec.com>
> >Reply-To: Access Developers discussion and problem
> >solving<accessd at databaseadvisors.com>
> >To: "'Access Developers discussion and problem solving'"
> ><accessd at databaseadvisors.com>
> >Subject: [AccessD] Error Closing Form
> >Date: Thu, 05 Feb 2004 11:32:21 -0600
> >
> >I have the code shown below on a command button that closes a form. The
> >form
> >is a data entry form with a checkbox that will cancel the request by
> >changing the status to 3 (canceled). If the status = canceled then the 
>form
> >will close. If an entry has been made on the form, there are certain
> >required fields that must be completed before closing.
> >
> >Problem: Everything works fine except when I check the Cancel box. The
> >status changes from 1 (Pending) to 3 (Canceled) & the form will close, 
>but
> >I
> >get an error, "Can't find frmPermitEntry refered to in a macro of visual
> >basic code".
> >
> >I tried commenting out different sections of the code, but I can't find 
>the
> >problem. What I don't understand, I have used this same code before 
>without
> >any problems. What am I missing?
> >
> >********************
> >
> >If PStatusID = 3 Then DoCmd.Close 'Request has been canceled
> >
> >If Forms!frmPermitEntry.Dirty = True Then    'Data Entered?  Yes
> >    If Len(PRequestorID & "") = 0 Then
> >         MsgBox "A requestor must be entered." & vbCrLf, vbCritical, "
> >Entry
> >Required"
> >         PRequestorID.SetFocus
> >     ElseIf Len(PNeedByDate & "") = 0 Then
> >         MsgBox "The date needed must be entered." & vbCrLf, vbCritical, 
>"
> >Entry Required"
> >         PNeedByDate.SetFocus
> >     ElseIf Len(PTypeWork & "") = 0 Then
> >         MsgBox "The type of work must be entered." & vbCrLf, vbCritical, 
>"
> >Entry Required"
> >         PTypeWork.SetFocus
> >
> >     Else
> >
> >          Response = MsgBox("Do you want to Exit?", vbYesNo + vbQuestion,
> >"Exit")
> >          If Response = vbNo Then
> >            PRequestorID.SetFocus
> >          Else
> >              DoCmd.RunCommand acCmdSaveRecord
> >             DoCmd.Close acForm, "frmPermitEntry"
> >          End If
> >       End If
> >
> >Else
> >    DoCmd.Close acForm, "frmPermitEntry"
> >End If
> >_______________________________________________
> >AccessD mailing list
> >AccessD at databaseadvisors.com
> >http://databaseadvisors.com/mailman/listinfo/accessd
> >Website: http://www.databaseadvisors.com
>
>_________________________________________________________________
>Check out the new MSN 9 Dial-up - fast & reliable Internet access with 
>prime
>
>features! http://join.msn.com/?pgmarket=en-us&page=dialup/home&ST=1
>
>_______________________________________________
>AccessD mailing list
>AccessD at databaseadvisors.com
>http://databaseadvisors.com/mailman/listinfo/accessd
>Website: http://www.databaseadvisors.com
>_______________________________________________
>AccessD mailing list
>AccessD at databaseadvisors.com
>http://databaseadvisors.com/mailman/listinfo/accessd
>Website: http://www.databaseadvisors.com

_________________________________________________________________
Scope out the new MSN Plus Internet Software — optimizes dial-up to the max! 
   http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1