[AC-2010] Gestion de la connexion dorsale frontale

[docjo]

Bonjour

Ma base est organisée en frontale sur une cinquantaine de PC et une dorsale sur un disque dur réseau (sur lequel je n'ai pas beaucoup de droits administrateur). Il se produit des coupures de transmissions probablement de courte durée mais qui font planter la base et nécessitent même parfois que je répare la dorsale.
Existe-t-il une méthode d'administration qui ferme automatiquement la base (eventuellement aprés un message expliquant le problème) lors d'une perte de connexion frontale-dorsale ? J'ai vu sur file maker cette possibilité et j'imagine qu'access doit aussi pouvoir le faire.

Merci par avance

N.B: lors de mes recherches, j'ai trouvé ceci qui permet d'éviter les plantages (lien) mais toujours pas de code pour fermer la base si il y a une perte de relation frontale-dorsale.

[docjo]

Désolé mais je ne peux éditer mon précédent post;
La gestion de liaison des tables peut-elle être utilisée ?

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
Sub LinksRefresh()
On Error GoTo Err_LinksRefresh
    Dim tbf As TableDef
 
    For Each tbf In CurrentDb.TableDefs
        If tbf.Connect <> "" Then
 
            tbf.RefreshLink
            Debug.Print tbf.Name & " >>> " & tbf.Connect
        End If
    Next tbf
 
    Exit Sub
 
Err_LinksRefresh:
    If Err.Number = 3151 Then
        MsgBox "Le réseau semble ne pas répondre" & vbLf & "La base va se fermer", vbCritical, "Défaut de connexion"
        docmd.quit
    Else
        Resume Next
    End If
End Sub

J'ai adapté ce code mais je ne sais pas si c'est la bonne solution.
Qu'en pensez-vous ?