Lister les Serveurs SQL

Bonjour,

J'ai ce petit bout de code qui fonctionne parfaitement, sur un poste sous windows 7 ou sur un serveur 2003. Ma ComboBox est bien alimentée avec les noms des serveurs et des instances.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Dim i As Integer Dim oNames As SQLDMO.NameList Dim oSQLApp As SQLDMO.Application oSQLApp = New SQLDMO.Application   oNames = oSQLApp.ListAvailableSQLServers()   For i = 1 To oNames.Count Me.Invoke(New AddItemsDelegate(AddressOf addItToBox), oNames.Item(i)) Next i Me.ComboBox2.SelectedValue = My.Computer.Name Me.ComboBox2.Sorted = True

---

En revanche, si ce code tourne sur un serveur 2008, il ne trouve rien !

Auriez-vous une piste ou une explication ?

Merci d'avance !