Envoie d une cde NET SEND en VBscript
toutnickel
Messages postés
14
Date d'inscription
vendredi 19 décembre 2003
Statut
Membre
Dernière intervention
17 avril 2024
-
19 déc. 2003 à 10:49
TheMacleod Messages postés 7 Date d'inscription mardi 9 mars 2004 Statut Membre Dernière intervention 28 septembre 2004 - 17 mars 2004 à 12:53
TheMacleod Messages postés 7 Date d'inscription mardi 9 mars 2004 Statut Membre Dernière intervention 28 septembre 2004 - 17 mars 2004 à 12:53
A voir également:
- Envoie d une cde NET SEND en VBscript
- .Net reflector - Conseils pratiques -C# / .NET
- Vbscript msgbox - Conseils pratiques -Visual Basic / VB.NET
- Monlycee net authentification ✓ - Forum Java
- Europchat net ✓ - Forum PHP
- Vbscript excel ✓ - Forum Visual Basic 6
1 réponse
TheMacleod
Messages postés
7
Date d'inscription
mardi 9 mars 2004
Statut
Membre
Dernière intervention
28 septembre 2004
17 mars 2004 à 12:53
17 mars 2004 à 12:53
salut,
c'est tout simple :
dim Resultat as long
Resultat = shell("net send \" & NOMDELORDI & """" & MESSAGEAENVOYER & """",1)
Resultat prend la valeur de PID (processus ID), si tu n'en a pas besoins, tu le remplaces par Call (call shell("blablabla",1))
le '1' dit que tu veux afficher la console DOS 'normalement', '0' si tu veux la masquer et '2' (je crois) pour la mettre en plein écran.
si ca ne marche pas, essaye de mettre cmd avant 'net send'
@+
c'est tout simple :
dim Resultat as long
Resultat = shell("net send \" & NOMDELORDI & """" & MESSAGEAENVOYER & """",1)
Resultat prend la valeur de PID (processus ID), si tu n'en a pas besoins, tu le remplaces par Call (call shell("blablabla",1))
le '1' dit que tu veux afficher la console DOS 'normalement', '0' si tu veux la masquer et '2' (je crois) pour la mettre en plein écran.
si ca ne marche pas, essaye de mettre cmd avant 'net send'
@+
