盗墓笔记全集,盗墓笔记有声小说

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案

vbs中怎么禁用服務(wù)-創(chuàng)新互聯(lián)

這篇文章給大家介紹vbs中怎么禁用服務(wù)，內(nèi)容非常詳細(xì)，感興趣的小伙伴們可以參考借鑒，希望對大家能有所幫助。

龍?zhí)毒W(wǎng)站制作公司哪家好，找創(chuàng)新互聯(lián)！從網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、成都響應(yīng)式網(wǎng)站建設(shè)公司等網(wǎng)站項目制作，到程序開發(fā)，運(yùn)營維護(hù)。創(chuàng)新互聯(lián)2013年開創(chuàng)至今到現(xiàn)在10年的時間，我們擁有了豐富的建站經(jīng)驗和運(yùn)維經(jīng)驗，來保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)。

問：
您好，腳本專家！如何禁用服務(wù)？
-- DS
答：
您好，DS。您知道嗎，腳本專家似乎無意中發(fā)現(xiàn)了一個好主意。在上期專欄中，我們向大家介紹了如何禁用 LMHosts 文件。今天，我們將向大家介紹如何禁用服務(wù)。如果我們這樣繼續(xù)下去的話，不久，我們便可將如何禁用計算機(jī)上的一切介紹給大家。請想象一下：不再有網(wǎng)絡(luò)問題，不再有客戶服務(wù)中心呼叫，不再有用戶覆蓋了不應(yīng)覆蓋的文件。我們所要做的就是禁用一切，從而所有這些問題都將消失！這可以是我們通往幸福時光的入場券。
不可否認(rèn)，禁用計算機(jī)上的一切可能導(dǎo)致貴組織出現(xiàn)其他問題。但這只是需要由你們來處理的內(nèi)部事務(wù)。
此外，我們可能忙于數(shù)錢而無法幫助您。
當(dāng)然，在鈔票開始滾滾而來之前，我們?nèi)圆坏貌痪帉懘藢?，我們?nèi)圆坏貌桓稁ぁＵ驗槊鞔_這一點，我們在下面提供了在計算機(jī)上禁用 Alerter 服務(wù)的腳本：

代碼如下:

strComputer = "."  
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")  
Set colServiceList = objWMIService.ExecQuery _  
    ("Select * from Win32_Service where Name = 'Alerter'")  
For Each objService in colServiceList  
    If objService.State = "Running" Then  
        objService.StopService()  
        Wscript.Sleep 5000  
    End If  
    errReturnCode = objService.ChangeStartMode("Disabled")     
Next

如您所見，禁用服務(wù)并不需要很多代碼，并且所需的一小段代碼都是很基礎(chǔ)的代碼。不過，有一個棘手的部分，這就是我們?yōu)槭裁磳⒒◣追昼姇r間逐步向您介紹此腳本的原因。
除此以外，不管怎樣 Rolls Royce 經(jīng)銷權(quán)都不會多開放一小時。
腳本開始并沒什么奇特之處：我們只是連接到本地計算機(jī)上的 WMI 服務(wù)（盡管我們也可以禁用遠(yuǎn)程計算機(jī)上的服務(wù)）。然后，我們發(fā)出以下查詢，該查詢返回一個僅包含一項的集合：Alerter 服務(wù)：
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'Alerter'")
順便說一下，請確保包括了如上所示的 Where 子句。為什么？設(shè)想一下，假設(shè)您省略了 Where 子句。在這種情況下，您的集合將包含安裝在計算機(jī)上的所有服務(wù)，那么，你的腳本將盡職盡責(zé)地試圖禁用每個服務(wù)。
您說對了：這通常不是什么好事。此外，腳本專家可能會控告您；畢竟，禁用計算機(jī)上的一切是我們的主意！
得到集合后，我們建立一個 For Each 循環(huán)以遍歷該集合內(nèi)的所有項。（是的，我們知道：集合中只有一項。但我們?nèi)孕枋褂?nbsp;For Each 循環(huán)。）以下是棘手部分。您可以禁用運(yùn)行中的服務(wù)；但是，該服務(wù)在停止運(yùn)行前實際并未被禁用。如果禁用運(yùn)行中的服務(wù)，該服務(wù)會一如既往地繼續(xù)運(yùn)行；更改將在服務(wù)停止后才生效。
正因為如此，我們使用下面這行代碼來查看 Alerter 服務(wù)是否正在運(yùn)行：
If objService.State = "Running" Then
如果該服務(wù)正在運(yùn)行，那么我們就調(diào)用 StopService() 方法來停止該服務(wù)。之后我們暫停 5 秒（5,000 毫秒）；使得服務(wù)有時間在我們繼續(xù)操作以禁用它之前真正停止。我們就是照下面這樣做的：
objService.StopService()
Wscript.Sleep 5000
注意：為了使該示例腳本盡可能簡短，我們做了些手腳。我們假設(shè)您的服務(wù)僅處于“運(yùn)行”或“停止”狀態(tài)。實際上，服務(wù)還可能包含其他狀態(tài)，最顯著地是“暫停”或“繼續(xù)”。要編寫一個更穩(wěn)妥的腳本，您或許還應(yīng)該檢查這些狀態(tài)（并采取相應(yīng)的措施）。但是，因為在 99.9% 情況下，服務(wù)都處于運(yùn)行或停止?fàn)顟B(tài)，所以您通?？梢允褂梦覀兘o出的腳本蒙混過去。
服務(wù)停止后，我們就可以使用下面這行代碼禁用它：
errReturnCode = objService.ChangeStartMode("Disabled")
如您所見，我們只是使用 ChangeStartMode 方法更改 StartMode 屬性的值。我們要禁用該服務(wù)，所以我們將參數(shù)“Disabled”傳遞給 ChangeStartMode。我們還可以將 StartMode 設(shè)置為“Manual”或“Automatic”；這樣會將 StartMode 設(shè)置為“手動”或“自動”。
請記住，服務(wù)被停止并禁用后，將無法再啟動；重新啟動該服務(wù)的方法是重新啟用它（通過將 StartMode 更改為“手動”或“自動”）。但是，我們會等到說服每個人禁用其計算機(jī)上的一切后，才介紹如何重新啟用這些東西。畢竟，我們也許能夠?qū)@些腳本收取雙倍的費用。

關(guān)于vbs中怎么禁用服務(wù)就分享到這里了，希望以上內(nèi)容可以對大家有一定的幫助，可以學(xué)到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。

本文標(biāo)題：vbs中怎么禁用服務(wù)-創(chuàng)新互聯(lián)
鏈接地址：http://fisionsoft.com.cn/article/deeode.html

新聞中心

其他資訊