[0theghost0]

هذا الكود وضيفته البحث عن sql server name

كود :

Try
           Cursor = Cursors.WaitCursor
           Timer2.Enabled = True
           Dim dataTable As DataTable = SmoApplication.EnumAvailableSqlServers(True)
           cmbServerName.ValueMember = "Name"
           cmbServerName.DataSource = dataTable
           Dim serverName As String = cmbServerName.SelectedValue.ToString()
           Dim server As New Server(serverName)
       Catch ex As Exception
           MessageBox.Show("Sorry unable to find SQL Server instance" & vbCrLf & "If you have installed SQL Server then enter name of SQL Server instance manually", "Info", MessageBoxButtons.OK, MessageBoxIcon.Information)
       End Try

لكن يوجد به خطأ بسيط وهو لايستطيع اظهار الاسم ليقوم بختياره صحيح