Dossiers système

Chris · Message par **Chris** » dim. 14/oct./2007 14:47

J'ai fait un petit fichier pour retrouver les différents dossiers système de Windows.
Je sais que ça a déjà été fait sous forme de lib, mais bon... comme on dit : "Ca mange pas de pain..."

La procédure au début peut certainement être améliorée pour prendre en compte les différentes versions de Windows.
Chaque macro comporte un commentaire qui indique son utilité. C'est une libre interprétation de la doc Microsoft, la traduction risque d'être un peu approximative. Faut faire avec.

Certains commentaires sont suivis d'une astisque (*). Ca indique que la macro ne fonctionne pas chez moi (ou plutôt, elle fonctionne mais ne renvoit rien).

Code : Tout sélectionner

#CSIDL_PROFILES = 62

Procedure.s GetFolderLocation(Value.l)
  If SHGetSpecialFolderLocation_(#Null, Value , @Ret) = #S_OK
    Loc.s = Space(#MAX_PATH)
    SHGetPathFromIDList_(Ret, @Loc)
    
    ProcedureReturn Loc
  Else
    ProcedureReturn #Null$
  EndIf
EndProcedure

Macro GetDesktop          ; Dossier virtuel représentant le bureau Windows
  GetFolderLocation(#CSIDL_DESKTOP)
EndMacro
Macro GetInternet         ; Dossier virtuel représentant l'Internet                                                     *
  GetFolderLocation(#CSIDL_INTERNET)
EndMacro
Macro GetPrograms         ; Dossier systeme contenant le groupe de programmes de l'utilisateur
  GetFolderLocation(#CSIDL_PROGRAMS)
EndMacro
Macro GetControls         ; Dossier virtuel contenant les icônes du panneau de contrôle                                 *
  GetFolderLocation(#CSIDL_CONTROLS)
EndMacro
Macro GetPrinters         ; Dossier virtuel contenant les imprimantes installées                                        *
  GetFolderLocation(#CSIDL_PRINTERS)
EndMacro
Macro GetMyDocuments      ; Dossier virtuel représenté par l'icône "Mes Documents" sur le bureau
  GetFolderLocation(#CSIDL_PERSONAL)
EndMacro
Macro GetFavorites        ; Dossier système contenant les favoris (Internet Explorer) de l'utilisateur
  GetFolderLocation(#CSIDL_FAVORITES)
EndMacro
Macro GetStartup          ; Dossier système contenant les programmes lancés au démarrage de la session utilisateur
  GetFolderLocation(#CSIDL_STARTUP)
EndMacro
Macro GetRecent           ; Dossier système contenant les raccourcis vers les document récents
  GetFolderLocation(#CSIDL_RECENT)
EndMacro
Macro GetSendTo           ; Dossier système contenant les éléments du menu "Envoyer vers"
  GetFolderLocation(#CSIDL_SENDTO)
EndMacro
Macro GetRecycle          ; Dossier virtuel contenant les objets de la corbeille                                        *
  GetFolderLocation(#CSIDL_BITBUCKET)
EndMacro
Macro GetStartMenu        ; Dossier système contenant les éléments du menu "Démarrer" de l'utilisateur
  GetFolderLocation(#CSIDL_STARTMENU)
EndMacro
Macro GetMyDocuments_2    ; Dossier virtuel représenté par l'icône "Mes Documents" sur le bureau                        *
  GetFolderLocation(#CSIDL_MYDOCUMENTS)
EndMacro
Macro GetMyMusic          ; Dossier système contenant les musiques de l'utilisateur
  GetFolderLocation(#CSIDL_MYMUSIC)
EndMacro
Macro GetMyVideo          ; Dossier système contenant les vidéos de l'utilisateur
  GetFolderLocation(#CSIDL_MYVIDEO)
EndMacro
Macro GetDesktopDir       ; Dossier système contenant les éléments du bureau de l'utilisateur
  GetFolderLocation(#CSIDL_DESKTOPDIRECTORY)
EndMacro
Macro GetDrives           ; Dossier virtuel représenté par l'icône "Poste de Travail"                                   *
  GetFolderLocation(#CSIDL_DRIVES)
EndMacro
Macro GetNetwork          ; Dossier virtuel représentant le "Voisinage Réseau"                                          *
  GetFolderLocation(#CSIDL_NETWORK)
EndMacro
Macro GetNetHood          ; Dossier système contenant les liens vers les postes du "Voisinage Réseau"
  GetFolderLocation(#CSIDL_NETHOOD)
EndMacro
Macro GetFonts            ; Dossier système contenant les polices
  GetFolderLocation(#CSIDL_FONTS)
EndMacro
Macro GetTemplates        ; Dossier système contenant les modèles de documents
  GetFolderLocation(#CSIDL_TEMPLATES)
EndMacro
Macro GetCommonStartMenu  ; Dossier système contenant les éléments du menu "Démarrer" commun
  GetFolderLocation(#CSIDL_COMMON_STARTMENU)
EndMacro
Macro GetCommonPrograms   ; Dossier systeme contenant le groupe de programmes commun
  GetFolderLocation(#CSIDL_COMMON_PROGRAMS)
EndMacro
Macro GetCommonStartup    ; Dossier système contenant les programmes lancés au démarrage d'une session commune
  GetFolderLocation(#CSIDL_COMMON_STARTUP)
EndMacro
Macro GetCommonDesktopDir ; Dossier système contenant les éléments du bureau commun
  GetFolderLocation(#CSIDL_COMMON_DESKTOPDIRECTORY)
EndMacro
Macro GetAppData          ; Dossier système contenant les données des applications de l'utilisateur
  GetFolderLocation(#CSIDL_APPDATA)
EndMacro
Macro GetPrintHood        ; Dossier système contenant les liens vers les objets du dossier virtuel "Imprimantes"
  GetFolderLocation(#CSIDL_PRINTHOOD)
EndMacro
Macro GetLocalAppData     ; Dossier système contenant les données des applications locales de l'utilisateur 
  GetFolderLocation(#CSIDL_LOCAL_APPDATA)
EndMacro
Macro GetAltStartup       ; Dossier système contenant les programmes lancés au démarrage d'une session                  * 
  GetFolderLocation(#CSIDL_ALTSTARTUP)
EndMacro
Macro GetCommonAltStartup ; Dossier système contenant les programmes lancés au démarrage d'une session                  *
GetFolderLocation(#CSIDL_COMMON_ALTSTARTUP)
EndMacro
Macro GetCommonFavorites  ; Dossier système contenant les favoris (Internet Explorer) communs
  GetFolderLocation(#CSIDL_COMMON_FAVORITES)
EndMacro
Macro GetInternetCache    ; Dossier système contenant le cache internet de l'utilisateur
  GetFolderLocation(#CSIDL_INTERNET_CACHE)
EndMacro
Macro GetCookies          ; Dossier système contenant les cookies de l'utilisateur
  GetFolderLocation(#CSIDL_COOKIES)
EndMacro
Macro GetHistory          ; Dossier système contenant l'historique de navigation de l'utilisateur
  GetFolderLocation(#CSIDL_HISTORY)
EndMacro
Macro GetCommonAppDatas   ; Dossier système contenant les données des applications communes
  GetFolderLocation(#CSIDL_COMMON_APPDATA)
EndMacro
Macro GetWindows          ; Dossier système Windows (Racine du système)
  GetFolderLocation(#CSIDL_WINDOWS)
EndMacro
Macro GetSystem           ; Dossier "System" ou "System32"
  GetFolderLocation(#CSIDL_SYSTEM)
EndMacro
Macro GetProgramFiles     ; Dossier "Program Files"
  GetFolderLocation(#CSIDL_PROGRAM_FILES)
EndMacro
Macro GetMyPictures       ; Dossier système contenant les images de l'utilisateur
  GetFolderLocation(#CSIDL_MYPICTURES)
EndMacro
Macro GetProfile          ; Dossier système contenant le profil de l'utilisateur
  GetFolderLocation(#CSIDL_PROFILE)
EndMacro
Macro GetCommonProgramFile; Dossier système contenant les éléments partagé des programmes
  GetFolderLocation(#CSIDL_PROGRAM_FILES_COMMON)
EndMacro
Macro GetCommonTemplates  ; Dossier système contenant les modèles de documents communs
  GetFolderLocation(#CSIDL_COMMON_TEMPLATES)
EndMacro
Macro GetDocuments        ; Dossier système "Documents" commun
  GetFolderLocation(#CSIDL_COMMON_DOCUMENTS)
EndMacro
Macro GetCommonAdminTools ; Dossier système contenant les outils d'administration communs
  GetFolderLocation(#CSIDL_COMMON_ADMINTOOLS)
EndMacro
Macro GetAdminTools       ; Dossier système contenant les outils d'administration de l'utilisateur                      *
  GetFolderLocation(#CSIDL_ADMINTOOLS)
EndMacro
Macro GetCommonMusic      ; Dossier système contenant les musiques communes
  GetFolderLocation(#CSIDL_COMMON_MUSIC)
EndMacro
Macro GetCommonPictures   ; Dossier système contenant les images communes
  GetFolderLocation(#CSIDL_COMMON_PICTURES)
EndMacro
Macro GetCommonVideos     ; Dossier système contenant les vidéos communes
  GetFolderLocation(#CSIDL_COMMON_VIDEO)
EndMacro
Macro Get_CD_BurnArea     ; Dossier système contenant les données à graver
  GetFolderLocation(#CSIDL_CDBURN_AREA)
EndMacro
Macro GetProfiles         ; Dossier contenant les profils de tous les utilisateurs                                      *
  GetFolderLocation(#CSIDL_PROFILES)
EndMacro



Debug GetProfiles

Backup · Message par **Backup** » dim. 14/oct./2007 15:17

super !!

j'adopte !

Le soldat avait fait un truc dans le genre

Code : Tout sélectionner

; Auteur : Le Soldat Inconnu
; Version de PB : 3.90
;
; Explication du programme :
; Récupérer le nom, l'adresse et l'icône des dossiers spéciaux de windows

ProcedureDLL.s GetSpecialFolderLocation(Valeur.l) ; Récupère l'adresse d'un dossier spécifique de Windows
    Protected SpecialFolderLocation.s, Dossier_ID.l
    If SHGetSpecialFolderLocation_(0, Valeur, @Dossier_ID) = 0
        SpecialFolderLocation = Space(#MAX_PATH)
        SHGetPathFromIDList_(Dossier_ID, @SpecialFolderLocation)
        If SpecialFolderLocation
            If Right(SpecialFolderLocation, 1) <> "\"
                SpecialFolderLocation + "\"
            EndIf
        EndIf
    EndIf
    ProcedureReturn SpecialFolderLocation
EndProcedure

ProcedureDLL.s GetSpecialFolderName(Valeur.l) ; Récupère le nom d'un dossier spécifique de Windows
    Protected SpecialFolderName.s, Dossier_ID.l
    If SHGetSpecialFolderLocation_(0, Valeur, @Dossier_ID) = 0
        SpecialFolderName = Space(#MAX_PATH)
        SHGetPathFromIDList_(Dossier_ID, @SpecialFolderName)
        If SpecialFolderName
            SpecialFolderName = GetFilePart(SpecialFolderName)
        Else
            Select Valeur
                Case 1 : SpecialFolderName = "Internet explorer"
                Case 3 : SpecialFolderName = "Panneau de configuration"
                Case 4 : SpecialFolderName = "Imprimantes et télécopieurs"
                Case 10 : SpecialFolderName = "Corbeille"
                Case 17 : SpecialFolderName = "Poste de travail"
                Case 18 : SpecialFolderName = "Favoris réseau"
                Case 49 : SpecialFolderName = "Connexions réseau"
                Case 61 : SpecialFolderName = "Réseau"
            EndSelect
        EndIf
    EndIf
    ProcedureReturn SpecialFolderName
EndProcedure

ProcedureDLL.l GetSpecialFolderSmallIcon(Valeur.l) ; Récupère l'icône 16*16 d'un dossier spécifique de Windows
    Protected Dossier.SHFILEINFO, Dossier_ID.l, Icone
    If SHGetSpecialFolderLocation_(0, Valeur, @Dossier_ID) = 0
        SHGetFileInfo_(Dossier_ID, 0, @Dossier, SizeOf(SHFILEINFO), #SHGFI_ICON | #SHGFI_PIDL | #SHGFI_SMALLICON)
    EndIf
    ProcedureReturn Dossier\hIcon
EndProcedure

ProcedureDLL.l GetSpecialFolderLargeIcon(Valeur.l) ; Récupère l'icône 32*32 d'un dossier spécifique de Windows
    Protected Dossier.SHFILEINFO, Dossier_ID.l, Icone
    If SHGetSpecialFolderLocation_(0, Valeur, @Dossier_ID) = 0
        SHGetFileInfo_(Dossier_ID, 0, @Dossier, SizeOf(SHFILEINFO), #SHGFI_ICON | #SHGFI_PIDL | #SHGFI_LARGEICON)
    EndIf
    ProcedureReturn Dossier\hIcon
EndProcedure



lieu.s=GetSpecialFolderLocation(32) ;32=C:\Documents And Settings\xxxxxxxxxxx\Local Settings\Temporary Internet Files\
Debug lieu.s

;- Programme principal
; On liste tous les dossier systèmes récupérables
For n = 0 To 61
    Nom.s = GetSpecialFolderName(n) ; On récupère le nom du dossier 
    Adresse.s = GetSpecialFolderLocation(n) ; On récupère l'adresse du dossier
    If Nom
        If Adresse = "" ; Affichage dans le debugger des dossiers
            Debug RSet(Str(n), 2, "0") + "     Pas de dossier, il s'agit de : " + Nom
            if Nom.s="Réseau"
                break
            endif
        Else
            Debug RSet(Str(n), 2, "0") + "     " + Adresse
        EndIf 
    EndIf
Next 




; Voici la liste des valeurs obtenues sous Windows XP (Certaines valeurs n'ont pas de dossier sous d'autres version de Windows)

; 00     C:\Documents And Settings\Le Soldat Inconnu\Bureau\
; 01     Pas de dossier, il s'agit de : Internet Explorer
; 02     C:\Documents And Settings\Le Soldat Inconnu\Menu Démarrer\Programmes\
; 03     Pas de dossier, il s'agit de : Panneau de configuration
; 04     Pas de dossier, il s'agit de : Imprimantes et télécopieurs
; 05     C:\Documents And Settings\Le Soldat Inconnu\Mes Documents\
; 06     C:\Documents And Settings\Le Soldat Inconnu\Favoris\
; 07     C:\Documents And Settings\Le Soldat Inconnu\Menu Démarrer\Programmes\Démarrage\
; 08     C:\Documents And Settings\Le Soldat Inconnu\Recent\
; 09     C:\Documents And Settings\Le Soldat Inconnu\SendTo\
; 10     Pas de dossier, il s'agit de : Corbeille
; 11     C:\Documents And Settings\Le Soldat Inconnu\Menu Démarrer\
; 13     C:\Documents And Settings\Le Soldat Inconnu\Mes Documents\Ma musique\
; 16     C:\Documents And Settings\Le Soldat Inconnu\Bureau\
; 17     Pas de dossier, il s'agit de : Poste de travail
; 18     Pas de dossier, il s'agit de : Favoris réseau
; 19     C:\Documents And Settings\Le Soldat Inconnu\Voisinage réseau\
; 20     C:\WINDOWS\Fonts\
; 21     C:\Documents And Settings\Le Soldat Inconnu\Modèles\
; 22     C:\Documents And Settings\All Users\Menu Démarrer\
; 23     C:\Documents And Settings\All Users\Menu Démarrer\Programmes\
; 24     C:\Documents And Settings\All Users\Menu Démarrer\Programmes\Démarrage\
; 25     C:\Documents And Settings\All Users\Bureau\
; 26     C:\Documents And Settings\Le Soldat Inconnu\Application Data\
; 27     C:\Documents And Settings\Le Soldat Inconnu\Voisinage D'impression\
; 28     C:\Documents And Settings\Le Soldat Inconnu\Local Settings\Application Data\
; 31     C:\Documents And Settings\All Users\Favoris\
; 32     C:\Documents And Settings\Le Soldat Inconnu\Local Settings\Temporary Internet Files\
; 33     C:\Documents And Settings\Le Soldat Inconnu\Cookies\
; 34     C:\Documents And Settings\Le Soldat Inconnu\Local Settings\Historique\
; 35     C:\Documents And Settings\All Users\Application Data\
; 36     C:\WINDOWS\
; 37     C:\WINDOWS\system32\
; 38     C:\Program Files\
; 39     C:\Documents And Settings\Le Soldat Inconnu\Mes Documents\Mes images\
; 40     C:\Documents And Settings\Le Soldat Inconnu\
; 41     C:\WINDOWS\system32\
; 43     C:\Program Files\Fichiers communs\
; 45     C:\Documents And Settings\All Users\Modèles\
; 46     C:\Documents And Settings\All Users\Documents\
; 47     C:\Documents And Settings\All Users\Menu Démarrer\Programmes\Outils D'administration\
; 49     Pas de dossier, il s'agit de : Connexions réseau
; 54     C:\Documents And Settings\All Users\Documents\Mes images\
; 56     C:\WINDOWS\Resources\
; 59     C:\Documents And Settings\Le Soldat Inconnu\Local Settings\Application Data\Microsoft\CD Burning\
; 61     Pas de dossier, il s'agit de : Réseau


; Voici la liste des valeurs obtenues sous Windows ME

; 00     C:\WINDOWS\Bureau\
; 01     Pas de dossier, il s'agit de : Internet explorer
; 02     C:\WINDOWS\Menu Démarrer\Programmes\
; 03     Pas de dossier, il s'agit de : Panneau de configuration
; 04     Pas de dossier, il s'agit de : Imprimantes et télécopieurs
; 05     C:\Mes documents\
; 06     C:\WINDOWS\Favoris\
; 07     C:\WINDOWS\Menu Démarrer\Programmes\Démarrage\
; 08     C:\WINDOWS\Recent\
; 09     C:\WINDOWS\SendTo\
; 10     Pas de dossier, il s'agit de : Corbeille
; 11     C:\WINDOWS\Menu Démarrer\
; 13     C:\Mes documents\Ma musique\
; 14     C:\Mes documents\Mes vidéos\
; 16     C:\WINDOWS\Bureau\
; 17     Pas de dossier, il s'agit de : Poste de travail
; 18     Pas de dossier, il s'agit de : Favoris réseau
; 19     C:\WINDOWS\Voisinage réseau\
; 20     C:\WINDOWS\FONTS\
; 21     C:\WINDOWS\Modèles\
; 24     C:\WINDOWS\All Users\Menu Démarrer\Programmes\Démarrage\
; 25     C:\WINDOWS\All Users\Bureau\
; 26     C:\WINDOWS\Application Data\
; 27     C:\WINDOWS\Voisinage d'impression\
; 28     C:\WINDOWS\Application Data\
; 32     C:\WINDOWS\Temporary Internet Files\
; 33     C:\WINDOWS\COOKIES\
; 34     C:\WINDOWS\Historique\
; 35     C:\WINDOWS\All Users\Application Data\
; 36     C:\WINDOWS\
; 37     C:\WINDOWS\SYSTEM\
; 38     C:\Program Files\
; 39     C:\Mes documents\Mes images\
; 41     C:\WINDOWS\SYSTEM\
; 43     C:\Program Files\Fichiers communs\
; 46     C:\WINDOWS\All Users\Documents\
; 49     Pas de dossier, il s'agit de : Connexions réseau


; Voici la liste des valeurs obtenues sous Windows 98

; 00     C:\WINDOWS\Bureau\
; 01     Pas de dossier, il s'agit de : Internet explorer
; 02     C:\WINDOWS\Menu Démarrer\Programmes\
; 03     Pas de dossier, il s'agit de : Panneau de configuration
; 04     Pas de dossier, il s'agit de : Imprimantes et télécopieurs
; 05     C:\Mes documents\
; 06     C:\WINDOWS\Favoris\
; 07     C:\WINDOWS\Menu Démarrer\Programmes\Démarrage\
; 08     C:\WINDOWS\Recent\
; 09     C:\WINDOWS\SendTo\
; 10     Pas de dossier, il s'agit de : Corbeille
; 11     Menu Démarrer C:\WINDOWS\Menu Démarrer\
; 16     C:\WINDOWS\Bureau\
; 17     Pas de dossier, il s'agit de : Poste de travail
; 18     Pas de dossier, il s'agit de : Favoris réseau
; 19     C:\WINDOWS\Voisinage réseau\
; 20     C:\WINDOWS\FONTS\
; 21     C:\WINDOWS\ShellNew\
; 26     C:\WINDOWS\Application Data\
; 27     C:\WINDOWS\PrintHood\
; 32     C:\WINDOWS\Temporary Internet Files\
; 33     C:\WINDOWS\Cookies\
; 34     C:\WINDOWS\Historique\

Chris · Message par **Chris** » dim. 14/oct./2007 15:29

Dobro a écrit :super !! j'adopte !

Le soldat avait fait un truc dans le genre

Oui, mais l'avantage du mien, c'est que t'es pas obligé de copier tout le code dans ton programme.

Tu peux juste copier la petite procédure et la macro dont tu as besoin, coller ça dans ton code, et le tour est joué.

Ar-S · Message par **Ar-S** » dim. 14/oct./2007 16:05

Ohoh ! voilà qui est super pratique !
Merci Chris

---edit----

Bizarre, lorsque j'exécute le soft, le resultat est vide !

comment que ça se fesse ?

Chris · Message par **Chris** » dim. 14/oct./2007 16:20

Ar-S a écrit :Ohoh ! voilà qui est super pratique !
Merci Chris

---edit----

Bizarre, lorsque j'exécute le soft, le resultat est vide !
comment que ça se fesse ?

Il n'y a pas UN résultat. Il y a autant de résultats qu'il y a de macros.

Il faut que tu changes la commande située après le "Debug"

Par exemple, pour avoir le dossier des favoris Internet, tu tapes "Debug GetFavorites".

Enfin... Je suppose qu c'est ça ton problème. Tu as gardé la commande qui se trouve derrière "Debug", et chez moi aussi, elle ne renvoit rien. (Voir l'astérisque qui se trouve à la fin du commentaire).

Copier les codes, c'est bien, lire (et comprendre) les messages qui vont avec, c'est mieux

Backup · Message par **Backup** » dim. 14/oct./2007 16:41

Ar-S a écrit :Bizarre, lorsque j'exécute le soft, le resultat est vide !
comment que ça se fesse ?

essaye

Code : Tout sélectionner

 debug GetCommonPictures

car tout le monde a un dossier "Mes images"

venom · Message par **venom** » dim. 14/oct./2007 16:47

ou bien comme sa

Code : Tout sélectionner

#CSIDL_PROFILES = 62

Procedure.s GetFolderLocation(Value.l)
  If SHGetSpecialFolderLocation_(#Null, Value , @Ret) = #S_OK
    Loc.s = Space(#MAX_PATH)
    SHGetPathFromIDList_(Ret, @Loc)
   
    ProcedureReturn Loc
  Else
    ProcedureReturn #NULL$
  EndIf
EndProcedure

Macro GetDesktop          ; Dossier virtuel représentant le bureau Windows
  GetFolderLocation(#CSIDL_DESKTOP)
EndMacro
Macro GetInternet         ; Dossier virtuel représentant l'Internet                                                     *
  GetFolderLocation(#CSIDL_INTERNET)
EndMacro
Macro GetPrograms         ; Dossier systeme contenant le groupe de programmes de l'utilisateur
  GetFolderLocation(#CSIDL_PROGRAMS)
EndMacro
Macro GetControls         ; Dossier virtuel contenant les icônes du panneau de contrôle                                 *
  GetFolderLocation(#CSIDL_CONTROLS)
EndMacro
Macro GetPrinters         ; Dossier virtuel contenant les imprimantes installées                                        *
  GetFolderLocation(#CSIDL_PRINTERS)
EndMacro
Macro GetMyDocuments      ; Dossier virtuel représenté par l'icône "Mes Documents" sur le bureau
  GetFolderLocation(#CSIDL_PERSONAL)
EndMacro
Macro GetFavorites        ; Dossier système contenant les favoris (Internet Explorer) de l'utilisateur
  GetFolderLocation(#CSIDL_FAVORITES)
EndMacro
Macro GetStartup          ; Dossier système contenant les programmes lancés au démarrage de la session utilisateur
  GetFolderLocation(#CSIDL_STARTUP)
EndMacro
Macro GetRecent           ; Dossier système contenant les raccourcis vers les document récents
  GetFolderLocation(#CSIDL_RECENT)
EndMacro
Macro GetSendTo           ; Dossier système contenant les éléments du menu "Envoyer vers"
  GetFolderLocation(#CSIDL_SENDTO)
EndMacro
Macro GetRecycle          ; Dossier virtuel contenant les objets de la corbeille                                        *
  GetFolderLocation(#CSIDL_BITBUCKET)
EndMacro
Macro GetStartMenu        ; Dossier système contenant les éléments du menu "Démarrer" de l'utilisateur
  GetFolderLocation(#CSIDL_STARTMENU)
EndMacro
Macro GetMyDocuments_2    ; Dossier virtuel représenté par l'icône "Mes Documents" sur le bureau                        *
  GetFolderLocation(#CSIDL_MYDOCUMENTS)
EndMacro
Macro GetMyMusic          ; Dossier système contenant les musiques de l'utilisateur
  GetFolderLocation(#CSIDL_MYMUSIC)
EndMacro
Macro GetMyVideo          ; Dossier système contenant les vidéos de l'utilisateur
  GetFolderLocation(#CSIDL_MYVIDEO)
EndMacro
Macro GetDesktopDir       ; Dossier système contenant les éléments du bureau de l'utilisateur
  GetFolderLocation(#CSIDL_DESKTOPDIRECTORY)
EndMacro
Macro GetDrives           ; Dossier virtuel représenté par l'icône "Poste de Travail"                                   *
  GetFolderLocation(#CSIDL_DRIVES)
EndMacro
Macro GetNetwork          ; Dossier virtuel représentant le "Voisinage Réseau"                                          *
  GetFolderLocation(#CSIDL_NETWORK)
EndMacro
Macro GetNetHood          ; Dossier système contenant les liens vers les postes du "Voisinage Réseau"
  GetFolderLocation(#CSIDL_NETHOOD)
EndMacro
Macro GetFonts            ; Dossier système contenant les polices
  GetFolderLocation(#CSIDL_FONTS)
EndMacro
Macro GetTemplates        ; Dossier système contenant les modèles de documents
  GetFolderLocation(#CSIDL_TEMPLATES)
EndMacro
Macro GetCommonStartMenu  ; Dossier système contenant les éléments du menu "Démarrer" commun
  GetFolderLocation(#CSIDL_COMMON_STARTMENU)
EndMacro
Macro GetCommonPrograms   ; Dossier systeme contenant le groupe de programmes commun
  GetFolderLocation(#CSIDL_COMMON_PROGRAMS)
EndMacro
Macro GetCommonStartup    ; Dossier système contenant les programmes lancés au démarrage d'une session commune
  GetFolderLocation(#CSIDL_COMMON_STARTUP)
EndMacro
Macro GetCommonDesktopDir ; Dossier système contenant les éléments du bureau commun
  GetFolderLocation(#CSIDL_COMMON_DESKTOPDIRECTORY)
EndMacro
Macro GetAppData          ; Dossier système contenant les données des applications de l'utilisateur
  GetFolderLocation(#CSIDL_APPDATA)
EndMacro
Macro GetPrintHood        ; Dossier système contenant les liens vers les objets du dossier virtuel "Imprimantes"
  GetFolderLocation(#CSIDL_PRINTHOOD)
EndMacro
Macro GetLocalAppData     ; Dossier système contenant les données des applications locales de l'utilisateur
  GetFolderLocation(#CSIDL_LOCAL_APPDATA)
EndMacro
Macro GetAltStartup       ; Dossier système contenant les programmes lancés au démarrage d'une session                  *
  GetFolderLocation(#CSIDL_ALTSTARTUP)
EndMacro
Macro GetCommonAltStartup ; Dossier système contenant les programmes lancés au démarrage d'une session                  *
GetFolderLocation(#CSIDL_COMMON_ALTSTARTUP)
EndMacro
Macro GetCommonFavorites  ; Dossier système contenant les favoris (Internet Explorer) communs
  GetFolderLocation(#CSIDL_COMMON_FAVORITES)
EndMacro
Macro GetInternetCache    ; Dossier système contenant le cache internet de l'utilisateur
  GetFolderLocation(#CSIDL_INTERNET_CACHE)
EndMacro
Macro GetCookies          ; Dossier système contenant les cookies de l'utilisateur
  GetFolderLocation(#CSIDL_COOKIES)
EndMacro
Macro GetHistory          ; Dossier système contenant l'historique de navigation de l'utilisateur
  GetFolderLocation(#CSIDL_HISTORY)
EndMacro
Macro GetCommonAppDatas   ; Dossier système contenant les données des applications communes
  GetFolderLocation(#CSIDL_COMMON_APPDATA)
EndMacro
Macro GetWindows          ; Dossier système Windows (Racine du système)
  GetFolderLocation(#CSIDL_WINDOWS)
EndMacro
Macro GetSystem           ; Dossier "System" ou "System32"
  GetFolderLocation(#CSIDL_SYSTEM)
EndMacro
Macro GetProgramFiles     ; Dossier "Program Files"
  GetFolderLocation(#CSIDL_PROGRAM_FILES)
EndMacro
Macro GetMyPictures       ; Dossier système contenant les images de l'utilisateur
  GetFolderLocation(#CSIDL_MYPICTURES)
EndMacro
Macro GetProfile          ; Dossier système contenant le profil de l'utilisateur
  GetFolderLocation(#CSIDL_PROFILE)
EndMacro
Macro GetCommonProgramFile; Dossier système contenant les éléments partagé des programmes
  GetFolderLocation(#CSIDL_PROGRAM_FILES_COMMON)
EndMacro
Macro GetCommonTemplates  ; Dossier système contenant les modèles de documents communs
  GetFolderLocation(#CSIDL_COMMON_TEMPLATES)
EndMacro
Macro GetDocuments        ; Dossier système "Documents" commun
  GetFolderLocation(#CSIDL_COMMON_DOCUMENTS)
EndMacro
Macro GetCommonAdminTools ; Dossier système contenant les outils d'administration communs
  GetFolderLocation(#CSIDL_COMMON_ADMINTOOLS)
EndMacro
Macro GetAdminTools       ; Dossier système contenant les outils d'administration de l'utilisateur                      *
  GetFolderLocation(#CSIDL_ADMINTOOLS)
EndMacro
Macro GetCommonMusic      ; Dossier système contenant les musiques communes
  GetFolderLocation(#CSIDL_COMMON_MUSIC)
EndMacro
Macro GetCommonPictures   ; Dossier système contenant les images communes
  GetFolderLocation(#CSIDL_COMMON_PICTURES)
EndMacro
Macro GetCommonVideos     ; Dossier système contenant les vidéos communes
  GetFolderLocation(#CSIDL_COMMON_VIDEO)
EndMacro
Macro Get_CD_BurnArea     ; Dossier système contenant les données à graver
  GetFolderLocation(#CSIDL_CDBURN_AREA)
EndMacro
Macro GetProfiles         ; Dossier contenant les profils de tous les utilisateurs                                      *
  GetFolderLocation(#CSIDL_PROFILES)
EndMacro

Debug GetDesktop
Debug GetInternet
Debug GetPrograms
Debug GetControls
Debug GetPrinters
Debug GetMyDocuments
Debug GetFavorites
Debug GetStartup
Debug GetRecent
Debug GetSendTo
Debug GetRecycle
Debug GetStartMenu
Debug GetMyDocuments_2
Debug GetMyMusic
Debug GetMyVideo
Debug GetDesktopDir
Debug GetDrives
Debug GetNetwork
Debug GetNetHood
Debug GetFonts
Debug GetTemplates
Debug GetCommonStartMenu
Debug GetCommonPrograms
Debug GetCommonStartup
Debug GetCommonDesktopDir
Debug GetAppData
Debug GetPrintHood
Debug GetLocalAppData
Debug GetAltStartup
Debug GetCommonAltStartup
Debug GetCommonFavorites
Debug GetInternetCache
Debug GetCookies
Debug GetHistory
Debug GetCommonAppDatas
Debug GetWindows
Debug GetSystem
Debug GetProgramFiles
Debug GetMyPictures
Debug GetProfile
Debug GetCommonProgramFile
Debug GetCommonTemplates
Debug GetDocuments
Debug GetCommonAdminTools
Debug GetAdminTools
Debug GetCommonMusic
Debug GetCommonPictures
Debug GetCommonVideos
Debug Get_CD_BurnArea
Debug GetProfiles

@++

Ar-S · Message par **Ar-S** » dim. 14/oct./2007 17:28

oups c'est vrai que je suis allez vite en besogne.
Il faut dire que j'ai essayé vite fait entre 2 prises de tête concernant mes softs.
Celui de cryptage de texte qui est maintenant opérationnel et celui qui va avoir raison de ma santé mentale avec le UrlDownloadToFile

)

Ulix · Message par **Ulix** » mar. 16/oct./2007 8:52

Excellent !

Ne peut-on pas en faire un Post-it, afin que cela serve de référence a tous ?