獲取SQL服務器組中可用服務器的列表

Question

如何提取SQL服務器組中可用SQL服務器的列表？我打算把這個列表放在VB.NET的組合框中。

Answer 1

我知道這是使用命令行做的唯一方法：

osql -L 

但我發現下面的文章，這似乎解決您的具體目標填充組合框：

http://www.sqldbatips.com/showarticle.asp?ID=45

Answer 2

在C＃中我使用過調用odbc32.dll

例如：

[DllImport("odbc32.dll", CharSet = CharSet.Ansi)] 

private static extern short SQLBrowseConnect(
IntPtr hconn, StringBuilder inString, 
short inStringLength, StringBuilder outString, short outStringLength, out short 
outLengthNeeded); 

文檔該功能是MSDN

Answer 3

如果你不想被捆綁到SQL SMO，這是Ben的文章使用，你可以做這樣的事情，以發現網絡上的所有SQL服務器：

Private Sub cmbServer_DropDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmbServer.DropDown 
    Dim oTable As Data.DataTable 
    Dim lstServers As List(Of String) 
    Try 
     If cmbServer.Items.Count = 0 Then 
      System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.WaitCursor 
      oTable = System.Data.Sql.SqlDataSourceEnumerator.Instance.GetDataSources 

      For Each oRow As DataRow In oTable.Rows 
       If oRow("InstanceName").ToString = "" Then 
        cmbServer.Items.Add(oRow("ServerName")) 
       Else 
        cmbServer.Items.Add(oRow("ServerName").ToString & "\" & oRow("InstanceName").ToString) 
       End If 
      Next oRow 
     End If 
    Catch ex As Exception 
     ErrHandler("frmLogin", "cmbServer_DropDown", ex.Source, ex.Message, Ex.InnerException) 
    Finally 
     System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.Default 

     If oTable IsNot Nothing Then 
      oTable.Dispose() 
     End If 
    End Try 
End Sub 

的SqlDataSourceEnumerator類是不錯的，因爲它可以讓你的SQL服務器發現右出的2.0框架。