Refresh in multi-user environment 2

[giovi2002]

I'll be having 8 people data entrying in my new adp.
You guess, when person A is working in the same screen as person B and has edited a record person B would like to see the edits.

How can I easily achieve this without having them to use a refresh button?

 

[belovedcej]

I am getting ready to implement something similar - I would love any advice, too!

I use bound forms for the view and unbound forms for adds/updates (user's don't know the difference.)

 

[giovi2002]

Ok, with this kind of strategy does it work?
Because of your commit statement does it force the clients to refresh?

I personally dislike the insert/update/delete proc's because users have to push buttons for each thing they wanna do.

 

[giovi2002]

I checked out the strategy with different proc's but didn't work, my screen didn't refresh

 

[danvlas]

Maybe use the OnTimer event of the form?

Me.Refresh

for a TimerInterval of 5000 (5 seconds)?


Set the TimerInterval to 0 when you start editing a record, put it back AfterUpdate...


HTH




Daniel Vlas
Systems Consultant

http://www.geocities.com/danvlas/AutoMail.html

 

[giovi2002]

I'll check it out. In a book I read the timer doesn't work for ADE but I'll check it out.

 

[danvlas]

You can throw that book away. It works.

HTH


Daniel Vlas
Systems Consultant

http://www.geocities.com/danvlas/AutoMail.html

 

[giovi2002]

I've been using the on timer event
and do also use code for after insert (simply
Private Sub Form_AfterInsert()
On Error GoTo Form_AfterInsert_Error

Me.Refresh
DoCmd.GoToRecord acActiveDataObject, , acNewRec

On Error GoTo 0
Exit Sub

Form_AfterInsert_Error:

MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure Form_AfterInsert of VBA Document Form_subfrmGebruikersbeheer"
End Sub

This type of code, also of daniel, will bring me back to the next record after the 'updated one'

Dim varBkm As Variant

varBkm = Me.Recordset.Bookmark
Me.Refresh
Me.Recordset.Bookmark = varBkm
DoCmd.GoToRecord acActiveDataObject, , acNext

 

[belovedcej]

Thanks for the advice, Daniel - that makes sense. I was wondering how to handle the refresh as well.