Recuperation Path;Ext;Name__Help
Posté : mar. 30 janv. 2018 15:59
Bonjour Bonsoir,
Je suis à la recherche de mon erreur mais malheureusement je ne trouve pas (applaudis).
Bref, un simple programme pour automatiser plusieur install de soft / Lancement bench (le classique, salde tomate oignion).
La fonction pour la gestion de l’installation en elle même n'est pas un soucis, c'est de le lancer ! Je m'explique :
Rechercher dans un répertoire tout les fichier (OK), quelle type de fichier, Nom, voir l'emplacement (quoique..)é, puis utiliser ces information en conséquence. J'arrive bien à récupéré le nom des fichiers (_FileListToArray), puis récupéré l'extension (_PathSplit). Seulement je ne récupère l’extension que du premier fichier mais pas les autres.
Ce code est le seul bout qui est resté en vie (RageQuit)
Je ne sais pas si je suis au bon emplacement dans le forum
Je suis à la recherche de mon erreur mais malheureusement je ne trouve pas (applaudis).
Bref, un simple programme pour automatiser plusieur install de soft / Lancement bench (le classique, salde tomate oignion).
La fonction pour la gestion de l’installation en elle même n'est pas un soucis, c'est de le lancer ! Je m'explique :
Rechercher dans un répertoire tout les fichier (OK), quelle type de fichier, Nom, voir l'emplacement (quoique..)é, puis utiliser ces information en conséquence. J'arrive bien à récupéré le nom des fichiers (_FileListToArray), puis récupéré l'extension (_PathSplit). Seulement je ne récupère l’extension que du premier fichier mais pas les autres.
Ce code est le seul bout qui est resté en vie (RageQuit)
Code : Tout sélectionner
#include <_ZIP.au3>
#include <File.au3>
#include <Array.au3>
#include <StringConstants.au3>
#include <MsgBoxConstants.au3>
#include <String.au3>
Global $aVar, $avar2,$avar3
$aVar = "D:\Users\Thomas\Desktop\Install\0_Driver"
Func Decoupe_Dir (ByRef $aDir, ByRef $aName, ByRef $aExt)
Local $szDrive, $szDir, $aFName, $szExt,$fichier,$aTravail, $aTravail2, $i,$var
$aTravail =_FileListToArray($aDir, "*.*",1, True)
For $i = 1 To $aTravail[0]
$fichier = $aTravail[$i]
$var = _PathSplit($fichier,$szDrive, $szDir, $aFName, $szExt)
$aName= $aFName
$aDir = $szDir
$aExt = $szExt
Next
EndFunc
Decoupe_Dir($aVar, $avar2,$avar3)
Local $t
For $t = 1 To 9
MsgBox($MB_SYSTEMMODAL, "", $aVar2)
Next