使我的程序后台运行—Windows服务 (2).pptVIP

单击【下一步】，选择安装文件夹。 单击【下一步】，确认安装。 单击【下一步】，开始安装过程。 安装完成后，单击【关闭】按钮。 此时，打开【服务器资源管理器】窗口，展开服务器节点，在服务中即可看到FirstWinService服务。 也可以右击【我的电脑】，在打开的右键菜单中单击【管理】，打开【计算机管理】窗口，在左侧列表框中单击【服务和应用程序】下的【服务】，也可以看到FirstWinService服务。 卸载服务 一种是打开【控制面板】，双击【添加或删除程序】，找到该安装文件，单击【删除】按钮。 另一种方法是找到安装项目的msi文件，该文件位于安装项目的Release文件夹下。 20.4 启动和停止服务 服务安装以后，可以手动的启动或者停止。在【计算机管理】窗口，右击该服务，在打开的右键菜单中单击【启动】或者【停止】即可。 由于FirstWinService在启动和停止的时候均会写入日志，因此可以查看服务的事件日志输出。在【计算机管理】窗口中，在左侧列表框中单击【事件查看器】选项，即可看到MyNewLog，这是我们自定义的日志源。打开MyNewLog，即可看到写入的日志信息。 右击该日志信息，在打开的右键菜单中单击【属性】，可以看到该日志信息的描述。 20.5 Windows服务应用实例：数据库备份 应用背景：在服务器上常会有一些重要的数据库，为了防止数据丢失或者因为程序崩溃或其他异常情况导致数据损坏，可以定期备份数据库中的数据。本节就来实现这个定期备份数据库的Windows服务。 添加计时器 首先新建一个Windows服务应用工程，并将计时器添加到工程中来，在服务的构造函数中初始化计时器。 【代码演示】 下面代码是服务的构造函数，完成计时器的初始化。 1 Public Sub New( ) 2 MyBase.New( ) 3 此调用是Windows窗体设计器所必需的 4 InitializeComponent( ) 5 在InitializeComponent( )调用之后添加任何初始化 6 每一分钟就执行备份 7 Timer1.Interval = 60000 8 Timer1.Enabled =False 9 End Sub 重写OnStart方法和OnStop方法 在服务启动和停止时分别启动计时器和停止计时器。 【代码演示】 下面代码重写OnStart方法和OnStop方法，实现计时器的启动和停止。 1 Protected Overrides Sub OnStart(ByVal args() As String) 2 请在此处添加代码以启动您的服务。此方法应完成设置工作， 3 以使您的服务开始工作。 4 Timer1.Start( ) 5 End Sub 6 7 Protected Overrides Sub OnStop( ) 8 在此处添加代码以执行任何必要的拆解操作，从而停止您的服务。 9 Timer1.Stop( ) 10 End Sub 该服务的重点代码在于计时器每隔一定的时间间隔（本例中是一分钟）就执行数据库备份的工作。 下面代码是计时器的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.ExecuteNonQu