97 lines
2.4 KiB
Batchfile
97 lines
2.4 KiB
Batchfile
@echo off
|
||
|
||
:Loop
|
||
IF "%1"=="" GOTO Continue
|
||
IF "%1"=="--help" GOTO help
|
||
SHIFT
|
||
GOTO Loop
|
||
|
||
:help
|
||
echo Aide:
|
||
echo 1. Sur le serveur de maintenace Mistral, faire une requete SQL:
|
||
echo dialogue_tvt '18/09/18','19/09/18','snpi'
|
||
echo.
|
||
echo 2. Copier /coller le resultat dans le Bloc Note et creer un nouveau fichier.
|
||
echo Important: Sauver le fichier sur la cle IHM1 avec un nom commencant par AD (ex AD_09-10_09_2018.txt)
|
||
echo.
|
||
echo 3. Inserer la cle IHM1 sur un poste connecte au reseau et double-cliquer sur accordDepart4.bat
|
||
echo Le script recherche et propose le fichier commencant par AD le plus recent.
|
||
echo Si c'est le bon fichier, taper O
|
||
echo Sinon, taper N. Entrer le nom du fichier en vous aidant de la touche Tab
|
||
echo.
|
||
echo 4. Un nouveau fichier est cree et joint en PJ a Outlook dans un nouveau message.
|
||
echo Dans Outlook, cliquer sur Envoyer.
|
||
echo.
|
||
Echo 5. Retourner sur le script, appuyer sur une touche pour quitter le script et effacer le fichier.
|
||
echo.
|
||
exit /b 15
|
||
:Continue
|
||
|
||
echo.
|
||
echo *** Recherche des accords de depart ***
|
||
echo.
|
||
|
||
echo On recherche un fichier AD*.txt ...
|
||
|
||
REM le script recherche le fichier commencant par AD le plus recent.)
|
||
set FILENAME=AD*.txt
|
||
set FILEPATH=
|
||
|
||
FOR /F %%f in ('dir /O:D /S /B %FILENAME%') do (
|
||
set FILEPATH=%%f
|
||
)
|
||
|
||
REM si aucun fichier n'a ete trouve, on le rentre manuellement.
|
||
IF NOT "%FILEPATH%"=="" (
|
||
CHOICE /C ON /D O /T 5 /M "%FILEPATH% : est-ce le bon fichier ?"
|
||
IF errorlevel 2 goto non
|
||
IF errorlevel 1 goto oui
|
||
)
|
||
|
||
:non
|
||
echo.
|
||
echo Taper le nom du fichier archive SNPI... (Tab)
|
||
set /P FILEPATH=
|
||
set FILEPATH=%CD%%FILEPATH%
|
||
echo.
|
||
|
||
:oui
|
||
echo.
|
||
|
||
IF EXIST "%FILEPATH%" (
|
||
goto find
|
||
) ELSE (
|
||
goto fin
|
||
)
|
||
|
||
echo.
|
||
|
||
:find
|
||
echo %FILEPATH%
|
||
|
||
set import=%FILEPATH%
|
||
set export=%FILEPATH:AD=AccordDepart%
|
||
|
||
REM on recherche la chaine "AccorderDepart"
|
||
find "AccorderDepart" "%import%" > "%export%"
|
||
|
||
REM et on sauvegarde le resultat sur le bureau.
|
||
echo.
|
||
echo Un fichier %export% a ete cree sur le bureau...
|
||
|
||
REM on ouvre le resultat dans le Bloc Note. (option)
|
||
echo.
|
||
start "realmd" "%export%"
|
||
|
||
REM on prepare le mail avec sa PJ
|
||
"c:\Program Files\Microsoft Office\Office14\OUTLOOK.EXE" /c ipm.note /m "mailto:seb.huet@reseau.sncf.fr?subject=[Accord de depart IHM1]&body=Bonjour, " /a "%export%"
|
||
|
||
REM reste <20> cliquer sur envoyer
|
||
|
||
Echo Dans Outlook, cliquer sur Envoyer !!!
|
||
PAUSE >nul
|
||
DEL %export%
|
||
|
||
:fin
|
||
Echo Aucun fichier n'a pas ete trouve.
|