Alle Datenbanken eines Microsoft SQL-Server ermitteln Dieser Tipp zeigt, wie sich alle Datenbanken eines MS-SQL-Servers ermitteln lassen.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  18.051
https://www.tools4vb.com	System:  WinXP, Win7, Win8, Win10, Win11	kein Beispielprojekt

Geben Sie hier Ihre persönliche Bewertung ab! Bisher wurde noch keine Bewertung abgegeben.

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Heute möchten wir Ihnen zeigen, wie Sie mit nur wenigen Zeilen alle Datenbanken eines MS-SQL Server auslesen können.

' SQLCommand-Objekt über alle Datenbanken erstellen
Dim cmd As New SqlClient.SqlCommand("sp_databases", Conn)
cmd.CommandType = CommandType.StoredProcedure
 
' Ausführen und Ergebnis in einer ListBox anzeigen
Dim dr As SqlClient.SqlDataReader = cmd.ExecuteReader
If dr.HasRows Then
  Do While dr.Read
    ListBox1.Items.Add(dr("Database_Name"))
  Loop
End If

Anmerkung:
Bei Conn handelt es sich um ein geöffnetes Connection-Objekt.