SQL-Server Instanzen ermitteln (.NET) Dieser Tipp zeigt, wie sich die installierten SQL-Server Instanzen ermitteln und in einer ListBox anzeigen lassen.
Autor:   Dieter Otter	Bewertung:	Views:  20.735
www.tools4vb.de	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Nachfolgender Code zeigt, wie sich die installierten SQL-Server Instanzen ermitteln und in einer ListBox anzeigen lassen.

Platzieren Sie auf das Formular ein ListBox-Control, sowie einen CommandButton und fügen nachfolgenden Code ein:

Imports System.Data
 
Public Class Form1
 
  Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
 
    Me.Cursor = Cursors.WaitCursor
 
    ' alle Server-Instanzen ermitteln
    ' Rückgabewert ist ein DataTable-Objekt
    Dim oTable As DataTable = Sql.SqlDataSourceEnumerator.Instance.GetDataSources()
 
    Dim sServer As String = ""
    Dim sInstance As String = ""
 
    ' ListBox-Einträge löschen
    ListBox1.Items.Clear
 
    ' jetzt das DataTable-Objekt durchlaufen
    For i As Integer = 0 To oTable.Rows.Count - 1
      With oTable.Rows(i)
        ' Servername
        sServer = .Item("ServerName")
 
        ' Instanzname
        sInstance = ""
        If Not .Item("InstanceName") Is DBNull.Value Then
          sInstance = "\" & .Item("InstanceName")
        End If
 
        ListBox1.Items.Add(sServer & sInstance)
      End With
    Next
    Me.Cursor = Cursors.Default
  End Sub
End Class

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.