SQL Servers available in intranet -- listing duplicates

[Deepthiv]

hi all,

i am using SQLDMO API in VB.NET

and when using SQLDMO.Application.ListAvailableSQLServers ,
to list all available intranet severs in to combo box. duplicates are shown .

how to get distinct sql servers??


have any one got same problem...

please let me know..

Thanks,
Deepthi

 

[kulrom]

Hi
try this

[COLOR=blue]For [/COLOR]i [COLOR=blue]As[/COLOR] [COLOR=blue]integer[/COLOR] = 0 [COLOR=blue]To[/COLOR] oNames.Count [COLOR=darkgreen]'where oNames is declared as SQLDMO.NameList but probably you know that[/COLOR]
[COLOR=blue]If Not[/COLOR] cmbList.Items.Contains(oNames.Item(i).ToUpper) [COLOR=blue]Then[/COLOR]
cmbList.Items.Add(oNames.Item(i).ToUpper)
[COLOR=blue]End If[/COLOR]
[COLOR=blue]Next[/COLOR]

HTH
Regards

 

[Deepthiv]

Thanks lot Moderator..

It solved my problem

Regards,
Deepthi

 

[Pace]

kulrom I am interested in this answer, is there anyway you can talk me through?

Im intrigued by

[COLOR=#0000ff]For [COLOR=#000000]i [/COLOR][COLOR=blue]As[/COLOR][COLOR=#000000] [/COLOR][COLOR=blue]integer[/COLOR][COLOR=#000000] = 0 [/COLOR][COLOR=blue]To[/COLOR][COLOR=#000000] oNames.Count [/COLOR][COLOR=darkgreen]'where oNames is declared as SQLDMO.NameList but probably you know that[/COLOR]
[COLOR=blue]If Not[/COLOR][COLOR=#000000] cmbList.Items.Contains(oNames.Item(i).ToUpper) [/COLOR][COLOR=blue]Then[/COLOR]
[/COLOR][COLOR=#000000]cmbList.Items.Add(oNames.Item(i).ToUpper)
[/COLOR]