Alle Datenbanken eines Microsoft SQL-Server ermitteln Dieser Tipp zeigt, wie sich alle Datenbanken eines MS-SQL-Servers ermitteln lassen.
Autor:   Dieter Otter	Bewertung:	Views:  16.394
www.tools4vb.de	System:  WinXP, Win7, Win8, Win10, Win11	kein Beispielprojekt

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.

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.