' *****************************************************************************
' TEST SCRIPT - starshare.vbs
' *****************************************************************************
' 作用: 开启默认共享
' 作者: brinkman
' 日期: 2010.4.16 10.42
' Copyright (c) sunwill
' *****************************************************************************
Dim OperationRegistry
Set OperationRegistry=WScript.CreateObject("WScript.Shell")
OperationRegistry.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\lanmanserver\parameters\AutoShareServer",00000001,"REG_DWORD"
OperationRegistry.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\lanmanserver\parameters\AutoShareWks",00000001,"REG_DWORD"
阅读(1511) | 评论(0) | 转发(0) |
