Discussion :

[Doshigan]

Bonjour à toutes & à tous,

Je développe actuellement une application access pour mon entreprise et je suis confronté à un problème avec un recordset :

Lorsque l'on ouvre mon fichier, un formulaire de connexion s'ouvre où il faut renseigner son USER et un MDP. Lorsque l'on clique sur le bouton "Se connecter" j'emploi un recordset pour retrouver le USER et MDP. Je précise que le fichier en question se trouve en réseau.

Voilà les problèmes que j'ai rencontré :
- En lançant le fichier accde sur un autre pc que le mien équipé d'une version Access 2016, j'ai eu un msg d'erreur m'indiquant "Pb MAJ Entrée" > Un problème de référence ? Peut-être mais lequel dans ce cas ?
- En lançant mon fichier Frontend accdb toujours sur cet autre pc, mon formulaire de connexion ne fonctionnait plus : J'avais beau cliqué sur "Se connecter" rien ne se passait, pas même un message d'erreur.
- J'ai refait les tests de mes fichiers sur mon propre pc et ceux-ci fonctionnaient parfaitement.

J'avoue être un peu perdu ...

Voici le code en question :

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
Private Sub Commande5_Click()
Dim rs As Recordset
 
Set rs = CurrentDb.OpenRecordset("Employé", dbOpenSnapshot, dbReadOnly)
rs.FindFirst "USER='" & Me.txtUSER & "'"
 
If rs.NoMatch = True Then
Me.lblWrongUser.Visible = True
Me.txtUSER.SetFocus
Exit Sub
End If
Me.lblWrongUser.Visible = False
 
If rs!MDP <> NZ(Me.txtMDP, "") Then
Me.lblWrongMDP.Visible = True
Me.txtMDP.SetFocus
Exit Sub
End If
Me.lblWrongMDP.Visible = False
 
TempVars("EmployeType") = rs!IDT.Value
 
If rs!IDT = 1 Then
Call EnableProperties
End If
 
DoCmd.OpenForm "Gestion_USER"
DoCmd.Close acForm, Me.Name
End Sub

Merci par avance pour votre aide.

[marot_r]

Bonjour.

Est-ce que le poste problématique est équipé d'un vrai Access ou seulement d'un runtime.

Si c'est un vrai, va dans le code et vérifie qu'il n'y a pas de référence manquante (menu outils, références).

Aussi vérifie si tu as bien activé les macros ?
il devrait y a avoir un bandeau jaune en haut de la fenêtre qui te demande la confirmation.

A+

[Doshigan]

Bonjour,

Désolé de répondre si tardivement à votre réponse, je n'ai pas pris le temps de consulter le forum ce we.
Merci encore marot_r pour votre aide précieuse !

J'ai finalement réussi à trouver la cause du problème ; il s'agit du chemin d'accès au serveur où est stocké la base fractionnée qui varie d'un ordinateur à l'autre.
Pour vous donner un exemple pour moi le serveur sera E:/serveur/dossier/sous-dossier/fichier et un autre ce sera Y:/serveur/dossier/sous-dossier/fichier ... Je précise qu'il s'agit bel et bien du même serveur.

J'ai lu qq part qu'il était possible de modifier le chemin d'accès de manière à éviter ce genre de problème avec E:/, Y:/, etc en utilisant une adresse UNC.
J'ai bien compris le principe néanmoins je n'ai pas trouvé le moyen de l'appliquer à mon fichier pour qu'il soit utilisable par tous.
Avez-vous une idée de la démarche à suivre pour l'appliquer ?

Merci par avance.

[micniv]

Bonjour,

Si E: est le chemin du lecteur réseau chez toi, il est défini par le nom du serveur (serveur1) et un partage (partage1)
alors le chemin UNC de ton fichier Access est :
\\serveur1\partage1\serveur\dossier\sous-dossier\fichier.accdb

CDLT

[Doshigan]

D'accord, merci beaucoup pour votre réponse. J'ai trouvé par conséquent le lien UNC mais comment est-ce que je l'applique comme chemin d'accès de mon fichier access et comment dois-je le spécifier comme chemin d'accès à mes tables liées dans access ? (Je navigue sur internet depuis un petit moment sans trouver vraiment une réponse à mon problème ...)

Merci.

[marot_r]

Bonjour.

Il suffit quand dans le gestionnaire de table liée de donner le chemin avec l'adresse UNC sans passer par le mappage de la lettre.

Un truc du genre \\TonServeur\TonChemin\TaBD

A+

[Doshigan]

Bonjour,

Oui effectivement, tout bêtement ... Cela fonctionne parfaitement, merci beaucoup !

Une petite suptibilité pour ceux qui serait confronté au même problème et qui emploierai cette solution ; n'oubliez pas de supprimer vos anciennes tables liées avant de lier à nouveau avec un chemin d'accès UNC.

Problème résolu.