It will work but I prefer self documented syntax

lcFolder = WshShell.SpecialFolders("Programs")
    * Other special folders
    * AllUsersDesktop
    * AllUsersStartMenu
    * AllUsersPrograms
    * AllUsersStartup
    * Desktop
    * Favorites
    * Fonts
    * MyDocuments
    * NetHood
    * PrintHood
    * Programs
    * Recent
    * SendTo
    * StartMenu
    * Templates 

It's also misleading to use 'strDesktop' variiable to store 'Programs'.

>The program at Start/Programs are at
>

>strDesktop = ff.Item(2)
>

<snip>