Connexion
Qui est en ligne ?
Il y a en tout 1 utilisateur en ligne :: 0 Enregistré, 0 Invisible et 1 Invité Aucun
Le record du nombre d'utilisateurs en ligne est de 76 le Ven 22 Nov 2024, 12:39
Sujets les plus vus
Derniers sujets
[BAT] Compresseur d'archive avec iexpress
2 participants
Page 1 sur 1
[BAT] Compresseur d'archive avec iexpress
- Code:
@echo off
mode con cols=80 lines=11 &color 0A
::Esquema para pegar caracteres especiais
chcp 1252>nul
:: 0123456789................................42
set "chars=áàâãéèêîíìóòôõúùûäëïöüçÁÀÂÃÉÈÍÌÎÕÔÚÙÛÄËÏÖÜÇ"
chcp 850>nul
for /f "tokens=* delims=*" %%a in ("%chars%") do (set "a=%%a")
::fim do esquema.
:: Visitem o fórum http://batch-satti.forumeiros.com/
If not exist %systemroot%\system32\iexpress.exe (
color 0c
title ERRO: O arquivo [%systemroot%\system32\iexpress.exe] nÆo foi encontrado...
echo.
echo.
echo Ele %a:~4,1% necess%a:~1,1%rio para esse servi%a:~22,1%o
echo.
echo Pressione uma tecla para sair...
pause>nul
exit
)
echo off
cls
title Inicializa%a:~22,1%%a:~3,1%o...
If not exist %systemroot%\system32\iexpress.exe Exit
if "%~1"=="" (
title Como usar %~nx0
echo.
echo Basta arrastar e soltar seu arquivo sobre o %a:~8,1%cone do %~nx0...
echo para gerar executave%a:~8,1%s comprenssados.
echo.
ECHO. OU
ECHO.
ECHO.
goto skip
)
goto geraexe
:skip
SET /P ARQ= Arraste e solte o arquivo aqui ^> :
call :geraexe %ARQ%
exit
:geraexe
cd /d "%~DP1"
:init
set install=%random%.bat
set Arqsed=%random%.sed
if exist %Arqsed% goto init
title Criando o %~n1_setup.exe...
(
echo [Version]
echo Class=IEXPRESS
echo SEDVersion=^3
echo [Options]
echo PackagePurpose=InstallApp
echo ShowInstallProgramWindow=^0
echo HideExtractAnimation=^0
echo UseLongFileName=^0
echo InsideCompressed=^0
echo CAB_FixedSize=^0
echo CAB_ResvCodeSigning=^0
echo RebootMode=N
echo InstallPrompt=%%InstallPrompt%%
echo DisplayLicense=%%DisplayLicense%%
echo FinishMessage=%%FinishMessage%%
echo TargetName=%%TargetName%%
echo FriendlyName=%%FriendlyName%%
echo AppLaunched=%%AppLaunched%%
echo PostInstallCmd=%%PostInstallCmd%%
echo AdminQuietInstCmd=%%AdminQuietInstCmd%%
echo UserQuietInstCmd=%%UserQuietInstCmd%%
echo SourceFiles=SourceFiles
echo [Strings]
echo InstallPrompt=
echo DisplayLicense=
echo FinishMessage=
echo TargetName="%~dpn1_setup.exe"
echo FriendlyName=
echo AppLaunched="%~nx1"
echo PostInstallCmd=^<None^>
echo AdminQuietInstCmd=
echo UserQuietInstCmd=
echo FILE0="%~nx1"
echo [SourceFiles]
echo SourceFiles0="%~dp1"
echo [SourceFiles0]
echo %%FILE0%%=
)>%Arqsed%
iexpress /N /Q %Arqsed%
del /f /q "%Arqsed%"
msg * "Arquivo compactado com sucesso!"
exit
Hackoo- EQUIPE BBAT
- Mensagens : 135
Data de inscrição : 06/06/2013
Localização : Tunisie
Sujets similaires
» [BAT] SAVOIR SON AGE AVEC SA DATE DE NAISSANCE
» Batch avec mot de passe ***
» [BAT] Batch avec onClosequery
» De retour avec un nouveau projet !
» [developpez.com] Script avec PDF créator
» Batch avec mot de passe ***
» [BAT] Batch avec onClosequery
» De retour avec un nouveau projet !
» [developpez.com] Script avec PDF créator
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
Ven 25 Déc 2015, 14:17 par Sachadee
» [devellopez] Formater une date en ligne Dos
Ven 31 Juil 2015, 10:40 par Dylan Gadacha
» Un super Tuto Batch de IniTScreen
Lun 08 Juin 2015, 12:16 par InitScreen
» Un code MATRIX sympa
Dim 12 Avr 2015, 14:27 par Sachadee
» [BAT/EXE] DresolChange changer la sesolution de l´écran
Mar 17 Mar 2015, 09:12 par Sachadee
» [EXE/bat] DpScript Código Delphi interpreter
Jeu 12 Mar 2015, 15:48 par Sachadee
» Externo SaveDlg com 2 kb
Dim 15 Fév 2015, 12:20 par Sachadee
» présentation
Dim 15 Fév 2015, 12:14 par Sachadee
» [developpez.com] Transcodage fichier vidéo si fichier déposé
Mar 03 Fév 2015, 01:02 par Sachadee