'Stored the settings in a file
Public Sub SaveSettings
If settings.IsInitialized Then
Log("SaveSettings")
For i = 0 To settings.Size - 1
Log(settings.GetKeyAt(i) & " " & settings.GetValueAt(i))
Next
File.WriteMap(File.DirInternal, settingsFileName, settings)
End If
End Sub