Profil de djarnaldoo - CodeS SourceS

Périphériques réseau VBS

Bonjour à tous !! J'ai vraiment besoin de votre aide... Je dois fair un script (VBS) qui liste les périphériques. Dans mon cas : - Carte réseau - Carte wifi - Modem - Pcmcia Afin de et de pouvoir les activerboutton.( Comme dans le panneau de conf par un activer ou desactiver mais là par le script). Si qqun à une... Lire la suite

OK merci, je vai voir ce que je peux fair .... mais là c'est surtout pour lister les periph..... mais je ne trouve pas de moyen pour activr ou desactiver un periph par ligne d ecommande ou script mis a part avec (devcon) mais comme je dois fair un script et il y a plusieur type de poste chaque poste aurait un script spécifique ce qui m'em...

Adressage IP Résolu

Hello tlm :) Qqun aurait il une idée, pour un script vbs pour compter le nombre d'adressage IP, par exemple si il y à en même temps une connex eth + wifi il y aura 2 adresse. ou permettre une seule à la fois. Enfin voila si qqun à une petite idée je suis preneur. merci Bcp

Votes

Mettre la variable ( a ) à 0

Votes

j'ai trouvé :) :) on error resume next strComputer = "." Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\" & strComputer & "\root\cimv2") Set IPConfigSet = objWMIService.ExecQuery ("Select * from Win32_NetworkAdapterConfiguration Where IPEnabled=TRUE") a=1 For Each IPConfig in IPConfigSet If...

annuler erreur Résolu

Bonjour tlm !!! Qqun sait il comment empecher l'affichage des erreurs lors de l'execution d'un script. merci d'avance DD :)

Votes

Re slt tlm Merci pour vos réponses si nombreuses :) , En fait mon code n'a pas d'erreur, mais il fait appel à des valeurs du registre, si les clés du registre ne sont pas présente une erreur apparait. Dans ce cas elles ne doivent pas être créer automatiquement mais je le signal dans un .log. mais il faut que pour l'utilisateur ce soi...

Ajouter du texte à la suite d'un txt Résolu

Bonjour tlm !! J'aimerai écrire dans un fichier texte a la suite du contenu pour créer un fichier log. J'arrive à créer pour écrir dans un txt mais a chaque lancement le fichier est ecrasé par le nouveau. Je voudrais donc que le texte vient à la suite de celui qui existe, car à chanque execution les fichier txt doit receuillir les ... Lire la suite

Votes

hello pour info j'ai trouvé la solution :) c'était pas trés compliqué en fait Set FSO = CreateObject("Scripting.FileSystemObject") Set File = FSO.OpenTextFile("C:\script.log", 1, True) Set File = FSO.OpenTextFile("C:\script.log", 8, True) File.WriteLine "" File.WriteLine "Message du : " & Date & " à " & Time File.Close set Ws...