Discussion :

[zouille]

salut a tous
voila, j'aimerais pouvoir faire du netsend a partir d'un petit userform avec
1 listbox pour les destinataires.
1 zone e text pour l'ecriture du message.
et le tout sans afficher la fenetre dos

alors Comment codé cette commande?
ps : est il possible de recuperer directement le nom des pc connecté sur le reseau ou je doit les ecrire dans une page excel qui servira a mon listbox.



merci beaucoup

[jmfmarques]

alors Comment codé cette commande?

en consultant tout simplement la de ce forum (les exemples ne manquent pas... et tu n'es pas nouveau ici...)

ps : est il possible de recuperer directement le nom des pc connecté sur le reseau ou je doit les ecrire dans une page excel qui servira a mon listbox.

quel réseau ? externe ou interne ?

[zouille]

en ce qui concerne le reseau , c 'est un reseau interne
en fait j'aimerais recuperer les adresses ( nom des pc) comme dans outlook comme :pc1 - pc2 si possible.

pour net send , ce qui me pose probleme , c'est de memoriser mon choix de destinataire et message , le code en lui meme pour l'envoie est simple , mais comment lui dire que le choix ds le listbox = destinataire.

merci

[jmfmarques]

Pour celà aussi : en recherchant un peu, on trouve des quantités d'exemples sur ce forum :
Voilà un lien, entre autres :
http://www.developpez.net/forums/vie...ghlight=reseau

[zouille]

alors voila , j'ai chercher un peu partout et suivi les liens mais c'est trop compliquer , ce que j'aimerais c'est trouvé une fonction de type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
sub bouton1_click ()
shell(net send & listbox.value & "textbox.value")
End sub

mais je n'arrive pas a codé exactement .
merci de votre aide

[jmfmarques]

Il y a alors la fonction BaguetteMagique (adaptable à tous les cas de figure et sans rien coder ni rien chercher à comprendre du tout). Elle est préférable à la fonction EcrireLeCodeDeMaFonctionAmaPlace !
Il y a aussi, pour ceux que l'écriture de code rébute, les outils tous faits que l'on trouve pour pas cher partout !

[zouille]

et ben j'ai connu mieux comme aide
donc je clos le sujet car tes remarques me paraissent hors sujet.
Avant de juger , et mettre tt le monde ds le meme panier , tu devrais connaitre les gens .

sur ce si qqun est volontaire pour m'expliquer je suis preneur, sinon merci qd meme jmfmarques pour le temps passé a me faire de l'ecriture, mais qui ne correspond en rien au sujet.

merci

[SfJ5Rpw8]

alors voila , j'ai chercher un peu partout et suivi les liens mais c'est trop compliquer , ce que j'aimerais c'est trouvé une fonction de type :

sub bouton1_click ()
shell(net send & listbox.value & "textbox.value")
End sub

mais je n'arrive pas a codé exactement .
merci de votre aide

il te faut bouger les ""...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
sub bouton1_click ()
Shell ("net send " & ListBox & " " & TextBox)
End sub

[zouille]

super bbil
merci a toi.

[zouille]

bon
je viens de tester sur le reseau et rien ne se passe .
il n'y a pas d'erreur vba ,mais je ne vois pas la fenetre dos s'ouvrir ( comme qd on tappe directement net send dans l'invite de commande)

serait ce une erreur dans le code , je pense qu'il faudrait peut etre mettre "cmd" dans le code

shell ( cmd & "net send" & combobox & textbox)
qu'en pense tu

merci a toi