jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 13 sept. 2006 à 10:13
Salut,
J'ai testé ceci (avec la modification remarquée par 941 Willi)
Et cela fonctionne
NB: Je suis sous W2K d'ou le WINNT a la place de WINDOWS
Dim Rep As Integer
Dim Alias As String
Dim Message As String
'Ceci doit être le nom de la machine
Alias = "dev08-inv"
Message = "Test de NETSEND"
Rep = Shell("c:\winnt\system32\net send " & Alias & " " & Message)