PDA

View Full Version : سوال: لیست سرورهای local



H_vakilian
دوشنبه 16 اردیبهشت 1387, 15:19 عصر
قبلا چند تاپیک شبیه این ایجاد شده منتها همشون با این سوالی که من دارم یکم فرق می کنه.
من یک combobox دارم که قرار توش لیست servername باشه منتها فقط برام local رو برمیگردونه(برنامه رو فقط روی یک کامپیوتر اجرا کردم) میخوام combobox ام دقیقا لیستش مثل لیست login در SQLSERVER باشه.
یعنی وقتی در کامپیوتر خودم اجرا می کنم MYCOMPUTER\HOSSEIN رو برگردونه نه که
(local) و یا اینکه
ایا می شه با (local)به SERVER وصل شد؟
این هم کدی هستش که استفاده کردم:



PrivateSub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
sqlApp = New SQLDMO.Application()
Try
sqlservers = sqlApp.ListAvailableSQLServers()
Dim i AsInteger
Dim srv AsObject
For i = 0 To sqlservers.Count
srv = sqlservers.Item(i + 1)
IfNot IsDBNull(srv) Then
Me.ComboBox1.Items.Add(srv)
EndIf
If (Me.ComboBox1.Items.Count > 0) Then
Me.ComboBox1.SelectedIndex = 0
Else
Me.ComboBox1.Text = "<No available SQL Servers>"
EndIf
Next


Catch ex As Exception
MessageBox.Show("خطادر پیدا کردن خادم", "خطا", MessageBoxButtons.OK, MessageBoxIcon.Error)
EndTry
EndSub

H_vakilian
دوشنبه 16 اردیبهشت 1387, 18:02 عصر
خواهش می کنم بهم جواب بدین....:گریه: