[Résolu]Récupérer le groupe de travail en VBS

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Résolu]Récupérer le groupe de travail en VBS

GDEL

Bonjour,

Je cherche une fonction en VBS pour récupérer le nom du groupe de travail d'un poste ? et ensuite le modifier.
Car, j'ai trouvé quasiment toutes les fonctions pour régler le réseau sur un poste, sauf celle-ci.

Merci

Message édité par GDEL le 01-03-2009 à 13:36:49

Publicité

kiki29

Salut, sans rien y connaitre ou quasiment, en cherchant via gog j'ai trouvé ceci :

set wmi = getobject("winmgmts:" )
wql = "select * from win32_computersystem"
set results = wmi.execquery(wql)

For each compsys in results
WScript.Echo compsys.domain
Next

un autre

Dim objNet
Set objNet = CreateObject("WScript.NetWork" )
Dim strInfo
strInfo = "User Name is " & objNet.UserName & vbCRLF & _
"Computer Name is " & objNet.ComputerName & vbCRLF & _
"Domain Name is " & objNet.UserDomain
MsgBox strInfo
Set objNet = Nothing

Message édité par kiki29 le 01-03-2009 à 12:36:39

GDEL

[:prosterne] Merci [:prosterne2]
Le premier fonctionne parfaitement. Par contre, j'ai cherché dans google. Mais, je suis toujours tombé sur des scripts avec de l'active directory. :??:

kiki29

Re, un site qui pourrait t'intéresser http://www.activexperts.com/activm [...] inscripts/

Message édité par kiki29 le 01-03-2009 à 19:14:35

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[Résolu]Récupérer le groupe de travail en VBS

Sujets relatifs
Comment récupérer toute ma table SQL?	[RESOLU] - [C#] - NullReferenceException
[RESOLU]Trier liste de fichiers	Problème d'accentuation... [résolu]
[RESOLU] Envoi de variable indéfinie en url	Problème de date [résolu]
[résolu]Taille de la zone de texte dans un div ?	VBS Tester si un dossier plus vieux de 7 jours existe et l'effacer
Créer un nouveau groupe ActiveDirectory	[Résolu]Lecture d'un fichier csv
Plus de sujets relatifs à : [Résolu]Récupérer le groupe de travail en VBS

Page générée en 0.031 secondes