Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Multi-utilisateur....dès la conception.

Multi-utilisateur....dès la conception.

6 réponses
Avatar
Danny
Bonjour !!

Est-ce qu'il y a quelque chose de spécial a faire pour que mon application
Access 2000 soit multiutilisateur en réseau ? C'est une nouvelle application
et je veux être sur qu'elle sera multi-utilisateur, alors si il y a quelque
chose a tenir compte des la conception , j'aimerais le savoir !

(J'ai un DATA centrale sur le réseau, et les gens on le formulaire sur leur
poste (avec tables liées).)

Merci beaucoup !!
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
3stone
Salut,

"Danny"
| Est-ce qu'il y a quelque chose de spécial a faire pour que mon application
| Access 2000 soit multiutilisateur en réseau ? C'est une nouvelle application
| et je veux être sur qu'elle sera multi-utilisateur, alors si il y a quelque
| chose a tenir compte des la conception , j'aimerais le savoir !
|
| (J'ai un DATA centrale sur le réseau, et les gens on le formulaire sur leur
| poste (avec tables liées).)

C'est la bonne méthode...
Regarde en plus tous les verrouillages !

Dans Outils, Options, onglet Avancé
- Verrouillage par défaut: Enregistrement modifié

idem pour les formulaires, dans les propriétés, onglet Données
- Verrouillage: enregistrement modifié.


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw
Avatar
Danny
Merci beaucoup 3stone !!!
Ca me rassure, et merci pour les "hints" pour les 2 type de verouillages,
j'avais pas vu celui pour les formulaires.

;0)

Lachez pas ! vous faites de l'excellent boulot !!!

Danny.


Salut,

"Danny"
| Est-ce qu'il y a quelque chose de spécial a faire pour que mon application
| Access 2000 soit multiutilisateur en réseau ? C'est une nouvelle application
| et je veux être sur qu'elle sera multi-utilisateur, alors si il y a quelque
| chose a tenir compte des la conception , j'aimerais le savoir !
|
| (J'ai un DATA centrale sur le réseau, et les gens on le formulaire sur leur
| poste (avec tables liées).)

C'est la bonne méthode...
Regarde en plus tous les verrouillages !

Dans Outils, Options, onglet Avancé
- Verrouillage par défaut: Enregistrement modifié

idem pour les formulaires, dans les propriétés, onglet Données
- Verrouillage: enregistrement modifié.


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw




Avatar
Jc
Bonjour(soir),

"3stone" a écrit dans le message de news:
%
Salut,

idem pour les formulaires, dans les propriétés, onglet Données
- Verrouillage: enregistrement modifié.


Je viens de lire ce message. Quelqu'un a-t'il une routine pour mettre à jour
tous les formulaires d'une base de données (Verrouillage: enregistrement
modifié) ?

Merci et
--
Bonne fin de journée.
----------------------------------------
Jclg88
Cliquer sur ce lien pour me joindre par mél :
http://cerbermail.com/?JVKAlLV1Rf
----------------------------------------

Avatar
Jc
Bonjour(soir) Tous,

"Jc" a écrit dans le message de news:
%
Bonjour(soir),

"3stone" a écrit dans le message de news:
%
Salut,

idem pour les formulaires, dans les propriétés, onglet Données
- Verrouillage: enregistrement modifié.


Je viens de lire ce message. Quelqu'un a-t'il une routine pour mettre à
jour tous les formulaires d'une base de données (Verrouillage:
enregistrement modifié) ?


Personne pour un début de piste ou mieux un début de code ?

Merci et
--
Bonne fin de journée.
----------------------------------------
Jclg88
Cliquer sur ce lien pour me joindre par mél :
http://cerbermail.com/?JVKAlLV1Rf
----------------------------------------


Avatar
3stone
Salut,

"Jc"

| > "3stone"
| >> idem pour les formulaires, dans les propriétés, onglet Données
| >> - Verrouillage: enregistrement modifié.
| >
| > Je viens de lire ce message. Quelqu'un a-t'il une routine pour mettre à
| > jour tous les formulaires d'une base de données (Verrouillage:
| > enregistrement modifié) ?
|
| Personne pour un début de piste ou mieux un début de code ?



Tu peux utiliser ceci (dans un module général) :


Function SetLock(Optional intValeur As Integer = 2)
'//
'// Usage: Call SetLock(x)
'//
'// Valeur de 'x' : 0 = Aucun
'// 1 = Général
'// 2 = Enregistrement modifié
'// Si omis, la valeur 2 est utilisée
'//
Dim frm As Object
DoCmd.Echo False
For Each frm In CurrentProject.AllForms
DoCmd.OpenForm frm.Name, acDesign
Forms(frm.Name).Properties("RecordLocks").Value = intValeur
DoCmd.Close acForm, frm.Name, acSaveYes
Next frm
DoCmd.Echo True
End Function




Dans la fenêtre d'exécution directe ( Ctrl + G ) tu tape simplement:

Call SetLock



--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw
Avatar
Jc
Bonjour(soir) Pierre,

"3stone" a écrit dans le message de news:

Salut,
Tu peux utiliser ceci (dans un module général) :


Function SetLock(Optional intValeur As Integer = 2)
'//
'// Usage: Call SetLock(x)
'//
'// Valeur de 'x' : 0 = Aucun
'// 1 = Général
'// 2 = Enregistrement modifié
'// Si omis, la valeur 2 est utilisée
'//
Dim frm As Object
DoCmd.Echo False
For Each frm In CurrentProject.AllForms
DoCmd.OpenForm frm.Name, acDesign
Forms(frm.Name).Properties("RecordLocks").Value = intValeur
DoCmd.Close acForm, frm.Name, acSaveYes
Next frm
DoCmd.Echo True
End Function


Sympa d'avoir répondu... Un grand merci.

Seul (petit) problème, je suis en 97 et (me semble-t'il) CurrentProject
provoque une erreur de compilation.

Alors j'ai (un peu) modifié :

Function SetLock(Optional intValeur As Integer = 2)
On Error GoTo SetLock_Err
MsgBox "on débute"
Dim bds As Database, ctr As Container, doc As Document
DoCmd.Echo False
Set bds = CurrentDb
Set ctr = bds.Containers!Forms
For Each doc In ctr.Documents
DoCmd.OpenForm doc.Name, acDesign
Forms(doc.Name).Properties("RecordLocks").Value = intValeur
DoCmd.Close acForm, doc.Name, acSaveYes
Next doc
SetLock_Exit:
Set bds = Nothing
DoCmd.Echo True
MsgBox "c'est fini"

Exit Function
SetLock_Err:
MsgBox Err.Number & " " & Err.Description

Resume SetLock_Exit

End Function

et çà marche ! ;-)))))))))))))))

Encore merci et
--
Bonne fin de journée.
----------------------------------------
Jclg88
Cliquer sur ce lien pour me joindre par mél :
http://cerbermail.com/?JVKAlLV1Rf
----------------------------------------