Dossiers spéciaux

Commenter

Contenu du snippet

c'te fonction permet de connaitre l'emplacement d'un répertoire.
Par exemple c:\windows\recent
y faut lui passer les constantes ci dessous

Source / Exemple : 


Public Declare Function SHGetSpecialFolderPath Lib "shell32.dll"_ Alias "SHGetSpecialFolderPathA" (ByVal hwndOwner As Long, ByVal lpszPath As String,_ ByVal nFolder As Long, ByVal fCreate As Long) As Long

Public Function SDossier(dossier As Long, hwnd As Long)
Dim buff As String
buff = Space(260)
SHGetSpecialFolderPath hwnd, buff, dossier, 0
SDossier = Left(buff, InStr(1, buff, Chr(0)) - 1)
End Function

'''''''''''''''''''''''Constantes'''''''''''''''''''''''''''''''''

0 C:\Documents and Settings\user\Bureau
2 C:\Documents and Settings\user\Menu Démarrer\Programmes
5 C:\Documents and Settings\user\Mes documents
6 C:\Documents and Settings\user\Favoris
7 C:\Documents and Settings\user\Menu Démarrer\Programmes\Démarrage
8 C:\Documents and Settings\user\Recent
9 C:\Documents and Settings\user\SendTo
11 C:\Documents and Settings\user\Menu Démarrer
13 C:\Documents and Settings\user\Mes documents\Ma musique
16 C:\Documents and Settings\user\Bureau
19 C:\Documents and Settings\user\Voisinage réseau
20 C:\WINDOWS\Fonts
21 C:\Documents and Settings\user\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\user\Application Data
27 C:\Documents and Settings\user\Voisinage d'impression
28 C:\Documents and Settings\user\Local Settings\Application Data
31 C:\Documents and Settings\All Users\Favoris
32 C:\Documents and Settings\user\Local Settings\Temporary Internet Files
33 C:\Documents and Settings\user\Cookies
34 C:\Documents and Settings\user\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\user\Mes documents\Mes images
40 C:\Documents and Settings\user
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
53 C:\Documents and Settings\All Users\Documents\Ma musique
54 C:\Documents and Settings\All Users\Documents\Mes images
56 C:\WINDOWS\resources

Conclusion :


elle utilise une API trop dure à trouver, elle y est meme pas dans la visionneuse

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (vbnul)