Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Sub LoadNewUsersComboBox() Try Dim tbl As New DataTable Dim row As DataRow tbl.Columns.Add("commonName") tbl.Columns.Add("SAMAccountName") For x As Integer = 0 To arrStcLDAP.Count - 1 row = tbl.NewRow row("commonName") = arrStcLDAP(x).commonName row("SAMAccountName") = arrStcLDAP(x).samAcctName tbl.Rows.Add(row) Next cmbUserName.DataSource = Nothing cmbUserName.DisplayMember = tbl.Columns(0).ColumnName.ToString cmbUserName.ValueMember = tbl.Columns(1).ColumnName.ToString cmbUserName.DataSource = tbl cmbUserName.SelectedIndex = -1 Catch ex As Exception EH.ErrorMessage = "LoadNewUsersComboBox() - " & ex.Message & "~E" End Try EH.ProcessMessages(Me, sbr, EH.ErrorMessage) End Sub
Join the community of 500,000 technology professionals and ask your questions.