QUI EST CONNECTÉ A VOS BASE ACCESS ( LDB )

Signaler
Messages postés
2336
Date d'inscription
samedi 14 juillet 2001
Statut
Membre
Dernière intervention
5 mai 2009
-
Messages postés
1
Date d'inscription
samedi 15 novembre 2008
Statut
Membre
Dernière intervention
15 novembre 2008
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/28606-qui-est-connecte-a-vos-base-access-ldb

Messages postés
1
Date d'inscription
samedi 15 novembre 2008
Statut
Membre
Dernière intervention
15 novembre 2008

Excellent utilitaire
Grand bravo
Note : 10/10

suggestion : Pouvoir forcer la déconnexion de tous les utilisateurs

De toute façon encore merci pour sa mise en ligne
Messages postés
5
Date d'inscription
mardi 26 avril 2005
Statut
Membre
Dernière intervention
11 octobre 2009

22/9/2006
Sous TSE avec Windows server 2000, cela ne semble pas fonctionner - Quelqu'un a t il une idée ?
Il y a peut être une différence avec Windows server 2003.
Merci d'avance
Messages postés
184
Date d'inscription
mercredi 8 décembre 2004
Statut
Membre
Dernière intervention
1 septembre 2010
1
Très bien la nouvelle version

Dommage que les noms des utilisateurs soient en fait les noms des PCs

Mais bon
8/10

@+
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
oups effectivement !!

j'ai fé ça en vitesses avec un copier/coller
Messages postés
940
Date d'inscription
jeudi 20 février 2003
Statut
Membre
Dernière intervention
3 février 2011
7
Il y a une erreur sur le NetSend... :p
Et oui, si tu veux faire un Netsend pour chaque liste il faut la passer en paramètre de la fonction MessageNetSend... Car actuellemennt, il y a ListLDB1.Text, hors si l'on clic sur la LBD2 c pas bon :(
----
Public Sub MessageNetSend(ctl As Control)
Dim txtMessage As String
txtMessage = InputBox("Message a envoyer par NetSend à l'utilisateur", "N E T S E N D")
Shell "cmd.exe /c " & """" & "net send " & ctl.Text & " " & txtMessage & """", vbHide
End Sub
-----
Private Sub ListLDB1,2,3_DblClick()
MessageNetSend ListLDB1,2,3
End Sub
Messages postés
129
Date d'inscription
mercredi 24 septembre 2003
Statut
Membre
Dernière intervention
12 février 2009

En fait cela marche bien mais seulement la version compilée.
C'est quand j'essaye en mode création...
Bon y'a surement une raison mais bon ce n'est pas la epîne de se prendre la tête
En tout cas ce code est vraiment bien
Merci
JMlucienvb
Messages postés
940
Date d'inscription
jeudi 20 février 2003
Statut
Membre
Dernière intervention
3 février 2011
7
Jsuis sous 2000 et ça marche nikel.
As-tu le COMDLG32.OCX?
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
Bizarre pas de souci sous XP
Je Regarde
Messages postés
129
Date d'inscription
mercredi 24 septembre 2003
Statut
Membre
Dernière intervention
12 février 2009

>>>Italia : Marche plus (sous 2000) dans cette nouvelle version
le prog se termine sans affichage de la base ouverte et le sablier reste actif.
Jmlucienvb
Messages postés
940
Date d'inscription
jeudi 20 février 2003
Statut
Membre
Dernière intervention
3 février 2011
7
Merci :)
Mais j'avais fait une faute sur le texte de l'inputbox
C'est "Message a envoyeR" et pas "envoyÉ"... :p
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
>>> tbbuim1 : Mise à Jour Effectuée
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
si si effectivement !

je prévois ca dans la futur version avec la fonction NET SEND
Messages postés
940
Date d'inscription
jeudi 20 février 2003
Statut
Membre
Dernière intervention
3 février 2011
7
jmlucienvb> Pas besoin de l'IP pour envoyer un net send le login ou le nom de la machine de l'utilisateur suffisent.

Italia> On ne voit pas les .mdb en fichier caché dans la liste :(, ne serait-il pas plus judicieux de faire un CommonDialog pour pouvoir choisir directement la base que l'on veut voir et récupérer par la même occasion le répertoire au cas ou l'on veut visualiser d'autres sources sur le même rep..?
Messages postés
129
Date d'inscription
mercredi 24 septembre 2003
Statut
Membre
Dernière intervention
12 février 2009

Complètement, totalement ce qu'il me fallait
Merci tbbuim 1
Messages postés
940
Date d'inscription
jeudi 20 février 2003
Statut
Membre
Dernière intervention
3 février 2011
7
Private Sub ListLDB1_DblClick()
Dim txtMessage As String
txtMessage = InputBox("Message a envoyé par NetSend à l'utilisateur", "N E T S E N D")
Shell "cmd.exe /c " & """" & "net send " & ListLDB1.Text & " " & txtMessage & """", vbHide
End Sub

Rajouter cette fonction, elle vous permettra d'envoyer un netsend en double cliquant sur le nom de l'utilisateur
Messages postés
184
Date d'inscription
mercredi 8 décembre 2004
Statut
Membre
Dernière intervention
1 septembre 2010
1
Salut à tous,

je trouve ça assez intéressant.
C'est vrai que si on pouvez envoyer un message aux users connectés ce serait un plus

mais c'est déjà très bien de faire profiter de cette source.

@+
7/10
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
quand t'as enormément de personnes connectées à une même Base ça facilite la lecture.

et perso la version de ce programme que j'utilise analyse une dizaine de base en même temps..
a ce moment la on voit vraiment l'utilité ;-))

et c'est sur le net send c'est un petit plus....
comme tous les petit plus il facilite légérement la vie...
Messages postés
940
Date d'inscription
jeudi 20 février 2003
Statut
Membre
Dernière intervention
3 février 2011
7
Moi je regarde le .ldb ça me suffit amplement.
Je vois pas trop l'utilité d'une telle source.
jmlucienvb> pour ce qui est du net send. Il suffit de faire un net send nomutilisateur "msg" en shell
rien de bien méchant
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
Bien vu dragon !
J'ai jamais dis être le créateur....
Je l'ai juste amélioré pour mes besoins perso

et en plus ça manqué un peu sur ce site
Messages postés
129
Date d'inscription
mercredi 24 septembre 2003
Statut
Membre
Dernière intervention
12 février 2009

Je serais assez preneur d'une soluce pour l'envoi d'un net send aux utilisateurs repérés...Faudrait pouvoir récupérer l'adresse IP des utilisateurs connectés sur la base...
Messages postés
2336
Date d'inscription
samedi 14 juillet 2001
Statut
Membre
Dernière intervention
5 mai 2009
4
tiens ça em dit dequoi ça, il y a un programme presque pareil en tout point a ma job, avec les utilisateur soupsonnée ne plus

ta source est basé sur une source venant du net ??? ou c'est seulement un hasard ???