使我程序后台运行—Windows服务.pptVIP

第20章 使我的程序后台运行——Windows服务;章节内容;20.1 什么是Windows服务;20.2 创建我的第一个Windows服务;示例：自定义事件日志;;;Windows服务的其他属性;CanHandlePowerEvent：True指示服务可以处理有关计算机电源状态更改的通知；False指示禁止服务得到有关这些更改的通知。 AutoLog：True表示在服务执行操作时将信息项写入应用程序的事件日志；False表示禁用此功能。 这些属性用于确定服务的工作机制。默认情况下，AutoLog设置为True。当CanStop或CanPauseAndContinue设置为False时，服务控制管理器会禁用相应的停止、暂停或继续服务的菜单选项。 ;;Step4：编写构造函数以定义一个用户事件日志。可以选择方法声明下拉列表中的New以添加一个空的New方法。;Step5：重写OnStart方法，定义服务启动时发生的情况。 1 Protected Overrides Sub OnStart(ByVal args() As String) 2 写入日志，描述信息为“In OnStart” 3 EventLog1.WriteEntry(In OnStart) 4 End Sub ;Step6：重写OnStop方法，定义服务停止时发生的情况。 1 Protected Overrides Sub OnStop( ) 2 写入日志，描述信息为“In OnStop” 3 EventLog1.WriteEntry(In OnStop.) 4 End Sub ;;20.3 安装和卸载服务;添加组件;设置ServiceInstaller1组件的属性;设置ServiceProcessInstaller1组件的属性;添加安装项目;将Windows服务项目的输出MyNewService.exe添加到安装项目中;添加自定义操作以安装MyNewService.exe文件;;;;利用安装项目安装Windows服务;;;;;此时，打开【服务器资源管理器】窗口，展开服务器节点，在服务中即可看到FirstWinService服务。;也可以右击【我的电脑】，在打开的右键菜单中单击【管理】，打开【计算机管理】窗口，在左侧列表框中单击【服务和应用程序】下的【服务】，也可以看到FirstWinService服务。;卸载服务;;20.4 启动和停止服务;;;;20.5 Windows服务应用实例：数据库备份;添加计时器;重写OnStart方法和OnStop方法;该服务的重点代码在于计时器每隔一定的时间间隔（本例中是一分钟）就执行数据库备份的工作。 下面代码是计时器的Elapsed事件过程，实现数据库的备份。 1 Private Sub Timer1_Elapsed(ByVal sender As System.Object, ByVal e As System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed 2 Dim connString As String = Data Source=.;Initial Catalog=VBNET2008;Integrated Security=True; 3 Dim conn As SqlConnection = New SqlConnection( ) 4 conn.ConnectionString = connString 5 执行备份的语句 6 Dim sql As String = BACKUP DATABASE xiaoqu TO DISK = C:\VBNET2008.bak WITH FORMAT 7 Dim command As SqlCommand = New SqlCommand(sql) 8 command.Connection = conn 9 Try 10 开始执行 11 conn.Open( ) 12 command.ExecuteNonQuery( ) 13 Catch ex As SqlException 14 Finally 15 conn.Close( ) 16 End Try 17 End Sub ;学习动物精神;学习动物精神;谢谢大家！