Bonjour,
je m'arrache les cheveux sur un truc bizarre...j'ai fait un programme autoit qui va rechercher des fichiers PDF sur un lecteur reseau et qui les copie sur le lecteur local.
Lorsque je clique sur mon programme il fait le boulot sans soucis. Donc j'en déduis que mon programme marche bien.
je fais une tache planifiée pour que cette copie de fichiers se fasse chaque matin a 8h00.
Ben là ca ne fonctionne pas...quand j’exécute manuellement la tache planifiée il ne se passe absolument rien...
J'ai fait un fichier .bat dans lequel je crée un fichier .log qui inscrit l'heure/minute/seconde avant exécution du programme et idem après exécution. Et bien le log se crée bien et me donne une heure/minute/seconde de début et de fin identique...donc l'appli s'est bien lancée et s'est fermée immédiatement ???
je ne sais plus dans quel sens chercher, côté programme ou tache planifiée ? si quelqu'un a eu le meme soucis une fois ou s'il pouvait m'orienter....Merci !
voici mon code a tout hasard...je décompose ce qu'il fait:
on ouvre un fichier excel dans lequel il y a 2 colonnes remplies.
la 1ere contient un nom de fichier PDF, la seconde une date sous la forme 20130101.
je vais récuperer le fichier PDF a son emplacement et le copie en local dans un dossier c:\recupbl\bl\<annee>\<mois>\<nom fichier>
► Afficher le texte
Code : Tout sélectionner
#include <WindowsConstants.au3>
#include <Excel.au3>
global $dir_in ; Emplacement des fichiers a récupérer
global $dir_out ; Emplacement destination
global $end_message ; Message de fin
global $liste_bl ; fichier excel liste des BL
global $arr[10000] ; espace réservé à la lecture de la colonne excel des BL
global $date[10000] ; espace réservé à la lecture de la colonne excel des dates de confirmation
$fichierini = @ScriptDir & "\recupbl.ini"
iniinfo($fichierini)
$oExcel = _ExcelBookOpen($liste_bl,0) ; On ouvre le fichier Excel
_ExcelSheetActivate($oExcel, "Feuil1") ; on se positionne sur la feuille Excel
; Lecture du fichier Excel et chargement des variables array
$i = 2
While 1
$arr[$i]= $oExcel.Activesheet.Cells($i,1).Value ; N° BL
$date[$i]= $oExcel.Activesheet.Cells($i,2).Value ; Date
$date[$i] = StringLeft($date[$i],4) & "\" & StringRight(StringLeft($date[$i],6),2) ; on reconstitue la date sous la forme 2013/01
if $arr[$i] ="" then ExitLoop ; Si la cellule est vide on sort de la boucle
$i = $i+1
WEnd
;$lignes = $i ;combien de fichiers PDF il y a dans la colonne
_ExcelBookClose($oExcel) ; On ferme Excel
;ProcessClose("EXCEL.EXE")
$i = 2
While 1
if $arr[$i] ="" then ExitLoop ; Si la cellule est vide on sort de la boucle
FileCopy ($dir_in & "*" & $arr[$i] & "*.pdf", $dir_out & $date[$i] & "\" & $arr[$i] & ".pdf",9)
$i = $i+1
WEnd
FUNC INIINFO($file)
$dir_in = IniRead($file, "folders", "input", "\\Daticeva\bolle\FILED\")
$dir_out = IniRead($file, "folders", "output", "C:\recupbl\BL\")
$liste_bl = IniRead($file, "folders", "liste_bl", "C:\recupbl\BLs_Recup.xls")
$end_message = IniRead($file, "messages", "end", "écupération terminée !")
EndFunc
