Public Function ExportRegistrySettings( _
   ByVal FilePath As String _
) As Long