Pesquisar

17 de out de 2011

Conversor de .EXE para .BAT

@echo off
set cd2=%cd%
title Exe_To_Bat_Converter
setlocal enabledelayedexpansion
:init
set n=0
echo Arraste o .exe para este local e pressione enter!
set /p arquivo=
set arquivo=%arquivo:"=%
if exist "%arquivo%" goto main
msg * Arquivo não encontrado!
goto init
:main
call :name %arquivo%
cd %temp%
echo Aguarde...
tasklist|find "cmd">list
for /f "tokens=2" %%a in (list) do (
set /a n=!n!+1
)
dir /b /A:D *.tmp>pasta
cd %cd2%
start /min "" "%arquivo%"
taskkill -f -im "%result%"|find "ERRO"
if %errorlevel%==0 ( msg * Batch muito pequeno!&exit)
tasklist|find "cmd">list
for /f "tokens=2 skip=%n% " %%a in (list) do (
taskkill /pid %%a -f >nul
)
cd %temp%
:verificar
for /f "tokens=* " %%a in ('dir /b /A:D *.tmp') do (
call :ver %%a
)
msg.exe * Ocorreu um erro. Aguarde...
goto verificar
:sair
msg.exe * Processo concluido.
cd %cd2%
del list
exit
:name
set nome=%*
set result=%nome:~-1%%result%
set nome=%nome:~,-1%
if not "%nome:~-1%"=="\" call :name %nome%
goto fim
:ver
set a=%*
find "%a%" pasta>nul
if %errorlevel%==1 (cd %a%&copy /-y * "%cd2%"&goto sair)
:fim

Nenhum comentário:

Postar um comentário