AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 01 08 07:42:33
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

REDÉMARRER UNE MACHINE RÉSEAU VIA WMI VB.NET


Information sur la source

Catégorie :Réseau & Internet Source .NET ( DotNet ) Classé sous : reboot, redémarrer, réseau, network, wmi Niveau : Initié Date de création : 27/07/2005 Vu : 9 123
Auteur : fcampagne Ecrire un message privé
Note :
5,33 / 10 - par 3 personnes
5,33 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (4)
Ajouter un commentaire et/ou une note

Description

Bonjour a tous,
voila un pti bout de code permetant de redémarrer une machine en réseau.
Verifier bien que le service WMI est installé sur votre machine et la machine distante.
 

Source

  • public function reboot(byval ip as string)
  • Dim objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate,(Shutdown)}!\\" & ip & "\root\cimv2")
  • Dim colOperatingSystems = objWMIService.ExecQuery("Select * from Win32_OperatingSystem")
  • Dim objOperatingSystem
  • If MsgBox("Voulez vous redémarrer la machine " & ip & " ?", MsgBoxStyle.OKCancel, "ATTENTION") = 1 Then
  • For Each objOperatingSystem In colOperatingSystems
  • objOperatingSystem.Reboot()
  • Next
  • End If
  • End Sub
public function reboot(byval ip as string)

Dim objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate,(Shutdown)}!\\" & ip & "\root\cimv2")
Dim colOperatingSystems = objWMIService.ExecQuery("Select * from Win32_OperatingSystem")
Dim objOperatingSystem

        If MsgBox("Voulez vous redémarrer la machine " & ip & " ?", MsgBoxStyle.OKCancel, "ATTENTION") = 1 Then
            For Each objOperatingSystem In colOperatingSystems
                objOperatingSystem.Reboot()
            Next
        End If
End Sub

Conclusion

Merci de m'avertir d'éventuelles incompatibilités et bugs pouvant subvenir!
Bonne prog.
 

Commentaires et avis

signaler à un administrateur
Commentaire de moulkafadnene le 13/12/2005 12:04:02

vraiment c super 10/10...
mé svp je vx savoir comment px-j savoir si le WMI est installè sur mon poste et comment px-j l'acquerir et merci

signaler à un administrateur
Commentaire de cashoverray le 13/12/2005 13:50:03

je voudrai savoi aussi comme faire pour acquerir WMI et aussi verifier si il es active .
et comme utilise ce petit bout de code
merci

signaler à un administrateur
Commentaire de kzim007 le 24/09/2007 16:34:44

Bonjour à tous et bravo pour ce code.
Mais je pense avoir trouvé un bug.
En effet mon PC ne s'éteint pas si la session est verouillée, est ce normal?
Pourtant le pc s'éteint bien même avec session fermé.

Merci d'avance et bonne réception.

signaler à un administrateur
Commentaire de francky83150 le 20/10/2008 21:59:13

alors ce code a l'air génial juste que tu n'a pas précisé comment je dois faire pour l'utiliser ?

il faut que je le converti en .vbs ? j'ai testé sa me sort error. (sur xp pro sp3).

merci

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

réseau et WMI [ par Wamy ] Bjr a tous...je cherche a modifier les parametres réseau d'une connexion en réseau loca via un prog VB.(ip, dns, passerelles,...).On m'a conseillé, pa WMI et adresse MAC [ par JLV1975 ] Salut,Lorsque j'utilise WMI pour r&#233;cuperer l'adresse MAC d'un ordi, le prog me renvoit 2 adresses, l'une pour la carte r&#233;seau, l'autre pour Choix de la connexion réseau par défaut (Wi-Fi ou Ethernet) et WMI [ par nico_fip1 ] Bonjour, Le PC pour lequel est d&#233;di&#233; l'application que je d&#233;veloppe poss&#232;dent plusieurs connexions r&#233;seau (R&#233;seau Local Identifier la carte réseau ACTIVE avec WMI sous vb6 ? [ par gbwin ] Bonjour a tuos, voilà sa fait quelque semaine que je viens de découvrir les WMI (sur se forum justement et au passage bravo a vous tuos pour cette org Aide pr 1 projet [ par le_virus ] J'ai besoin d'aide !!!! &nbsp; Je suis sur un projet et on ma demander de faire des recherche sur des logiciel de supervision et de supervision r&#2 Bleme en réseau [ par le_virus ] Jai besoin d'aide !!!! &nbsp; Je suis sur un projet et on ma demander de faire des recherche sur des logiciel de supervision et de supervision r&#23 [VB6] WMI ,j'y comprend pas grand chose ! [ par nico1610 ] Salut a tous, voila mon soucis je cherche a faire un code VB6 qui me permette de séléctionner ma carte réseau (donc de les lister) et ensuite d'y extr Petit problème avec My.Computer.Network.ping [ par angelus314 ] Bonjour à tous,Voilà j'ai un petit souci avec un de mes programmes.Au chargement de mon formulaire j'ai inséré ce code :Try<font color="#0000ff" Connexion réseau [ par cybercorp ] BonjourComment vérifier qu'un Pc n'est pas relié à un réseau d'entreprise, intranet et internet?En résumé, je veux m'assurer que le pc est isolé de to Connaitre le nombre de connections réseau à un fichier [ par ericboul ] Bonjour,J'ai une application Access 2000 et par le biais du VBA, je voudrais (sans passer par le fichier 'ldb') connaitre le nombre de connections rés


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,390 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.