使用自定义名称安装Windows服务

Question

我有一个带有Windows服务的exe文件.要安装它,我使用命令:

installutil myService.exe/ShowCallStack

然后,我可以在"服务"窗口中看到"service1".

我的问题是,是否可以安装2个相同服务的实例(使用相同的exe)但名称不同.我想在不更改源代码的情况下这样做.

谢谢

Answer 1

我过去使用过类似下面的脚本的东西。编辑服务名称，将其另存为 VBS，然后运行。

Const ExistingServiceName = "Service1"
strComputer = "."

Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer &  "\root\cimv2")
set objExistingService = objWMIService.Get("Win32_Service.Name='" & ExistingServiceName & "'")

Set objService = objWMIService.Get("Win32_BaseService")

Const NewServiceName = "Service2"

errReturn = objService.Create (NewServiceName, NewServiceName, objExistingService.PathName, OWN_PROCESS ,NOTIFY_USER ,"Manual" , NOT_INTERACTIVE ,".\LocalSystem" ,"")