Я прочитал пост Криса Дайвера и нашел код полезным. Однако я хочу исключить системные базы данных. Код:
Dim server As New Microsoft.SqlServer.Management.Smo.Server("localhost") For Each db As Database In server.Databases Console.WriteLine(db.Name) Next
Источник: Получить список баз данных из SQL Server
Спасибо.
Вы можете проверить базу данных. Не добавляйте, если его система дБ. Вот кусок кода для этого
Dim value As Boolean For Each db As Database In server.Databases value = db .IsSystemObject if NOT value Then Me.ComboBox1.Items.Add(db.Name) End If Next