Discussion :

[Dolphy35]

Bonjour à tous,

Vous pouvez sur cette discussion commenter l'article suivant :
http://dolphy35.developpez.com//arti.../basesreseaux/

L'avez vous lu?
Le trouvez vous intéressant?
Commentaires, critiques, remerciement, ... Tout est bienvenue si c'est constructif.

Pensez également à ajouter une note. ("Noter la discussion" en haut à droite)
Votre avis nous intéresse.

[curt]

Bonjour Dolphy35,

article très intéressant. J'y ai trouvé (il faut que je teste ça) la possibilité de pouvoir installer une base frontale (via runtime) avec la base dorsale installée sur différents lecteurs (appli à installer sur plusieurs sites avec des unités de lecteurs différents. J'avais déjà évoqué cette question sur le forum, mais pour le coup, ton explication est limpide.

Merci.
Curt

[xavsuderrone]

Salut Dolphi35 et lecteurs,

Ce Tuto est bien interessant (par defaut je suis tente de dire!) et surtout bien abordable avec une premiere approche de realisation en mode "assiste" si je puis dire. Dans une manip sensible comme celle ci qui effrait (etant un debutant VBA et A-03), je me sens pret pour tester ca le jour venu.

Je suis dans le cas ou je developpe perso une base qui trouvera une utilite dans mon departement. Pas beaucoup d'utilisateurs, 4 maxi.

Un complement pourrait etre apporte, un petit **bonus** sur le gateau. Quelques liens vers une explication Reseau, Serveur (vraiment basique) serait la bienvenue.

Ceci permettrait a ceux, ravis de cette solution, de pressentir un peu les locations de la base Frontale et Dorsale dans des architectures reseaux qui parfois sont loins d'etre evidentes.

Bien sur, je suis dans une demarche de "critique constructive". En esperant que beaucoup auront ce meme sentiment d'apprendre a la lecture de ton tuto.

Merci encore a toi comme a tous ceux qui partagent le savoir.

[Dolphy35]

pour les encouragements.

@ curt : c'est clair ceci fonctionne également avec le runtime

@ xavsuderrone : c'est une bonne idée, je garde cela dans mes papiers, dès que j'aurais un peu de temps je m'y pencherais. Vu que (changement de taf) depuis peu je me suis remis à Access


Dolphy

[viougt]

Bonjour Dolphy35,

Article a priori instructif !
Mais j'étais en train de suivre pas à pas les instructions, quand, à la page 12, je me suis retrouvée sur une interrogation : où doit-on écrire le code ?
Jusqu'à présent je créais des codes sur des pages visual basic liées à des formulaires, donc là je bloque !

Viougt

[ludooo]

Salut Dolphy,

Voila un an et demi, je decouvrais le VBA Access (autodidacte) dans le cadre du developpement d'un mini ERP au sein de mon entreprise.

Au-dela du code, je me suis vite rendu compte que je n'avais aucun repere concernant les bonnes pratiques pour developper une appli en mode multi-utilisateurs.

J'ai parcouru de nouveau ton tutoriel, et ca m'a ramené au debut de mon developpement...
Tout ce que tu expliques dans ton tutoriel, je l'ai appliqué, jusqu'au formulaire d'affichage des utilisateurs connectés. J'adore la gestion de la redéfinition des liaisons de table également.

Tout ca pour te dire que ton tutoriel a été la pierre de base de la ptite pyramide montée dans ma boite ! Un grand merci !

Le temps a passé, mon niveau de développeur est monté, et je cherche maintenant a implémenter des fonctions qui prendraient en charge une redéfinition plus complete des liaisons, a savoir pour les tables liées par ODBC etc...

Encore merci !

[Gabout]

Morgan,

Très utile, ton tuto... et surtout très pédagogique.

Je ne sais pas si on peut comme sur les site internet ou intranet mettre un compteur mesurant le nombre de fois qu'il est lu mais, au sein des utilisateurs Access, je suis sûr qu'il figure parmi le top 10.

Super

[Dolphy35]

Bonjour Dolphy35,

Article a priori instructif !
Mais j'étais en train de suivre pas à pas les instructions, quand, à la page 12, je me suis retrouvée sur une interrogation : où doit-on écrire le code ?
Jusqu'à présent je créais des codes sur des pages visual basic liées à des formulaires, donc là je bloque !

Viougt

Il est possible de de mettre du code dans un module instancié au formulaire. Mais il est également possible de mettre du code dans des modules indépendant. Je t'invite à consulter à un autre tuto que j'ai fait plus orienté vers Outlook mais la première partie est commune

http://dolphy35.developpez.com/article/outlook/vba/


@ludooo et Gabout :

pour ces encouragements


Dolphy ,)

[Monsieur Mo]

Bonjour à tous,

Etant nouveau dans le monde du VBA, je tenait déjà à dire bravo pour cet article, clair et concis.

J'essaie de réaliser un appli multi-utilisateurs et cet article m'a apporté beaucoup de réponse mais il m'en reste encore quelques unes après implantation du code associé (je précise que je n'ai pas considéré la partie intitulé "aller plus loin"):
Il s'agit de la table tblAdmin, il est dit qu'il faut créer cette base mais sans savoir si c'est au niveau de la base frontale ou dorsale.
Après avoir téléchargé la base exemple, je me rend compte qu'elle est visible dans la frontale et qu'elle est lié... --> mais à qui ?? Contrairement aux autres tables liées, aucune table du genre ne porte son nom dans comptoir_princip.mdb, je ne sais donc pas comment la lié dans ma propre appli

Pour ce qui est de mon essai, j'ai utiliser le code concernant la liaison des tables, celui à l'ouverture du formulaire et celui concernant le timer.
DLookup("VerrouAdmin", "tblAdmin") me renvoie toujours la valeur Nulle. et je me retrouve avec une erreur n°0 qui n'en est pas une..

Pensez vous que mon erreur vienne du fait que je ne considère pas le reste du code, de la liason de tblAdmin non réalisée ou autre...

Merci d'avance

Edit: je me suis penché sur la partie "IX - aller plus loin" et j'ai trouvé ceci:

IX-C. Création d'une base pour Administrer les bases Frontales/Dorsales:
Créez une base de donnée Access que nous appelerons Administrateur.mdb. Cette base permettera de connaître les personnes connectées à la base principale et de leur envoyer un message pour se déconnecter. Nous vérrouillerons les connexions avec la table tblAdmin

J'ai beau regarder plus loin dans l'article, je ne vois pas où et avec qui connecter la table tblAdmin.
___
Mo

[GymTonic]

Dolphy,

Un tout tout grand merci pour ce tuto qui fait des merveilles dans mon applic (seulement 3 utilisateurs, mais tout de même !).
Non seulement ce tuto m'est très utile, mais en plus il est très clair.

[question supprimée: la réponse était effectivement dans ma question]

Encore un merci pour cet excellent tuto ainsi que les liens cités.

Gym

[rvrv01]

excellent article, mais j'en suis resté aux premières lignes car je n'ai pas pu trouver la commande 'fractionner une base de données' dans access 2007.
Comment le mettre en oeuvre dans access 2007?
est-remplacée par sharepoint?
merci

[Dolphy35]

Salut,

J'ai mis le temps

J'ai ajouté des captures écrans pour Access 2007

est-remplacée par sharepoint?

Non c'est toujours accessible depuis Access

Dolphy

[metronix]

Merci pour le tutoriel il m'a été très utile jusqu'ici mais je rencontre désormais une difficulté. En voulant installer sur un nouveau poste je rencontre au démarrage une erreur 3043 dite erreur réseau !

Pourriez vous m'apporter une solution pour résoudre ce problème car je suis complétement bloqué.

en vous remerciant,

Metronix

[Dolphy35]

Bonjour,

merci pour les encouragements

Je présume que l'application dorsale est située sur le serveur et le chemin passe par un lecteur réseau ? la lettre de ce lecteur est identique ?

Le poste est-il en Wi-Fi ? Je rencontre actuellement des soucis sur des applis en frontale/dorsale, la première tentative de connexion échoue mais la seconde fonctionne .

Le renseignement des liaisons en manuel fonctionne ?

Dolphy

[rch05]

Bonjour Dolphy35,

Merci pour le tutoriel il m'a été très utile.
Mais je rencontre la difficulté suivante:
Lorsque je lance mon application, j'ai le msg: "la base est actuellement en mode maintenance."

Je suis bloqué, car je n'ai plus accés à la base pour effectuer des modifs.
Comment faire pour y remédier?

Merci d'avance de votre aide

[Dolphy35]

Bonsoir,

Je viens de refaire une passe sur le tuto, et repris les codes pour test et cela fonctionne très bien. Avez-vous testé la base Comptoirs disponible en téléchargement en fin de l'article ?

http://dolphy35.developpez.com/artic...sesreseaux/#LX

@+

[markuus]

Bonnjour à tous

Super ton tuto Dolphy ! j'ai bien avancé dans la gestion des basesfrontales /dorsales ( je dévellope une petite appli pour 3 ou 4 utilisateurs avec un serveur) .

[Edit=Dolphy35] pour les encouragements . Pour ton problème on va continuer sur la nouvelle discussion
http://www.developpez.net/forums/d11...-utilisateurs/
[/Edit]

[bigounet]

Alors là, super, super, super. Mais j'ai un petit soucis. J'ai protégé ma base dorsale par un mot de passe car les données sont confidentielles. Alors, quand je veux relier ma base frontale à ma base dorsale, j'ai un code d'erreur car je ne sais pas rentrer sur ma base dorsale. Y a-t-il une possibilité de faire apparaître un popup me demandant de mettre le mot de passe pour continuer ?
En vous remerciant.

[karidrou]

Super tuto, merci bc
J'ai la même question que le message précédent, il y'a une solution ?

[bigounet]

voici le code que j'ai mis (en gras) pour le mot de passe sur ma base dorsale

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
Function LierTables(strChmFichier As String) As Boolean
'---------------------------------------------------------------------------------------
' Procédure      : Function ==> LierTables
' Auteur         : Dolphy           http://dolphy35.developpez.com/
' Commentaires   : Permet de remettre les liaisons en fonction du chemin sélectionné
' Lien vers Faq  : néant
'---------------------------------------------------------------------------------------
'
    'Déclaration des variables
    Dim dbBase As DAO.Database
    Dim tbdTables As DAO.TableDef
    Dim rst As DAO.Recordset
    
    ' déclaration du mot de passe, le même qui protège ma base dorsale
    Dim strMotPasse As String
    strMotPasse = "mot de passe"
    
    
    'Initialise le retour de la Fonction
    LierTables = False
    
    'Instancie la base courrante
    Set dbBase = CurrentDb
    'charge la table dans le Recordset rst
    Set rst = dbBase.OpenRecordset("tblTablesAttachees", dbOpenDynaset)

    'Inhibe les messages d'alertes
    DoCmd.SetWarnings False
    
    'Vide la Tables contenant la liste des tables attachées
    DoCmd.RunSQL "DELETE * FROM tblTablesAttachees"
    
    'Boucle Parcourant toutes les tables de la Bdd en cours
    For Each tbdTables In dbBase.TableDefs
        
        'Teste l'attribut de la table pour savoir si c'est une table liée
        If tbdTables.Attributes And dbAttachedTable Then
            rst.AddNew                              'Ajoute un enregistrements
            rst!TablesAttachees = tbdTables.Name    'Ajoute la table dans le Champs
            rst.Update                              'Mise à jour
        End If
       
    Next tbdTables
    
    'Mise à jour du Recordset après ajout des tables
    rst.Requery
    
    'Test la position du pointeur si il ne se situe pas en début de table
    If Not rst.BOF Then
        rst.MoveFirst   'déplacement du pointeur sur le premier enregistrement
    End If

    'Boucle parcours de la table tant que l'on arrive pas sur le dernier.
    While Not rst.EOF
        
        'Définition de l'objet TableDefs avec table stockées dans TablesAttachees
        With dbBase.TableDefs(rst!TablesAttachees.Value)
            'Redéfini la propriété connect de la table avec la nouvelle base
            '.Connect = ";DATABASE=" & strChmFichier
            .Connect = "MS Access;pwd=" & strMotPasse & ";DATABASE=" & strChmFichier
            'Remet à jour la liaison de la table
            .RefreshLink
        End With
        'Efface l'enregistrement de la Table
        rst.Delete
        'Enregistrement suivant
        rst.MoveNext
        
    Wend
    
    'Liberation des variables
    dbBase.Close
    Set dbBase = Nothing
    Set rst = Nothing
    
    'Re-active les messages d'alertes
    DoCmd.SetWarnings True

    'Affiche Message
    MsgBox ("mise à jour terminée")
    
    'Renvoi la fonction à true
    LierTables = True
    
End Function