Rubrik: Datenbanken · ADO.NET Allgemein | VB-Versionen: VB2005, VB2008, VB2010 | 06.02.12 |
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.399 |
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.