Sub LoadSettings(ByVal Path As String)
        DescriptionList.Clear()
        If Path <> Nothing Then
            Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser( _
              Path)
                MyReader.Delimiters = New String() {","}
 
                While Not MyReader.EndOfData
                    Try
                        currentRow = MyReader.ReadLine()
                        SettingsList.Add(currentRow)
                    Catch ex As _
                      Microsoft.VisualBasic.FileIO.MalformedLineException
                        MsgBox("line " & ex.Message & "is invalid.")
                    End Try
                End While
            End Using
            ServerEnd = False
            ConnectAll()
        End If
    End Sub