PDA

View Full Version : آموزش: بدست آوردن نام سرورهای بانک اطلاعاتی SQL SERVER



Ali_M.Eghbaldar
سه شنبه 10 شهریور 1394, 16:40 عصر
سلام
با این دستور می تونید نام سرورهایی که موتور 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
یک شنبه 15 شهریور 1394, 15:01 عصر
درود;

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

Ali_M.Eghbaldar
یک شنبه 15 شهریور 1394, 16:49 عصر
درود;

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

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

Imports System.Data.Sql

موفق باشی.