بدست آوردن نام سرورهای بانک اطلاعاتی SQL SERVER

[Ali_M.Eghbaldar]

سلام
با این دستور می تونید نام سرورهایی که موتور SQL Server شناخته بدست بیارید و برای پشتیبان گیری ازش استفاده کنید.

        Dim Server As String = String.Empty

        Dim instance As SqlDataSourceEnumerator = SqlDataSourceEnumerator.Instance

        Dim table As System.Data.DataTable = instance.GetDataSources()



        For Each row As System.Data.DataRow In table.Rows

            Server = String.Empty

            Server = row("ServerName")

            If row("InstanceName").ToString.Length > 0 Then

                Server = Server & "\" & row("InstanceName")

            End If

            cmbserver.Items.Add(Server)

        Next

[mehdi.safavie]

درود;

داداش کانکشن نمیخواد ؟ این کد واسه من کار نمیکنه ! فکر کنم یه چیزایی جا انداختی .
مثلا Import System.Data.SQL که حتما باید باشه .
این کد رو اجرا میکنم فقط اسم سیستم خودم رو میده .

[Ali_M.Eghbaldar]

درود;

داداش کانکشن نمیخواد ؟ این کد واسه من کار نمیکنه ! فکر کنم یه چیزایی جا انداختی .
مثلا Import System.Data.SQL که حتما باید باشه .
این کد رو اجرا میکنم فقط اسم سیستم خودم رو میده .

سلام
دوست عزیز من دوباره کد تست کردم، کد همینه
تنها چیزی که ننوشتم که خیلی واضح هم بود این کده:

Imports System.Data.Sql

موفق باشی.