![]() |
将当前的程序安装成为服务
Shell.Service.Install
下面的代码安装一个服务到系统,服务的名称为“MySrv”,显示名称为“My Service Application”,如果在 Windows 2000 及以上系统,则详细描述设定为“This is my NetBox Service”。
Set service = Shell.Service service.Name = "MySrv" service.DisplayName = "My Service Application" service.Description = "This is my NetBox Service" service.Install