Discussion :

[skywaukers]

Bonjour,

J'ai une application constituées d'un fichier contenant les tables et d'un autre contenant les formulaires et le code VBA, les tables étant liées au premier fichier. Nous devons changer le premier fichier d'emplacement. Et c'est là que commencent les difficultés :

Dans le gestionnaire de tables liées, j'ai remplacé l'ancien chemin par le nouveau, il ne m'a mit aucune erreur lors de l'application de la modification. J'ai vérifié 3 fois que je n'avais rien oublié (j'avais tout sélectionné). Malgré tout au démarrage j'ai une erreur 3044 avec l'ancien chemin dans le texte du message. Où prend-il ce chemin, je ne le trouve nul part, pas même dans le code VBA... ?

J'ai trouvé la partie de code qui génère l'erreur, la voici :

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
Public Function Acces() As String
    On Error GoTo Erreur
 
    Dim Base As Database
    Dim Enrg As Recordset
    Dim Wreq As String
    Dim ReqString As String
 
        Set Base = CurrentDb()
        Wreq = "select Niveau from securite where (user = '" & Username & "') or (user= ""invite"") ;"
        Set Enrg = Base.OpenRecordset(Wreq, dbOpenDynaset)
        If Enrg.RecordCount = 0 Then
        Droit = "0"
        Else
        Droit = Enrg.Fields(0)
        End If
        Enrg.Close: Set Enrg = Nothing
        Base.Close: Set Base = Nothing
 
 Exit Function
 
Erreur:
    MsgBox "Erreur N° " & Err.Number & " - " & Err.Description & CurrentDb().Name
 
End Function

Dans Err.Description, il y a l'ancien chemin. par contre CurrentDB().Name affiche bien le bon chemin. Il doit avoir gardé un lien quelque part, mais où ? Je n'y comprend rien

Merci pour votre attention.

@++
Dany

[Tofalu]

Pouvez--vous donner le texte du message affiché ?

Enlevez la ligne On Erreur pour voir quelle instruction amène l'erreur. Qu'est-ce que securite ? Une table ?

[skywaukers]

Bonjour,

et merci pour votre réponse. Je ne suis plus devant le PC, donc je n'ai pas le message exact en tête, mais c'était quelque chose comme le chemin [ancien chemin\MaBase.mdb] est introuvable, vérifier que le fichier soit bien accessible.
Securite est bien une table. Ce que je peux donner comme précisions complémentaires c'est que aucun formulaire ne fonctionne plus, sauf un, j'ai pas eus le temps avant de partir d'analyser quelle était la différence entre lui et tous les autres... Aussi j'ai essayé de renommer le bon fichier qui se trouve dans le nouvel emplacement et j'ai relancé access. Là même message d'erreur sur l'ancien chemin, mais rien au sujet du nouveau. Par contre le formulaire qui fonctionnait fonctionne toujours, mais la liste est vide, signe qu'il ne trouve plus les données et surtout qu'il s'adresse bien à la bonne base...

Je ferait les manip que vous me préconisez demain matin. Vous l'avez surement deviné, je suis plus que novice en Access, mais bon j'ai eu la patate chaude et je n'ai plus personne à qui la refiler . Merci encore pour votre aide.

@++
Dany

[skywaukers]

Bonjour

le message porte bien sur la requette sur la table securite. Alors là c'est très curieux parce que effectivement elle ne fait pas partie des table liées. Elle est pourtant bien dans le fichier contenant les tables, et c'est là qu'il la cherche au vu du message, sauf que le lien n'a pas été modifié...
je viens de re-essayer de faire le lien, avec succès, SAUF que il m'a créé une table liée securite1, ce qui laisse supposer qu'il connait bien un objet securite, mais je n'arrive pas à trouver où il est.
Alors je me suis dépanné dans le sens où la méthode d'accès à cette table étant centralisée, j'ai facilement pu rennomer la table dans la requette, sauf que cela me gène un peu de laisser ça en l'état, j'aimerai bien savoir où est ce lien securite, pourquoi il n'apparait pas dans la liste des tables liées. je ne voudrait pas qu'il y ait une raison subtile à cela...

Merci pour votre aide.

@++
Dany

[Tofalu]

Avez vous pensé à afficher les objets cachés et systèmes ? Peut-être que la table Sécurité était masquée

[skywaukers]

Bonjour,

ah noon j'avais oublié cette subtilité. Pb : je ne trouve pas l'option dans Access 2010, elle est cachée où ?

Merci pour votre attention.

@++
Dany