file and printer sharing
Le
rénald
Hello,
J'essaye de désactiver "file and printer sharing". par script.
J'ai trouvé ceci sur Internet :
http://www.pctools.com/guides/registry/detail/132/
j'ai créé ces clefs, mais rien ne se passe.
Une idée du pouquoi ?
bien entendu j'ai exporté cette cléf netwok.reg afin de l'inclure dans un
script.
D'avance merci
Rénald
J'essaye de désactiver "file and printer sharing". par script.
J'ai trouvé ceci sur Internet :
http://www.pctools.com/guides/registry/detail/132/
j'ai créé ces clefs, mais rien ne se passe.
Une idée du pouquoi ?
bien entendu j'ai exporté cette cléf netwok.reg afin de l'inclure dans un
script.
D'avance merci
Rénald
Poser une question
rénald wrote:
et , en titre on lit :
Disable File and Printer Sharing (Windows 95/98/Me)
donc ....
HB
Hi !
[...]
Par script, à priori non.
Néanmoins plusieurs solutions (pistes) :
1- Désactiver le service Serveur
2- Tenter de désinstaller puis réinstaller le service FPS via l'outil
snetcfg_wxp.exe
=> la réinstallation ne devrait pas lier (i.e bind) le service pour
l'interface
snetcfg_wxp :
3- Utiliser l'interface INetCfg pour supprimer la liaison (unbind) du
service FPS
=> nécessite le Microsoft DDK
INetCfg interface :
4- Sous XP SP2, supprimer les exceptions du firewall liées au FPS
--
Gilles LAURENT
MVP Windows Server - Admin Frameworks
http://glsft.free.fr
Un grand merci pour tous vos conseils, ils valent de l'or.
Voici ce que j'ai fini par trouver :
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\" & strComputer & "rootcimv2")
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where name = 'Lanmanserver'")
For Each objService in colServiceList
errReturnCode = objService.Change( , , , , "Disabled")
Next
ansi faisant, je met le service server (lanmanserver) en mode disabled.
Ce qui est sympa c'est que l'on peut y spécifier nimporte quel nom de service
A+
Rénald
"Gilles LAURENT [MVP]" wrote:
Hi Rénald !
Merci ;-)
Juste une petite remarque :
La propriété Name de la classe Win32_Service étant une Key Property, c'est à
dire que c'est cette propriété Name qui identifie de manière unique chacune
des instances de la classe Win32_Service, il est possible de simplifier votre
code de la manière suivante :
Set oService=GetObject("winmgmts:Win32_Service.Name='Lanmanserver'")
lRet=oService.ChangeStartMode("Disabled")
Note: La classe Win32_Service étant définie dans l'espace de nom
rootcimv2, il est même possible de ne pas le spécifier dans la méthode
GetObject sachant que c'est l'espace de nom utilisé par défaut ;-)
--
Gilles LAURENT
MVP Windows Server - Admin Frameworks
http://glsft.free.fr
Un collegue m'a donné une solution pour ouvrir les propriétés de :
"Local area connection" :
il suffit de lancer en sendkey la commande "local"
Set WshShell = CreateObject("Wscript.shell")
WshShell.Run "control ncpa.cpl",1,True
wshshell.AppActivate "ncpa.cpl"
WScript.Sleep 2000
wshshell.sendkeys "local"
WScript.Sleep 2000
wshshell.sendkeys "{enter}"
......
"Gilles LAURENT [MVP]" wrote: