XP系统默认安装在本地连接加载了Microsoft 网络的文件和打印机共享，对家庭用户安全性和启动速度都有很大影响，打算用批处理来解决注册表问题，看看大家有没有这方面的经验
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [求助]用脚本或者批处理去除网络的文件和打印机共享
楼 主
[求助]用脚本或者批处理去除网络的文件和打印机共享
发表于 2007-04-22 23:44 · 中国 广东 梅州 电信
第 2 楼
发表于 2007-04-23 00:08 · 中国 陕西 西安 电信
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RemoteComputer\NameSpace
下面有个print你看看是不是……把这个关了貌似不可以共享了吧？
你自己的话把协议卸载了看看可以么？
下面有个print你看看是不是……把这个关了貌似不可以共享了吧？
你自己的话把协议卸载了看看可以么？
第 3 楼
发表于 2007-04-23 03:35 · 中国 广东 梅州 电信
应该不对
我打算写个批处理来控制是否开通共享，如果卸载了协议就不行
我打算写个批处理来控制是否开通共享，如果卸载了协议就不行
第 4 楼
发表于 2007-04-23 04:09 · 中国 广东 广州 海珠区 电信
关闭几个服务而已。。。
net stop "你要停止的服务"
nc stop "你要停止的服务“
net start "你要开始的服务“
几句话的问题。
net stop "你要停止的服务"
nc stop "你要停止的服务“
net start "你要开始的服务“
几句话的问题。
知，不觉多。不知，乃求知
第 5 楼
发表于 2007-04-24 00:09 · 中国 甘肃 张掖 电信
还不如开关 lanmanserver
第 6 楼
发表于 2007-04-24 03:38 · 中国 广东 梅州 电信
启动速度都有很大影响,会增加67秒的启动时间
第 7 楼
发表于 2007-04-24 04:08 · 中国 浙江 杭州 电信
sc stop Spooler
sc config Spooler start= disabled
还可以把server服务关掉
sc stop lanmanserver
sc config lanmanserver start= disabled
sc config Spooler start= disabled
还可以把server服务关掉
sc stop lanmanserver
sc config lanmanserver start= disabled
第 8 楼
发表于 2007-04-29 12:43 · 中国 安徽 芜湖 电信
Originally posted by bjsh at 2007-4-24 04:08:
sc stop Spooler
sc config Spooler start= disabled
还可以把server服务关掉
sc stop lanmanserver
sc config lanmanserver start= disabled
亲测,没有!
第 9 楼
发表于 2008-03-08 16:48 · 中国 河南 郑州 联通
这个问题我也找了Ｎ久的解决办法了，一直没有合适的解决办法，除了手工卸载以外！
第 10 楼
发表于 2008-03-08 18:06 · 中国 河南 郑州 联通
已经找到了,不过需要再完善一下!
Dim WshSHell
On Error Resume Next
Set WshSHell = WScript.CreateObject("WScript.Shell")
WshSHell.Run "control.exe ncpa.cpl"
WScript.Sleep 500
WshSHell.SendKeys "{DOWN}{UP}"
WScript.Sleep 500
WshSHell.SendKeys "%FR"
WScript.Sleep 500
WshSHell.SendKeys "{DOWN}{ }"
WScript.Sleep 500
WshSHell.SendKeys "%U"
WScript.Sleep 500
WshSHell.SendKeys "Y"
WScript.Sleep 10000
WshSHell.SendKeys "{TAB 5}{Enter}"
WScript.Sleep 3000
WshSHell.SendKeys "%FC"
Set WshSHell = Nothing
WScript.Quit
[ Last edited by fhcweb on 2008-3-8 at 06:22 PM ]
Dim WshSHell
On Error Resume Next
Set WshSHell = WScript.CreateObject("WScript.Shell")
WshSHell.Run "control.exe ncpa.cpl"
WScript.Sleep 500
WshSHell.SendKeys "{DOWN}{UP}"
WScript.Sleep 500
WshSHell.SendKeys "%FR"
WScript.Sleep 500
WshSHell.SendKeys "{DOWN}{ }"
WScript.Sleep 500
WshSHell.SendKeys "%U"
WScript.Sleep 500
WshSHell.SendKeys "Y"
WScript.Sleep 10000
WshSHell.SendKeys "{TAB 5}{Enter}"
WScript.Sleep 3000
WshSHell.SendKeys "%FC"
Set WshSHell = Nothing
WScript.Quit
[ Last edited by fhcweb on 2008-3-8 at 06:22 PM ]
论坛跳转: