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 : Sélectionner tout - Visualiser dans une fenêtre à part
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 !