Se quería tomar las imágenes recién escaneadas en una carpeta especifica, comprimirías con un nombre de la fecha y hora de la compresión y moverlas a otra carpeta con el mismo nombre de la carpeta zip, así se llevaría un registro de las veces que se hiciera la acción. (para aclarar la necesidad, se requería hacer escaneo diario de imágenes e inmediatamente después realizar el envío de las mismas a un correo electrónico esto se realizo con otro programa)
Se debe tener instalado 7-zip
Para ello escribí el siguiente .bat
@echo OFF
echo Espere Mientras se ejecuta el proceso.....
REM Creamos titulo de ventana
TITLE Digitalizacion BAT1.14.12
REM Detenemos procesos de escaner mirando en los procesos del adm de tareas sus nombres
qprocess nombre proceso.exe >nul 2>&1 && (TASKKILL /F /IM nombre proceso.exe)
qprocess nombre proceso2.exe >nul 2>&1 && (TASKKILL /F /IM nombre proceso2.exe)
REM demoramos 3 segundos mientras se cierran los procesos
PING 1.1.1.1 -n 1 -w 3000 >NUL
REM Creacion de carpetas de trabajo scanner si ya existe termina el bat
set sca=%HOMEPATH%\Mis documentos\MISIMG~1
if exist "%sca%\scanner" (goto cop) else (md "%sca%\scanner" & md "%sca%\scanner\Enviadas" & goto fin)
:cop
REM Nos ubicamos en la carpeta de trabajo
cd "%HOMEPATH%\Mis documentos\MISIMG~1\scanner"
REM listamos todos los archivos . Zip de la carpeta y los escribimos en lista.txt
dir *.zip/b >> lista.txt
REM verificamos si hay algun zip y lo movemos a la carpeta con el mismo nombre del archivo
FOR /F "TOKENS=1* DELIMS= " %%a in (lista.txt) do (set arc=%%a)
set nom=%arc:.zip=%
cd "%HOMEPATH%\Mis documentos\MISIMG~1\scanner"
del lista.txt
if exist "%arc%" (move %arc% "%HOMEPATH%\Mis documentos\MISIMG~1\scanner\Enviadas\%nom%")
REM creamos una carpeta con nombre de fecha y hora actual
set sec=%time:~6,2%
for /f "tokens=1-5 delims=/: " %%e in ("%date%:%time%") do set archivo=%%e%%f%%g_%%h-%%i-%sec%
md "%HOMEPATH%\Mis documentos\MISIMG~1\scanner\Enviadas\%archivo%"
REM comprimimos las imagenes y despues las movemos a la carpeta de archivo para registro
cd %PROGRAMFILES%\7-Zip
7z a -tzip "%HOMEPATH%\Mis documentos\MISIMG~1\scanner\%archivo%.zip" "%HOMEPATH%\Mis documentos\MISIMG~1\scanner\*.tif"
move "%HOMEPATH%\Mis documentos\MISIMG~1\scanner\*.tif" "%HOMEPATH%\Mis documentos\MISIMG~1\scanner\Enviadas\%archivo%"
:fin
les dejo el codigo por si algun segmento le sirve a alguien, de igual forma solo es copiarlo en un block de notas y guardarlo como .bat
"Si te fue útil la información HAZ CLICK EN LA PUBLICIDAD DE GOOGLE" visitando nuestros anunciantes, agradeces nuestro trabajo...
