smoでSQL Serverブラウザサービスを開始できますか？

Question

VB.NetプログラムからSQL Serverを列挙する必要があります。これは、SQLブラウザーサービスがオンでない場合に失敗します。デフォルトのインストールでは無効になっているようです。

サービスステータスをテストし、必要に応じてそれを有効にして起動するにはどうすればよいですか？

Answer 1

必ずしもSMOが必要なわけではありません。 ServiceControllerクラスを使用できます。シンプルな使用のための

' don't forget to reference the System.ServiceProcess and Imports System.Management DLLs 

imports System 
imports System.ServiceProcess 
imports System.Management 

public module MyModule 
Sub Main() 
    Dim serviceName as String = "SQLBrowser" 
    Dim sc As ServiceController = New ServiceController(serviceName) 


    ' make sure start mode is automatic 
    Dim path As String = "Win32_Service.Name='" & serviceName & "'" 
    Dim p As New ManagementPath(path) 
    Dim ManagementObj As New ManagementObject(p) 
    Dim parameters As Object() = New Object(0) {} 
    Dim value As String = "Automatic" 
    parameters(0) = value 
    ManagementObj.InvokeMethod("ChangeStartMode", parameters) 

    if sc.Status = ServiceControllerStatus.Stopped or sc.Status = ServiceControllerStatus.Paused then 
     Console.WriteLine(serviceName + " is starting.") 
     sc.Start() 
    else 
     Console.WriteLine(serviceName + " is running.") 
    end if 
End Sub 

エンドモジュール