您好，MJ。您知道，這是個有趣的問題，至少對“腳本專家”來說是這樣。不是因為腳本難以編寫；這實際上非常簡單。困難的是（至少對我們來說）在 Windows GUI 中找到 LMHosts 設(shè)置；這是我們需要做的，以便我們可以驗證腳本實際上起作用。在一段盲目的查找之后（這對“腳本專家”來說很尋常）我們最終找到了要找的東西：

以防您與“腳本專家”一樣一竅不通（對于您來說，但愿不是這樣），以下是到達此對話框的操作步驟：

像我們說的那樣，找到 LMHosts 復(fù)選框是最難的部分；清除復(fù)選框（即防止計算機使用 LMHosts 文件）就簡單了：

復(fù)制代碼 代碼如下:
On Error Resume Next   
Const USE_WINS = False 
Const USE_LMHOST_FILE = False 

strComputer = "." 
Set objWMIService = GetObject("winmgmts://" & strComputer & "/root/cimv2") 

Set objNetworkSettings = objWMIService.Get("Win32_NetworkAdapterConfiguration") 
errResult = objNetworkSettings.EnableWINS(USE_WINS, USE_LMHOST_FILE) 

Wscript.Echo errResult

我們在腳本開始定義了一對常量（USE_WINS 和 USE_LMHOST_FILE）并將他們設(shè)置為 False。我們使用常量 USE_WINS 告訴腳本我們要完全禁用 WINS（Windows Internet 命名服務(wù)）的使用。如果不是這樣的話（如果您要繼續(xù)使用 WINS，只是不使用 LMHosts 文件）則將 USE_WINS 的值設(shè)置為 True。

同時，常量 USE_LMHOST_FILE 告訴腳本我們是否要使用 LMHosts 文件。我們將此常量設(shè)置為 False，因為我們將不