如何在For Next中使用SMO省略系统数据库

Question

阅读Chris Diver的回复帖后，我发现SMO“列出数据库”非常有用。这是代码：

For Each db As Database In server.Databases
    Me.ComboBox1.Items.Add(db.Name)
Next

上面的代码列出了SQL Server 2008 R2上的所有数据库。我想从上面的代码结果中省略系统数据库。

谢谢。

Answer 1

您可以查看数据库。不要添加它的系统db。 这是

的一段代码

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