Examples: GetListOfTunes method
This script displays a list of sounds available on your system.
Dim workspace As New NotesUIWorkspace
Dim tunes As Variant
tunes = workspace.GetListOfTunes()
Dim messagestring As String
Forall tunelist In tunes
messagestring = messagestring & tunelist & Chr(10)
End Forall
Messagebox messagestring
For another example, please refer to the Alarms Dialog subform and the Calendar Profile form of the Mail template.