WMI 創(chuàng)建系統(tǒng)服務(wù)的實(shí)現(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實(shí)現(xiàn)的eMule電驢自動(dòng)關(guān)機(jī)腳本代碼
verycd,eMule電驢官方網(wǎng)站上說(shuō)：為了不違背共享精神，是不會(huì)為eMule電驢添加自動(dòng)關(guān)機(jī)功能的，這要多費(fèi)電呀，在網(wǎng)上看了一個(gè)方法，感覺(jué)非常不錯(cuò)，改掉了原代碼的不足之處2008-07-07
vbs實(shí)現(xiàn)web自動(dòng)登錄網(wǎng)站的方法
這篇文章主要介紹了vbs實(shí)現(xiàn)web自動(dòng)登錄網(wǎng)站,首先編寫(xiě)vbs，接著配置為開(kāi)機(jī)自啟，這個(gè)比較簡(jiǎn)單，只需要將這個(gè)vbs文件放到下面目錄中就可以了，需要的朋友可以參考下2022-04-04
WSH 5.6(腳本宿主) 的新增功能...2007-02-02
用VBSrcipt判斷是否是日期...2007-03-03
用vbs得到計(jì)算機(jī)的 IP 地址...2007-05-05
allfiles.vbs 顯示子目錄下的所有文件的修改時(shí)間、大小、文件名、擴(kuò)展名等
這篇文章主要介紹了allfiles.vbs之顯示子目錄下的所有文件的修改時(shí)間、大小、全限定名定名等信息,需要的朋友可以參考下2020-08-08
通過(guò)vbs修改以點(diǎn)結(jié)尾的文件的屬性為隱藏
這篇文章主要介紹了通過(guò)vbs修改以點(diǎn)結(jié)尾的文件的屬性為隱藏,需要的朋友可以參考下2016-12-12
提供個(gè)可以顯示農(nóng)歷的VBS代碼...2007-03-03
VBS教程：VBscript屬性-Global 屬性...2006-11-11