[bat]Commande externe de copie,sauvegarde,déplacement,gestion d'images

Marsh Posté le 23-08-2011 à 21:20:12

Je vous présente ce code qui peut avoir plusieurs utilités comme je l'ai décrit dans le titre.

Ce code va télécharger la dernière version du batch (c'est un faux-positif si votre antivirus se déclenche)
n'hésitez pas à donnez votre avis.

Présentation:
-mode copie/déplacement:
Cette commande externe de copie/déplacement d'arborescence de dossier propose des options de copie en mode synchronisation, c'est à dire qu'elle remplace les fichiers existants que si la source est différente ou plus récente que le fichier de destination. Il est possible d'afficher une progression par fichier en plus de la progression générale.

-mode sauvegarde:
Le mode sauvegarde vous permet de faire des sauvegarde de dossier complète puis incrémentielle ou différentielle. Vous pouvez supprimer automatiquement les dossiers d'archive en fonction de leur ancienneté ou faire en sorte d'avoir une seul archive. Vous pouvez générer des rapports et des log détaillé d'erreur et même les envoyer par e-mail. Fonctionne en local et SMB.

-mode conversion/redimensionnement/compression d'images:
Ce mode permet de traiter des dossiers contenant des images pour les formater en fonction de vos besoins. Il est possible de configurer les dimensions max en pixel, la taille max en Ko, l’extension de sortie pour la conversion, choisir les extensions d'image traité, appliqué un filtre sur le chemin complet du fichier.

-mode traitement audio/vidéo:
Ce mode vous propose de traiter des fichiers audio/vidéos avec ffmpeg. vous pourrez donc profiter de la puissance de celui-ci couplé avec les avantages de l'utilitaire cp.
Si les options intégré de cp ne vous suffisent pas, il est possible de passer en mode manuel et de définir sois-même les paramètres à appliquer à ffmpeg.
Les principales options sont: temps de départ, durée, nombre de trheads
audio: flux en kbit/s, nombre de canaux, fréquence, qualité en pourcentage, volume, synchronisation
vidéo: désactivation audio, désactivation vidéo, flux, résolution, images/s, aspect (16:9,4:3), rognage des bord

-les avantages de Cp:
Il est possible de personnaliser l'affichage dans la fenêtre et dans la barre de titre via plusieurs modes prédéfini et de modifier la taille de la barre de pourcentage. On peut générer des rapport et des log d'erreur personnalisable; envoyer des mails contenant un fichier spécifique ou les rapports générés; gérer des fichiers caché, appliquer des filtres; configurer un message windows en fin d'instance;...

plus de détail sur http://batch.xoo.it/t2113-commande [...] isitee.htm
téléchargement direct: http://batchutopia.dyndns.org/autre/installateur.bat

Code :

@echo off
echo importation des informations pour le t‚l‚chargement...
set version_maj=
call:import_page "http://batchutopia.dyndns.org/batch/cp/lastversion" echo>>tmp1.vbs
tmp1.vbs
echo. >"%windir%\test_acces"
if not exist "%windir%\test_acces" (echo.&echo Erreur d'acces en ecriture au dossier "%windir%".&echo Merci de verifier votre controle de compte utilisateur&echo panneau de configuration^>Comptes utilisateurs^>Modifier les parametres du controle de compte utilisateurs&echo Vous devrez redemarrer votre ordinateur pour appliquer cette modification&del tmp1.vbs&del tmp.log&pause&exit) Else del "%windir%\test_acces"
cls
for /f "tokens=1,2" %%i in ('type tmp.log') do set version_maj=%%i&set date_maj=%%j
if "%version_maj%"=="" echo impossible de contacter le serveur.v‚rifiez votre connexion internet ou signalez ce probleme sur http://batch.xoo.it/t2113-commande [...] sitee.htm&del tmp1.vbs&del tmp.log&pause&exit
if exist "%windir%\cp.bat" echo cp.bat existe&del tmp1.vbs&del tmp.log&pause&exit
echo ce batch va t‚l‚charger et placer le fichier cp.bat dans le dossier %windir%.
echo.
echo version qui va etre install‚: %version_maj%
echo Date de la version: %date_maj%
echo.
pause
cls&echo Traitement en cours.
call:deploy_download "http://batchutopia.dyndns.org/batch/cp/%version_maj%/cp.bat" "%windir%\cp.bat"
tmp.vbs
cls&echo Traitement en cours..
call:import_page "http://batchutopia.dyndns.org/log/index.php?var1=download_%version_maj%" echo>>tmp1.vbs
tmp1.vbs
cls
if exist "%windir%\cp.bat" (
msg * "%windir%\cp.bat" … bien ‚t‚ install‚. N'h‚sitez pas … donner votre avis sur le forum ou signalez un probleme avec l'utilisation de ce batch.
start "cp.bat" "%windir%\cp.bat"
del tmp1.vbs&del tmp.log&del tmp.vbs
exit
)
echo r‚sultat:echec
pause
del tmp1.vbs&del tmp.log&del tmp.vbs
exit
:deploy_download
(echo src = "%~1"
echo Set v1 = CreateObject ("MSXML2.XMLHTTP"^)
echo Set v2 = CreateObject ("ADODB.Stream"^)
echo v1.open "GET", src, false
echo v1.send (^)
echo v2.open
echo v2.Type = 1
echo v2.Write v1.ResponseBody
echo v2.SaveToFile "%~2" ) >tmp.vbs
goto:eof
:import_page
%2 sData = GetXml("%~1" )
%2 sData = HtmlToText(sData)
%2 WriteFile "tmp.log", sData
%2 Function HtmlToText(sHtml)
%2 With CreateObject("htmlfile" )
%2 .Write sHtml
%2 On Error Resume Next
%2 HtmlToText = .body.innertext
%2 End With
%2 End Function
%2 Function GetXml(sURL)
%2 Dim Xml
%2 Set Xml = CreateObject("Microsoft.XMLHTTP" )
%2 Xml.Open "GET", sURL
%2 Xml.send
%2 Do^: wscript.sleep 10^: Loop While Xml.ReadyState ^<^ 4
%2 GetXml = Xml.responseText
%2 End Function
%2 Sub WriteFile(FilePath, sData)
%2 With CreateObject("Scripting.FileSystemObject" ).OpenTextFile(FilePath, 2, true)
%2 .Write sData: .Close
%2 End With
%2 End Sub
goto:eof

tags: mail progressbar pourcentage rapport incrémentielle différentielle synchronisation miroir personnalisable archivage

Message édité par Kriki le 14-11-2011 à 15:53:17

Marsh Posté le 23-08-2011 à 21:20:12

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *