Steven-
If your command button is on the outer form, then any "dirty" record in the
subform will be automatically saved by Access as soon as the focus moves to the
outer form. You can test for Dirty in the subform only as long as the focus
stays there.
John Viescas, author
Microsoft Office Access 2010 Inside Out
Microsoft Office Access 2007 Inside Out
Building Microsoft Access Applications
Microsoft Office Access 2003 Inside Out
SQL Queries for Mere Mortals
http://www.viescas.com/
(Paris, France)
-----Original Message-----
From: MS_Access_Professionals@yahoogroups.com
[mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of S and M
Sent: Thursday, May 26, 2011 10:29 PM
To: MS_Access_Professionals@yahoogroups.com
Subject: [MS_AccessPros] Re: On Dirty
John,
This works great. I also want to check Dirty on the subform as well. I thought
it would be
Me!subform.form.Dirty or Me!Subform1.Form!Dirty but neither work.
I have this link,...http://access.mvps.org/access/forms/frm0031.htm but maybe I
cannot do this.
Thanks, Steven
--- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@...> wrote:
>
> Steven-
>
> In the code for your command button, add:
>
> ' If unsaved changes
> If Me.Dirty Then
> If vbYes = MsgBox("Do you want to save changes before " & _
> " you add a new record?", vbYesNo + vbQuestion + vbDefaultButton2) Then
> ' Save the record
> Me.Dirty = False
> Else
> ' Bail
> Exit Sub
> End If
> End If
> ' Go to new record here
>
> John Viescas, author
> Microsoft Office Access 2010 Inside Out
> Microsoft Office Access 2007 Inside Out
> Building Microsoft Access Applications
> Microsoft Office Access 2003 Inside Out
> SQL Queries for Mere Mortals
> http://www.viescas.com/
> (Paris, France)
>
>
>
> -----Original Message-----
> From: MS_Access_Professionals@yahoogroups.com
> [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of S and M
> Sent: Thursday, May 26, 2011 9:27 PM
> To: MS_Access_Professionals@yahoogroups.com
> Subject: [MS_AccessPros] On Dirty
>
> Ok,...I now have a combo box I can select an entry to edit. I also added a
> command button to select a new record if it is an addition.
>
> To prevent accidentally changing data I think I need to add code so that if
the
> cmdNewMember button is clicked, a message box will pop up asking to save the
> current changes.
>
> Is the On Dirty event that right place to put this code?
>
> It is my understanding (please correct if I am wrong) that Dirty will be true
if
> anything on the form has been changed (not by code). So If Dirty is false,
then
> going to a new record is ok,...If Dirty is true, then we either have to save
the
> changes or cancel.
>
> Thanks for all the help,
>
> Stevn
>
>
>
> --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@> wrote:
> >
> > Steven-
> >
> > You need a separate *unbound* combo box named cmbMemberLookup. (Unbound
means
> > the control has no Control Source.) Use the same Row Source that you had
for
> > MemberID, and add this code:
> >
> > Private Sub cmbMemberLookup_AfterUpdate()
> >
> > Me.Recordset.FindFirst "MemberID = " & Me.cmbMemberLookup
> >
> > End Sub
> >
> > Private Sub Form_Current()
> >
> > ' Keep the search combo in sync with the current record
> > Me.cmbMemberLookup = Me.MemberID
> >
> > End Sub
> >
> >
> > John Viescas, author
> > Microsoft Office Access 2010 Inside Out
> > Microsoft Office Access 2007 Inside Out
> > Building Microsoft Access Applications
> > Microsoft Office Access 2003 Inside Out
> > SQL Queries for Mere Mortals
> > http://www.viescas.com/
> > (Paris, France)
> >
> >
> >
> > -----Original Message-----
> > From: MS_Access_Professionals@yahoogroups.com
> > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of S and M
> > Sent: Wednesday, May 25, 2011 11:53 PM
> > To: MS_Access_Professionals@yahoogroups.com
> > Subject: [MS_AccessPros] Selecting a record set with a combo box
> >
> > Hi all,
> >
> > I created a form with a sub form to edit / enter data into two tables.
> > Everything works great and I can edit / add records and they save fine.
> >
> > My problem will be when the tables get several hundred entries. I need to
be
> > able to select the entry I want to edit from a drop down box.
> >
> > The two forms are linked by MemberID,..the main forms record source is
> >
> > the main table and the subform is a select statement of other table.
> >
> > If I change the memberID field to a combo box, and add a select statement,
it
> > will list the ID's but will not allow me to select one.
> >
> > What am I not doing?
> >
> > Thanks, Steven
> >
> >
> >
> > ------------------------------------
> >
> > Yahoo! Groups Links
> >
>
>
>
>
> ------------------------------------
>
> Yahoo! Groups Links
>
------------------------------------
Yahoo! Groups Links
Tidak ada komentar:
Posting Komentar