WMI 創(chuàng)建系統(tǒng)服務(wù)的實現(xiàn)代碼(Automatic)
Const OWN_PROCESS = &H10
Const ERR_CONTROL = &H2
Const INTERACTIVE = False
ServiceName = "TestService"
DisplayName = "This is a test service."
InstallPath = "c:\windows\system32\Test.exe"
Set ObjWMI = GetObject("winmgmts:" & "{impersonationLevel=impersonate, (Security)}!\\.\root\cimv2")
Set ObjSvr = ObjWMI.Get("Win32_Service")
Return = ObjSvr.Create(ServiceName, DisplayName, InstallPath, OWN_PROCESS, ERR_CONTROL, "Automatic", INTERACTIVE, "LocalSystem", "")
If (Return = 0) Then
Wscript.Echo "Service create success."
Wscript.Echo "ServiceName: " & ServiceName
Wscript.Echo "DisplayName: " & DisplayName
Wscript.Echo "InstallPath: " & InstallPath
Wscript.Echo ""
Else
Wscript.Echo "Service create failure(" & Return & ")."
Wscript.Quit(Return)
End If
Wscript.Quit
相關(guān)文章
VBS教程：方法-DeleteFile 方法...2006-11-11
vbs實現(xiàn)的eMule電驢自動關(guān)機腳本代碼
verycd,eMule電驢官方網(wǎng)站上說：為了不違背共享精神，是不會為eMule電驢添加自動關(guān)機功能的，這要多費電呀，在網(wǎng)上看了一個方法，感覺非常不錯，改掉了原代碼的不足之處2008-07-07
這篇文章主要介紹了vbs實現(xiàn)web自動登錄網(wǎng)站,首先編寫vbs，接著配置為開機自啟，這個比較簡單，只需要將這個vbs文件放到下面目錄中就可以了，需要的朋友可以參考下2022-04-04
WSH 5.6(腳本宿主) 的新增功能...2007-02-02
用VBSrcipt判斷是否是日期...2007-03-03
用vbs得到計算機的 IP 地址...2007-05-05
allfiles.vbs 顯示子目錄下的所有文件的修改時間、大小、文件名、擴展名等
這篇文章主要介紹了allfiles.vbs之顯示子目錄下的所有文件的修改時間、大小、全限定名定名等信息,需要的朋友可以參考下2020-08-08
這篇文章主要介紹了通過vbs修改以點結(jié)尾的文件的屬性為隱藏,需要的朋友可以參考下2016-12-12
提供個可以顯示農(nóng)歷的VBS代碼...2007-03-03
VBS教程：VBscript屬性-Global 屬性...2006-11-11