Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[R] Lister le contenu d'un dossier
Auteur Message
Répondre en citant
Message [R] Lister le contenu d'un dossier 
Bonjour

aller une petite question pour faire vivre cette section.

Je souhaiterai lister le contenu d'un dossier uniquement les répertoires trouvés en exluant un dossier nommé TEMP, et que cela s'affiche dans une listebox.

Comment faire ?

Laddy



Dernière édition par Laddy le Jeu 25 Nov 2010 - 14:37; édité 1 fois

______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message [R] Lister le contenu d'un dossier 
Salut,

Pas facile, j'ai encore jamais approfondi FileListToArray3.au3 ...

Ça dépends de comment tu veux afficher l'array, mais tu ne pourrais pas vérifier le nom du dossier à chaque affichage ?

Je vais voir ça, mais je ne promets rien Mr. Green

A+




______________________________________________________
Répondre en citant
Message [R] Lister le contenu d'un dossier 
Coucou
en fait j'ai avancé depuis le message, parce que j'esperai pas une réponse de quelqu'un sur autoit fr.

Maintenant j essaie de récupérer le nom du dossier dans la listebox.

Plateforme de Dev : XP PRO

Code:

;Merci zeshrek pour ton aide.
#include <File.au3>
#include <GUIConstants.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <FileListToArray3.au3>
#include <GUIListBox.au3>


;Gui
Local $sItems, $aItems
Global $Form1 = GUICreate("Créer un dossier", 345, 218, 192, 124)
Global $ListFolder = GUICtrlCreateList("", 168, 48, 169, 73)
Global $Create = GUICtrlCreateButton("Go", 144, 168, 97, 33, $WS_GROUP)
Global $Start = GUICtrlCreateButton("Demarrer", 8, 56, 145, 33, $WS_GROUP)
GUISetState(@SW_SHOW)


;affichage du contenu du dossier ItAuto exclusion du Dossier TEMP dans la listebox
$ar_Array = _FileListToArray3 (@ScriptDir &"\ItAuto\", "*.*", 2, 0, 0,"TEMP")
GUICtrlSetData($ListFolder,  _ArrayToString($ar_Array, "|", 1), $ar_Array[1])

Do
 $Msg = GUIGetMsg()
 Switch $Msg
    Case $Create
            CreateFolder()
      Case $Start
Start()
 EndSwitch
Until $Msg = $GUI_EVENT_CLOSE


Func Start()
$Dossier = GUICtrlRead ($ListFolder)
   MsgBox(4160, "Information", $Dossier)
EndFunc

;fonction pour créer mon dossier avec un GUI INPUT
Func CreateFolder()
Global $Form2 = GUICreate("Nom Dossier", 220, 147, 192, 124)
Global $UserName = GUICtrlCreateInput("", 8, 48, 201, 21)
Global $Create = GUICtrlCreateButton("Créer", 136, 96, 73, 25, $WS_GROUP)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
GUISetState(@SW_SHOW)

Do
 $Msg = GUIGetMsg()
 Switch $Msg
    Case $Create
        $RandomLettre = RandomLettre("a","z", 9)
        $InstallDir = @ScriptDir &"\ItAuto\"&$RandomLettre & "."&GUICtrlRead($UserName)
        DirCreate($InstallDir)
        EndSwitch
Until $Msg = $GUI_EVENT_CLOSE
EndFunc


;fonction pour créer un ramdom aléatoire de 9 lettres alphabétiques. $RandomLettre = RandomLettre("a","z", 9)
Func RandomLettre($strMin = "a", $strMax = "z", $szNb = 1)
    Local $i, $Char
    For $i = 1 to $szNb
        $Char &= Chr(Random (Asc($strMin), Asc($strMax), 1))
    Next
  Return $Char
EndFunc



Code:
Func Start()
$Dossier = GUICtrlRead ($ListFolder)
   MsgBox(4160, "Information", $Dossier)

EndFunc




Dernière édition par Laddy le Jeu 25 Nov 2010 - 14:41; édité 1 fois

______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message [R] Lister le contenu d'un dossier 
Résolu. Code mis à jour




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Message [R] Lister le contenu d'un dossier 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch