VS Setup - 关于Windows Service

最新推荐文章于 2023-05-29 18:52:31 发布

meander

最新推荐文章于 2023-05-29 18:52:31 发布

阅读量514

点赞数

分类专栏： VS 文章标签： service windows installer action wizard exception

VS 专栏收录该内容

46 篇文章

订阅专栏

本文介绍如何使用VSSetup项目创建Windows Service安装包，并在安装过程中自动启动该服务。主要涉及使用ServiceInstaller组件进行安装配置及通过CustomAction实现安装后的服务启动。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

前面写过一篇使用VS Setup项目作安装包的总结，今天补充两点关于打包Windows Service的tips:

1. 如何安装windows service? - 使用service installer

2. 如何在安装向导完成后，启动刚安装完成的service?

2.1 使用Custom Action并在Installer的Committed事件中启动service

2.2 将此Custom Action 添加到安装项目的Custom Actions 编辑器的Commit节中

Custom Action代码示例如下：

Imports System.Configuration.Install
Imports System.ServiceProcess
Imports System.ComponentModel

<RunInstaller(True)> _
Public Class CustomActionManager
    Inherits Installer
    Private Const Service_Name As String = "MyService"

    Public Sub New()
        MyBase.New()

        AddHandler Committed, AddressOf CustomActionManager_Committed
    End Sub

    Private Sub CustomActionManager_Committed(ByVal sender As Object, ByVal e As InstallEventArgs)

        'need to put this custom action under the Commit section of Setup -> Custom Actions wizard
        Dim svcController As New ServiceController(Service_Name)
        Try
            svcController.Start()
        Catch ex As Exception
            MsgBox("failed to start service " + Service_Name)
        Finally
            svcController.Dispose()
        End Try
    End Sub

End Class