Master and Detail Split Form View

[james28]

Hello all!
I am a bit confused about how to proceed and I was hoping that someone could give me an idea of how to proceed. I have a single table full of data. I realize that this is not the proper way to do it, but due to other constraints, I can not split it up. The table is basically a list of students. Each student has several statistics associated with them, like age, name, ID, and teacher. I have users that I want to be able to edit records, but I want to give them a nice UI to do it in.


What I need is some form of UI/form that will allow a user to display all records in the database in two parts. The first part, would be a condensed list (maybe just student name and ID) in a format that is not able to be edited. When a student is clicked on, another section of the page loads the full record, but not in the standard table view. I would like for it to be a form that can be design and formatted as I need. The full record needs to be editable.

Is there a certain type of form that will allow me to establish this sort of view?

Thank you for any guidance that you can provide!

[pbaldy]

Have you tried the split form?

http://office.microsoft.com/en-us/ac...010075994.aspx

[azhar2006]

Look at this
http://www.btabdevelopment.com/ts/de...aspx?PageId=14

[james28]

Thank you very much for the guidance. That seems to be very close to what I am trying to do. I have done some initial testing and I have noticed something that I can not seem to change. I want users to have a submit button of some sort to commit any changes that they make in the top part of the form to the database. Is this possible?


Thank you all again!

[June7]

Data entry/edit is committed to table when moving to another record, close form, or run code.

[james28]

One thing to add/clarify,

I can add a "save record" button no problem. When pressed, it immediately saves the changes that have been made. The issue is that, even with the button present, if you make a change, do not click "save record", and close the form, the change is committed. Is there some way to make it so that the only way a change is saved is with the "save record" button?


Thank you!

[james28]

Data entry/edit is committed to table when moving to another record, close form, or run code.

June, thank you for the reply. You responded as I was typing my additional reply. Is there a way to disable all of the things that you said, except my "save record" button?

[June7]

I always disable the X close button and provide users with custom buttons to close form. I have "Cancel/Quit" and "Save/Quit" button options. If Cancel/Quit then 'undo edits' code runs. However, I have only been able to get this to work by using Sendkeys method with {ESC}{ESC}.

Another possibility may be to have a variable declared in form code module header: booSave

Boolean variable default is False. If user clicks "Save", code in the button Click event would set the variable True. Code in form BeforeUpdate event would check this variable and if True allow data to commit and reset variable to False, otherwise abort.

However, I find that this is more complicated in form/subform structure. I have one arrangement with 4 subforms and changing focus between subforms commits records. My "Cancel/Quit" is then ineffective.

[james28]

I was able to dig up this bit of code.
Dim saveAns As Integer

saveAns = MsgBox("Do you want to exit without saving changes?", vbYesNo)

If saveAns = vbYes Then
Me.Undo
Else
Cancel = TRUE
End If
I added it to the before update of the form.


It only partially works as needed though. When closing the form, with a change that has not been saved, it gives the pop up. If I say yes, the form closes and no change is saved. If I hit no, it does not close and takes me back to the form. The change is not saved at this point.

The "save record" button that I created does not function any longer. It does the same thing as if I tried to close the form, when I press it.



Any idea how to fix this? Thank you!

[June7]

I tried your code and when clicking no I get "... can't save record ... do you want to close the database object anyway ..."

Did you review my previous post?

[james28]

June,

Thank you for the reply. I did not see it prior to my post. Could you please share the code that you use for both of your example buttons?



Also, I was not able to reproduce the error that you get from my code. I have included it again, incase I missed part of it.


Thank you again!

Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim saveAns As Integer
    
    saveAns = MsgBox("Do you want to exit without saving changes?", vbYesNo)
    
    If saveAns = vbYes Then
        Me.Undo
    Else
        Cancel = True
    End If
End Sub

[June7]

All I did was copy/paste your code into my form code module. I make data edit then click the X close button which is still active for this form. First the MsgBox runs and after click No, the second message opens.

Here is my Cancel button code:

Private Sub btnCancel_Click()
'using SendKeys because could not get Undo to work.
SendKeys "{ESC}", True
SendKeys "{ESC}", True
DoCmd.Close acForm, Me.Name, acSaveNo
End Sub

Save button just closes the form.

[Missinglinq]

The code

Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim saveAns As Integer
    
    saveAns = MsgBox("Do you want to exit without saving changes?", vbYesNo)
    
    If saveAns = vbYes Then
        Me.Undo
    Else
        Cancel = True
    End If
End Sub

prevents the Update from happening, regardless of whether you click on Yes or No! Drop the Else Clause:

Private Sub Form_BeforeUpdate(Cancel As Integer)

Dim saveAns As Integer
    
    saveAns = MsgBox("Do you want to exit without saving changes?", vbYesNo)
    
    If saveAns = vbYes Then
        Me.Undo
    End If

End Sub

Linq ;0)>

[james28]

June,
Thank you for the reply. That is very odd that it acts that way for you. I tried your code, but I now see what you were getting at before. With this setup, when a user changes records, it saves the changes.




Missinglinq,

Thank you for finding the issue with the code. That seems to have made it run as expected when the form is closed. The problem now is when ever I use a "save record" button, the same message pops up. Do you know of any way to suppress the message for the save record button?


Thank you both!

[June7]

Review post 8.