QUI EST CONNECTÉ A VOS BASE ACCESS ( LDB )

cs_dragon Messages postés 2336 Date d'inscription samedi 14 juillet 2001 Statut Membre Dernière intervention 5 mai 2009 - 4 janv. 2005 à 19:19
codaxlogin Messages postés 1 Date d'inscription samedi 15 novembre 2008 Statut Membre Dernière intervention 15 novembre 2008 - 15 nov. 2008 à 10:09
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

codaxlogin Messages postés 1 Date d'inscription samedi 15 novembre 2008 Statut Membre Dernière intervention 15 novembre 2008
15 nov. 2008 à 10:09
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
GERONIMO99 Messages postés 5 Date d'inscription mardi 26 avril 2005 Statut Membre Dernière intervention 11 octobre 2009
22 sept. 2006 à 15:13
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
phantom_2005 Messages postés 184 Date d'inscription mercredi 8 décembre 2004 Statut Membre Dernière intervention 1 septembre 2010 1
7 janv. 2005 à 15:56
Très bien la nouvelle version

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

Mais bon
8/10

@+
cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
7 janv. 2005 à 10:45
oups effectivement !!

j'ai fé ça en vitesses avec un copier/coller
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
7 janv. 2005 à 10:20
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
jmlucienvb Messages postés 129 Date d'inscription mercredi 24 septembre 2003 Statut Membre Dernière intervention 12 février 2009
6 janv. 2005 à 20:24
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
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
6 janv. 2005 à 19:22
Jsuis sous 2000 et ça marche nikel.
As-tu le COMDLG32.OCX?
cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
6 janv. 2005 à 08:20
Bizarre pas de souci sous XP
Je Regarde
jmlucienvb Messages postés 129 Date d'inscription mercredi 24 septembre 2003 Statut Membre Dernière intervention 12 février 2009
6 janv. 2005 à 07:45
>>>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
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
5 janv. 2005 à 16:04
Merci :)
Mais j'avais fait une faute sur le texte de l'inputbox
C'est "Message a envoyeR" et pas "envoyÉ"... :p
cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
5 janv. 2005 à 15:32
>>> tbbuim1 : Mise à Jour Effectuée
cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
5 janv. 2005 à 14:47
si si effectivement !

je prévois ca dans la futur version avec la fonction NET SEND
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
5 janv. 2005 à 14:42
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..?
jmlucienvb Messages postés 129 Date d'inscription mercredi 24 septembre 2003 Statut Membre Dernière intervention 12 février 2009
5 janv. 2005 à 14:37
Complètement, totalement ce qu'il me fallait
Merci tbbuim 1
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
5 janv. 2005 à 14:26
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
phantom_2005 Messages postés 184 Date d'inscription mercredi 8 décembre 2004 Statut Membre Dernière intervention 1 septembre 2010 1
5 janv. 2005 à 13:28
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
cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
5 janv. 2005 à 10:02
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...
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
5 janv. 2005 à 09:42
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
cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
5 janv. 2005 à 08:27
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
jmlucienvb Messages postés 129 Date d'inscription mercredi 24 septembre 2003 Statut Membre Dernière intervention 12 février 2009
5 janv. 2005 à 07:59
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...
cs_dragon Messages postés 2336 Date d'inscription samedi 14 juillet 2001 Statut Membre Dernière intervention 5 mai 2009 6
4 janv. 2005 à 19:19
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 ???
Rejoignez-nous