Partial Class ProjectInstaller Inherits System.Configuration.Install.Installer 'Installer überschreibt den Löschvorgang zum Bereinigen der Komponentenliste. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Wird vom Komponenten-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Komponenten-Designer erforderlich. 'Das Bearbeiten ist mit dem Komponenten-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() Me.ServiceProcessInstaller1 = New System.ServiceProcess.ServiceProcessInstaller() Me.ServiceInstaller1 = New System.ServiceProcess.ServiceInstaller() ' 'ServiceProcessInstaller1 ' Me.ServiceProcessInstaller1.Account = System.ServiceProcess.ServiceAccount.NetworkService Me.ServiceProcessInstaller1.Password = Nothing Me.ServiceProcessInstaller1.Username = Nothing ' 'ServiceInstaller1 ' Me.ServiceInstaller1.DisplayName = "Digital Data ECM Job Runner" Me.ServiceInstaller1.ServiceName = "DDECMJOBRUNNERService" ' 'ProjectInstaller ' Me.Installers.AddRange(New System.Configuration.Install.Installer() {Me.ServiceProcessInstaller1, Me.ServiceInstaller1}) End Sub Friend WithEvents ServiceProcessInstaller1 As ServiceProcess.ServiceProcessInstaller Friend WithEvents ServiceInstaller1 As ServiceProcess.ServiceInstaller End Class