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 accès partagé

accès partagé

3 réponses
Avatar
Alain Bourgeois
Chers tous,

j'ai une application (un .mdb avec du code et des tables non attachées)
dont les tables sont parfois accédées à partir d'un autre poste qui les
a attachées.
Est-il possible de savoir si, à un moment déterminé, quelqu'un d'autre
accède aux tables? (Je ne veux pas l'interdire et je ne veux pas d'accès
exclusif)


Merci,
Alain Bourgeois
Signaler un problème avec ce contenu

3 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
Raymond [mvp]
Bonsoir.

Il existe un utilitaire LdbView qui affiche les utilisateurs connectés.
http://access.seneque.free.fr/utilisateurs_en_cours.htm

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain Bourgeois" a écrit dans le message de
news:
Chers tous,

j'ai une application (un .mdb avec du code et des tables non attachées)
dont les tables sont parfois accédées à partir d'un autre poste qui les
a attachées.
Est-il possible de savoir si, à un moment déterminé, quelqu'un d'autre
accède aux tables? (Je ne veux pas l'interdire et je ne veux pas d'accès
exclusif)


Merci,
Alain Bourgeois



Avatar
Michel Walsh
Salut,


Avec 2000 et plus récent, on peut également utiliser le "Roster" :


============ Option Compare Database
Option Explicit

Public Sub ShowUserRosterMultipleUsers()
'KB Q285822


Dim rs As New ADODB.Recordset


Set rs = CurrentProject.Connection.OpenSchema(adSchemaProviderSpecific,
_
, "{947bb102-5d43-11d1-bdbf-00c04fb92675}")
Debug.Print rs.Fields(0).Name, "", rs.Fields(1).Name, "",
rs.Fields(2).Name, rs.Fields(3).Name

Do Until rs.EOF
Debug.Print rs.Fields(0), rs.Fields(1), rs.Fields(2), rs.Fields(3)
rs.MoveNext
Loop
End Sub
============

Espérant être utile,
Vanderghast, Access MVP


"Raymond [mvp]" wrote in message
news:
Bonsoir.

Il existe un utilitaire LdbView qui affiche les utilisateurs connectés.
http://access.seneque.free.fr/utilisateurs_en_cours.htm

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain Bourgeois" a écrit dans le message de
news:
Chers tous,

j'ai une application (un .mdb avec du code et des tables non attachées)
dont les tables sont parfois accédées à partir d'un autre poste qui les
a attachées.
Est-il possible de savoir si, à un moment déterminé, quelqu'un d'autre
accède aux tables? (Je ne veux pas l'interdire et je ne veux pas d'accès
exclusif)


Merci,
Alain Bourgeois







Avatar
Raymond [mvp]
Bonsoir Michel.

c'est très bien mais le ldbview a l'avantage de se brancher sur n'importe
quelle base et indépendamment d'une application. c'est un usage plutôt
réservé aux développeurs purs car très facile d'emploi et ça fait partie du
debogage .
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Michel Walsh" a écrit dans le message
de news:
Salut,


Avec 2000 et plus récent, on peut également utiliser le "Roster" :


============ > Option Compare Database
Option Explicit

Public Sub ShowUserRosterMultipleUsers()
'KB Q285822


Dim rs As New ADODB.Recordset


Set rs CurrentProject.Connection.OpenSchema(adSchemaProviderSpecific,
_
, "{947bb102-5d43-11d1-bdbf-00c04fb92675}")
Debug.Print rs.Fields(0).Name, "", rs.Fields(1).Name, "",
rs.Fields(2).Name, rs.Fields(3).Name

Do Until rs.EOF
Debug.Print rs.Fields(0), rs.Fields(1), rs.Fields(2), rs.Fields(3)
rs.MoveNext
Loop
End Sub
============ >

Espérant être utile,
Vanderghast, Access MVP