Description : Ce script VBS permet d'activer le Bureau à distance.
Script :
Pour activer le service du bureau à distance (Terminal services) : 1 et 0 pour le désactiver
Const ENABLE_CONNECTIONS = 0
strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery _ ("Select * from Win32_TerminalServiceSetting") For Each objItem in colItems errResult = objItem.SetAllowTSConnections(ENABLE_CONNECTIONS) Next
Proposer un script
|
Notre avis :

Votre avis :

Réactions : 0
Votants : 60
Visites : 15942
|