VBScript - 取消所有預設共用

功能說明

此 VBScript 程式功能為將「取消」所有預設共用 (C$、D$...etc)。



實作環境

  • Windows 2000 Server

NoDefaultSharing.vbs 內容

Dim Path
Path="HKLM\SYSTEM\CurrentControlSet\Services\lanmanserver\parameters\"
Set ws=WScript.CreateObject("WScript.Shell")
ws.RegWrite Path&"AutoShareServer",0,"REG_DWORD"
ws.RegWrite Path&"AutoShareWks",0,"REG_DWORD"