Nom de dossierRésolu

Question

Bonjour tous le monde, voila, je cherche à savoir comment on peu faire connaître le nom d'un dossier dont on sais où il est mais que l'on ne connais donc pas son nom.
Jusque la, tous ce que j'ai trouvé était de l'analyse du contenu d'un dossier.
Merci d'avance
Bye

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

chaibat05 · Accepted Answer

Bonsoir,
le mieux serait peut être qu' on lui file un exemple
il pourra désigner de quel dossier s' agit-il...


A supposer qu' il veut faire ça dans mon PC,
Voici l' arborescence :


-Documents and Settings
  -  All Users
          Bureau
      +  Documents partagés
          Favoris
      +  Menu Démarrer
  -  Me (<== je crois qu' il s' agit de celui-ci) 
       +  Bureau
           Contacts
           Cookies
       +  Favoris
       +  Menu Démarrer
       +  Mes documents
       +  UserData
       +  WINDOWS

vas-y et ne bouzilles pas tout

cs_EBArtSoft · Answer

Ca depend de la version de vb mais Dir() suffit

@+

E.B.

cs_veler · Answer

Salut, je vais essayer avec Dir( ).
J'utilise Visual Basic 2005 Express
Bye

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

cs_JMO · Answer

Bonsoir à tous....

Qu'entendez-vous par "on sais où il est" ???

jean-marc

cs_veler · Answer

Bonsoir, quand je dis "on sait où il est", je sous entend que l'on sais où ce trouve le dossier mais que l'on ne connais pas son nom.
Bye

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

cs_JMO · Answer

Re,

Boule de cristal de M. Jack.

Le fichier vient par miracle dans un folder (vierge) et vous recherchez le .Name du fichier ???

jean-marc

Utilisateur anonyme · Answer

Bonsoir tout le monde,

Heu, y'a un truc que je ne pige pas.
Tu cherche un dossier (tu connais sont emplacement), donc tu cherche un sous-dossier parmis pleins de dossiers d'un dossier. Mais vu que tu connais pas son nom ???
C'est étrange ; Ou alors y'a un truc qui m'échape. En même temps c'est pas simple à expliquer (trop de dossier).




__________
Kenji

cs_JMO · Answer

Re,

Merci Charles, ça me réconforte dans mon doute.
En sachant que j'ai fait, encore, une erreur en parlant de file au lieu de folder.

jean-marc

cs_veler · Answer

Salut, je vous comprend, j'ai eu du mal à rédiger tous sa. Je vais reprendre depuis le début:

Je créer un logiciel qui constiste à nettoyer l'ordi, pour sa, il faut supprimer les fichiers temporaires ce trouvant dans "C:\Docuents and Settings\NOM DE L'UTILISATEUR\Local Settings\Temp"
Le dossier "NOM DE L'UTILISATEUR" n'est jamais le même sur un ordi (quand on installe Windows, quand on met son prénom, ce dossier porte ce nom là), donc c'est pour sa qu'il faut que je trouve le nom de ce dossier. Or, dans "Documents and Settings", il y a plusieurs dossiers dont celui-ci(ce qui rend la tâche encore plus difficile).
Je cherche donc un script me permettant de trouver le nom de ce dossier.
J'espère que je me suis bien exprimé, je me suis relue 3 fois...
Bye

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

leSaleGauSS · Answer

en fait c'est très clair....
il a un dossier dans lequel il enregistre un dossier avec un nom X. Ce qu'il veut c'est trouver le nom X ... 
(on supposant que le nom X est attribué automatiquement parce que si c'est manuel...)
Alors j'ai juste ou ma boule de cristal est cassé ? 

Quand je suis là tout va mal

leSaleGauSS · Answer

Oups desolé Veler, j'ai pas vu ton message (sacré décalage horaire)

Quand je suis là tout va mal

cs_veler · Answer

Ahahah, ouai, je te confirme, ta boule de cristal n'est pas cassé, si tu pouvait trouvé le script dedans, sa serrai cool, tu me dirai ou tu la eu et j'irais tout de suite me l'offrir (lol)
Bye

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

cs_veler · Answer

Oups, moi n'on plus, j'ai pas ton message disant que tu n'a pas vu mon dernier message, decidément...

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

cs_JMO · Answer

Re,

Là, j'ai compris.
Le ComputerName étant en value, je n'aurai que des réponses et orientations à proposer en wmi.

jean-marc

cs_veler · Answer

???, euhhhhhh, rien compris au message, il me faudrai epu être un traducteur simultannée (lol).
Esque tu pourrais m'expliqué en claire ce qu tu as dit?

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

leSaleGauSS · Answer

Au debut tu comprends rien mais ca va venir...(il m'a déjà fait le coups)
 http://www.microsoft.com/technet/scriptcenter/default.mspx

Quand je suis là tout va mal

BruNews · Answer

Lez dossier temp est donné par GetTempPath() pour la session en cours, rien de mystique sur ce point.

ciao...
BruNews, MVP VC++

cs_veler · Answer

Salut, sa me donne quelque idée après tous ce que j'ai déja trouvé, je pourrais par exemple lister le contenu de tous les dossier ce trouvant dans "Documents and Settings" et de dire que s'il trouve un dossier qui s'appelle "Cookies", il fait fait telle chose...
Sa maide déja beaucoup, je garde sa au cas ou mais peu être y a-t-il une autre solution...
Bye

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

cavo789 · Answer

Il existe une API de Windows permettant de retrouver le chemin d'accès d'un folder système comme le folder Application data de l'utilisateur connecté.

Ci-dessous le code

Public Enum SpecialFoldersConstants
   CSIDL_ADMINTOOLS = &H30
   CSIDL_ALTSTARTUP = &H1D
   CSIDL_APPDATA = &H1A
   CSIDL_BITBUCKET = &HA
   CSIDL_COMMON_ADMINTOOLS = &H2F
   CSIDL_COMMON_ALTSTARTUP = &H1E
   CSIDL_COMMON_APPDATA = &H23
   CSIDL_COMMON_DESKTOPDIRECTORY = &H19
   CSIDL_COMMON_DOCUMENTS = &H2E
   CSIDL_COMMON_FAVORITES = &H1F
   CSIDL_COMMON_PROGRAMS = &H17
   CSIDL_COMMON_STARTMENU = &H16
   CSIDL_COMMON_STARTUP = &H18
   CSIDL_COMMON_TEMPLATES = &H2D
   CSIDL_CONTROLS = &H3
   CSIDL_COOKIES = &H21
   CSIDL_DESKTOP = &H0
   CSIDL_DESKTOPDIRECTORY = &H10
   CSIDL_DRIVES = &H11
   CSIDL_FAVORITES = &H6
   CSIDL_FLAG_CREATE = &H8000
   CSIDL_FLAG_DONT_VERIFY = &H4000
   CSIDL_FLAG_MASK = &HFF00
   CSIDL_FONTS = &H14
   CSIDL_HISTORY = &H22
   CSIDL_INTERNET = &H1
   CSIDL_INTERNET_CACHE = &H20
   CSIDL_LOCAL_APPDATA = &H1C
   CSIDL_MYPICTURES = &H27
   CSIDL_NETHOOD = &H13
   CSIDL_NETWORK = &H12
   CSIDL_PERSONAL = &H5
   CSIDL_PRINTERS = &H4
   CSIDL_PRINTHOOD = &H1B
   CSIDL_PROFILE = &H28
   CSIDL_PROGRAM_FILES = &H26
   CSIDL_PROGRAM_FILES_COMMON = &H2B
   CSIDL_PROGRAM_FILES_COMMONX86 = &H2C
   CSIDL_PROGRAM_FILESX86 = &H2A
   CSIDL_PROGRAMS = &H2
   CSIDL_RECENT = &H8
   CSIDL_SENDTO = &H9
   CSIDL_STARTMENU = &HB
   CSIDL_STARTUP = &H7
   CSIDL_SYSTEM = &H25
   CSIDL_SYSTEMX86 = &H29
   CSIDL_TEMPLATES = &H15
   CSIDL_WINDOWS = &H24
End Enum

Public Declare Function apiSHGetSpecialFolderLocation Lib "shell32" Alias "SHGetSpecialFolderLocation" _
    (ByVal hwndOwner As Long, ByVal nFolder As Long, ppidl As Long) As Long
Public Declare Function apiSHGetPathFromIDList Lib "shell32" Alias "SHGetPathFromIDList" _
    (pidl As Long, ByVal pszPath As String) As Long

Public Function ZGetSpecialFolder(ByVal SpecialFolder As SpecialFoldersConstants) As String


'   Returns path to a special folder on the machine without a trailing backslash.
'
'   Refer to the comments in declarations for OS and IE dependent CSIDL values.


Dim wReturn As Long
Dim sFolder As String
Dim pidl As Long


   wReturn = apiSHGetSpecialFolderLocation(0&, SpecialFolder, pidl)
    
   If wReturn = 0 Then
    
      sFolder = Space$(MAX_PATH)
      wReturn = apiSHGetPathFromIDList(ByVal pidl, sFolder)
        
      If Not wReturn = 0 Then
      
         sFolder = ZTrimNull(sFolder)
         If Right(sFolder, 1) <> "" Then sFolder = sFolder & ""
         
      End If
        
      Call sapiCoTaskMemFree(pidl)
      
    End If
    
    ZGetSpecialFolder = sFolder 'left$(strLocation, InStr(strLocation, vbNullChar) - 1) & ""
    
End Function

Christophe

cs_veler · Answer

Salut, ton après avoir lut et relut ton script, j'ai bien compris ce que sa doit faire sauf qu'il y a des erreurs que je n'arrive pas à enlever, voici le script (je met en rouge les endroit ou il y a les erreurs):

        If wReturn = 0 Then

            sFolder = Space$(MAX_PATH)
      wReturn = apiSHGetPathFromIDList(ByVal pidl, sFolder)

            If Not wReturn = 0 Then

                sFolder =ZTrimNull(sFolder)
                IfRight(sFolder, 1) <> "" Then sFolder = sFolder & ""

            End If

            CallsapiCoTaskMemFree(pidl)

        End If

Je ne sais pas trop à quoi tous cela sert, mais mon vb 2005 Express n'aime pas.
Bye

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

Utilisateur anonyme · Answer

vb 2005 !!! J'avais pa vu. Mais c'est tout simple alors :






Dim CookiesPath As String = System.Environment.GetFolderPath(System.Environment.SpecialFolder.Cookies)
System.Windows.Forms.MessageBox.Show(CookiesPath),

----

(Coloration syntaxique automatique par Kenji)




__________
Kenji

Utilisateur anonyme · Answer

Tu voulais peut être plutot le repertoire temporaire :



Dim TempPath As String = System.IO.Path.GetTempPath()
System.Windows.Forms.MessageBox.Show(CookiesPath),

----

(Coloration syntaxique automatique par Kenji)




__________
Kenji

cs_veler · Answer

Salut, merci, la prochaine fois, je préciserai plus taux.
Euuuuuh, il y a le "System." qui est incorrect, euuuuuuh, si ta la soluce (pendant que j'essais de mon coté)
Bye

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

Utilisateur anonyme · Answer

Non, c'est moi qui n'est pas vfait attention pour le vb2005. Tu a mis dans la bonne cathègorie.
Pour ton problème, je pense qu'un "Imports System" est nessesaire. Et de bien ajouter la référence à ton projet.





__________
Kenji

cs_veler · Answer

Salut, C'est bon, j'ai compris l'erreur, c'étair juste que tu avais déclaré une variable qui s'appellait "TempPath" et qu'à la ligne du dessous, tu parlais de la variable nommé "CookiesPath". C'est juste une erreur d'étourderie, c'est pas grave, merci, mon problème est règlé.
Merci à tous

ebaudoux@club.fr
http://jbaudoux.club.fr/veler/

Nom de dossier

25 réponses

Votre réponse

Discussions similaires