How can I list all the instances available in a server machine (1 Viewer)

[accesser2003]

If my computer name is Elephant, and I want to look for all the SQL instances at this computer, How can I get those?

 

[KenHigg]

(There must be an appropriate elephant joke for this but I just can't think of one at the moment - )

 

[georgedwilkinson]

Through Enterprise Manager.

 

[DCrake]

Simple Software Solutions

Here is a samll function that searches for all available servers connected to the host pc


You will need to add Microsoft SQLDMO Object Library to your references first.

Public Function ListConnectedSQLServers()
    Dim i As Integer
    Dim oNames As SQLDMO.NameList
    Dim oSQLApp As SQLDMO.Application
    Set oSQLApp = New SQLDMO.Application
    
    Set oNames = oSQLApp.ListAvailableSQLServers()
    SysServerCount = oNames.Count
    If SysServerCount = 0 Then
        ArrayServers(0) = "LOCAL"
    Else
        For i = 0 To SysServerCount - 1
            ArrayServers(i) = oNames.Item(i)
        Next i
    End If
    
End Function

In this sample I declared an array and a interger variable, ArrayServers and SysServerCount respectively.

The code enumerates and passes the SQL server names to the array. Which can be used to populate a list box or combobox later. If the servercound is greater than zero. This is used to warn the user that no SQL servers could be detected.

CodeMaster: