Enumerating the databases on a server in SQLDMO/vb.net
Whilst you could just execute the following TSQL command:
select name from master..sysdatabases
to obtain the list of databases on a SQL Server box, it's far more fun to try and do it the SQLDMO way ;) Which is....
Dim oSqlServer as SQLDMO.SQLServer2 = New SQLDMO.SQLServer2Class
Dim oSqlServerDB as SQLDMO.Database
oSqlServer.Connect("ServerName", "SQL_Login_Name, "SQL_Password")
For Each oSqlServerDB In oSqlServer.Databases
MessageBox.Show(oSqlServerDB.Name)
Next
I've used MessageBox.Show to output the database names, but I could've just as easily have pushed the details of each database into an ArrayList or other collection and returned the information as the output of a function. Another way of writing the above code (not as easy to read it has to be said! Well, not as "OOP" anyway!) is:
For i As Integer = 1 To m_oSqlServer.Databases.Count
MessageBox.Show(m_oSqlServer.Databases.ItemByID(i).Name)
Next
And that, pretty much, is how to enumerate the databases on a SQL Server via SQLDMO
