Private Function MyInstanceFound(ByVal MyInstanceName As String) As Boolean Dim InstanceFound As Boolean = False Dim MC As ManagedComputer = New ManagedComputer() For Each SI As ServerInstance In MC.ServerInstances If SI.Name.ToString = MyInstanceName Then InstanceFound = True Exit For End If Next Return InstanceFound End Function
SqlDataSourceEnumerator.Instance.GetDataSources
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)