specialfolders(5)

snb

Verenigingslid
Lid geworden
12 jun 2008
Berichten
20.542
Met de "wscript.shell" bibliotheek kun je de lokatie van een aantal 'specialfolders' uitlezen.
Je kunt een folder aanduiden met een indexnummer, of met een naam (string).
Van de specialfolder met index 5 kan ik de bijbehorende 'naam' (string) niet vinden.

Dit is de code
Code:
Sub M_snb()
   With New WshShell
      msgbox = .SpecialFolders(5))
      msgbox =.Specialfolders( "???")
   End With
End Sub

Wat moet er bij "???" komen te staan om hetzelfde resultaat te krijgen als bij .specialfolders(5)
Veel dank bij voorbaat.
 
msgbox = .SpecialFolders(5)

De code bevat een syntaxfout op de eerste regel van het berichtvenster (een extra sluitende haakje )). Het zou .SpecialFolders(5) moeten zijn, zonder de afsluitende haakjes ).

.Specialfolders( "???"): This displays a blank (empty) message box because "???" is not a valid special folder name, causing the function to return an empty string

.Specialfolders("???"): Tries to find a folder named "???", which does not exist in the WshSpecialFolders collection.
 
Ook niet als je deze folder opent? Uiteraard met één haakje aan beide kanten van de 5 😊.
 
Ik weet niet of je deze lijst bedoelt maar in PowerShell kan je alle namen met 1 regel opvragen
Code:
[enum]::GetNames([Environment+SpecialFolder])
 
Ik krijg dit rijtje:
Code:
1 - C:\ProgramData\Microsoft\Windows\Start Menu
2 - C:\ProgramData\Microsoft\Windows\Start Menu\Programs
3 - C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Startup
4 - C:\Users\Ed\Desktop
5 - C:\Users\Ed\AppData\Roaming
6 - C:\Users\Ed\AppData\Roaming\Microsoft\Windows\Printer Shortcuts
7 - C:\Users\Ed\AppData\Roaming\Microsoft\Windows\Templates
8 - C:\Windows\Fonts
9 - C:\Users\Ed\AppData\Roaming\Microsoft\Windows\Network Shortcuts
10 - C:\Users\Ed\Desktop
11 - C:\Users\Ed\AppData\Roaming\Microsoft\Windows\Start Menu
12 - C:\Users\Ed\AppData\Roaming\Microsoft\Windows\SendTo
13 - C:\Users\Ed\AppData\Roaming\Microsoft\Windows\Recent
14 - C:\Users\Ed\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup
15 - C:\Users\Ed\Favorites
16 - C:\Users\Ed\Documents
17 - C:\Users\Ed\AppData\Roaming\Microsoft\Windows\Start Menu\Programs
 
Terug
Bovenaan Onderaan