wmiform.vb

SQL Server 业已成为最为流行的几大数据库之一

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''ch07 示例9
''
''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Imports Microsoft.SqlServer.Management.Common
Imports Microsoft.SqlServer.Management.Smo
Imports Microsoft.SqlServer.Management.Smo.Wmi
Public Class WMIForm

    Dim bMc As New ManagedComputer
    Dim bSS As Service
    Dim status As Integer


    Private Sub btStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btStart.Click

        btStart.Enabled = False
        bSS.Start()

        status = 1
        Timer1.Enabled = True


        '        Label1.Text = "该服务器处于" + bSS.ServiceState.ToString + "状态。"

    End Sub

    Private Sub WMIForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        bSS = bMc.Services("MSSQLSERVER")
        Label1.Text = "该服务器处于" + bSS.ServiceState.ToString + "状态。"
        If bSS.ServiceState = ServiceState.Running Then

            btStop.Enabled = True
            btStart.Enabled = False


        ElseIf bSS.ServiceState = ServiceState.Stopped Then

            btStop.Enabled = False
            btStart.Enabled = True


        End If


    End Sub

    Private Sub btStop_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btStop.Click

        btStop.Enabled = False
        bSS.Stop()
        '       btStart.Enabled = True
        status = 0
        Timer1.Enabled = True
        'bSS.Refresh()
        'Label1.Text = "该服务器处于" + bSS.ServiceState.ToString + "状态。"

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

        bSS.Refresh()
        Label1.Text = "该服务器处于" + bSS.ServiceState.ToString + "状态。"

        If status = 1 Then

            btStop.Enabled = True

        Else

            btStart.Enabled = True

        End If
        Timer1.Enabled = False

    End Sub
End Class


' using system;
'    using system.data;

'    using microsoft.sqlserver.management.common;
'    using microsoft.sqlserver.management.smo;
'    using microsoft.sqlserver.management.smo.wmi;
'    using system.threading;

'Class program
'    {
'        static void main(string[] args)
'        {
'            managedcomputer mc = new managedcomputer(  );

'            service 
' s = mc.services["reportserver"];
'            console.writeline("reportserver status: " + s.servicestate);

'            s.stop(  );
'            thread.sleep(10000);
'            s.refresh(  );
'            console.writeline("reportserver status: " + s.servicestate);
'            s.start(  );
'            thread.sleep(10000);
'            s.refresh(  );
'            console.writeline("reportserver status: " + s.servicestate);

'            console.writeline(environment.newline + "press any key to continue.");
'            console.readkey(  );
'        }
'    }