Charlotte Foust
charlotte.foust at gmail.com
Tue Apr 9 13:36:04 CDT 2013
Why don't you post your code, Rocky, so we can try and spot anything out of whack rather than just guessing. Charlotte On Tue, Apr 9, 2013 at 11:32 AM, Rocky Smolin <rockysmolin at bchacc.com>wrote: > In my case, the combo is on the bound form where they want to add the > record. But something like that may work. > > R > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman > Sent: Tuesday, April 09, 2013 10:06 AM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Not In List Not the Right Solution > > > Not in list is the right event. Would go something like this: > > Private Sub cboPatient_NotInList(NewData As String, Response As Integer) > > 10 gstrMBTitle = "Patient not on file" > 20 gstrMBMsg = "Do you wish to add?" > 30 gintMBDef = vbYesNo + vbExclamation + vbDefaultButton1 > 40 gintMBResp = MsgBox(gstrMBMsg, gintMBDef, gstrMBTitle) > > 50 If gintMBResp = vbYes Then > 60 DoCmd.OpenForm "frmPatients", acNormal, , , acFormEdit, acDialog, > "ADD;EXITTOFORM=frmVisits" > 70 Response = DATA_ERRADDED > 80 Else > 90 Response = DATA_ERRCONTINUE > 100 End If > > > End Sub > > This pops up a form, let's the record get added, then forces a requery of > the combo and another lookup (Response = DATA_ERRADDED). > > Jim. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin > Sent: Tuesday, April 09, 2013 12:24 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Not In List Not the Right Solution > > Dear List: > > I have a request from a user that when they try to find a name in a combo > box if the name is not there, that the program go to add a new record and > place the data entered in the combo box in the last name field and let them > finish entering the new data. > > I tried the NotInList event until I realized this is to add entries to the > combo box. But I can't seem to get it to behave properly - it goes into a > loop displaying my "add then new guy now?" not in list message. > > I think Not In List is not the best way to do this, but don't know how > else. > > Any ideas? > > MTIA > > Rocky Smolin > Beach Access Software > 858-259-4334 > www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com > <http://www.e-z-mrp.com/> > Skype: rocky.smolin > > -- > 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 > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com >