JL35
Nombre de messages : 7112 Localisation : 77 Date d'inscription : 29/11/2007
| Sujet: Petite (toute petite) Sub: Dir Dim 7 Avr 2013 - 14:35 | |
| Une 'tite sub: liste des fichiers d'un répertoire, avec options. Le résultat est rendu dans le clipboard, à récupérer dans un Memo éventuellement caché, pour exploitation, exemple: - Code:
-
HEIGHT 0,900 Dir("C:\PANORAMIC\*.bas","/A:-D /B") MEMO 1: WIDTH 1,500: HEIGHT 1,850: FONT_NAME 1,"Lucida Console" CLIPBOARD_PASTE 1 END
SUB Dir(rep$, arg$) ' Liste des fichiers du répertoire rep$, options arg$, résultat -> CLIPBOARD ' Arguments optionnels: ' /A:D répertoires, /A:-D fichiers, /B format abrégé" ' /-C pas de séparateur de milliers, /-N fichiers à gauche (abrégés) ' /O: (tri) N tri alpha, E tri par extension, G répertoires en tête, ' S tri par taille, D tri par date croissante (-D date décroissante) ' /S y compris sous-répertoires, /X avec noms abrégés. EXECUTE_WAIT "CMD.exe /c DIR " + rep$ + " " + arg$ + " | clip" END_SUB Pour la liste complète des arguments de la fonction DIR, taper HELP dir en ligne de commande. | |
|