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

Commande externe de copie,sauvegarde,déplacement,gestion d'images [bat] - Shell/Batch - Programmation

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;...
 
http://img75.xooimage.com/files/7/1/b/screen-2ab35a9.png
 
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 :
  1. @echo off
  2. echo importation des informations pour le t‚l‚chargement...
  3. set version_maj=
  4. call:import_page "http://batchutopia.dyndns.org/batch/cp/lastversion" echo>>tmp1.vbs
  5. tmp1.vbs
  6. echo. >"%windir%\test_acces"
  7. 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"
  8. cls
  9. for /f "tokens=1,2" %%i in ('type tmp.log') do set version_maj=%%i&set date_maj=%%j
  10. 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
  11. if exist "%windir%\cp.bat" echo cp.bat existe&del tmp1.vbs&del tmp.log&pause&exit
  12. echo ce batch va t‚l‚charger et placer le fichier cp.bat dans le dossier %windir%.
  13. echo.
  14. echo version qui va etre install‚: %version_maj%
  15. echo Date de la version: %date_maj%
  16. echo.
  17. pause
  18. cls&echo Traitement en cours.
  19. call:deploy_download "http://batchutopia.dyndns.org/batch/cp/%version_maj%/cp.bat" "%windir%\cp.bat"
  20. tmp.vbs
  21. cls&echo Traitement en cours..
  22. call:import_page "http://batchutopia.dyndns.org/log/index.php?var1=download_%version_maj%" echo>>tmp1.vbs
  23. tmp1.vbs
  24. cls
  25. if exist "%windir%\cp.bat" (
  26. 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.
  27. start "cp.bat" "%windir%\cp.bat"
  28. del tmp1.vbs&del tmp.log&del tmp.vbs
  29. exit
  30. )
  31. echo r‚sultat:echec
  32. pause
  33. del tmp1.vbs&del tmp.log&del tmp.vbs
  34. exit
  35. :deploy_download
  36. (echo src = "%~1"
  37. echo Set v1 = CreateObject ("MSXML2.XMLHTTP"^)
  38. echo Set v2  = CreateObject ("ADODB.Stream"^)
  39. echo v1.open "GET", src, false
  40. echo v1.send (^)
  41. echo v2.open
  42. echo v2.Type = 1
  43. echo v2.Write v1.ResponseBody
  44. echo v2.SaveToFile "%~2" ) >tmp.vbs
  45. goto:eof
  46. :import_page
  47. %2 sData = GetXml("%~1" )
  48. %2 sData = HtmlToText(sData)
  49. %2 WriteFile "tmp.log", sData
  50. %2 Function HtmlToText(sHtml)
  51. %2 With CreateObject("htmlfile" )
  52. %2 .Write sHtml
  53. %2 On Error Resume Next
  54. %2 HtmlToText = .body.innertext
  55. %2 End With
  56. %2 End Function
  57. %2 Function GetXml(sURL)
  58. %2 Dim Xml
  59. %2 Set Xml = CreateObject("Microsoft.XMLHTTP" )
  60. %2 Xml.Open "GET", sURL
  61. %2 Xml.send
  62. %2 Do^: wscript.sleep 10^: Loop While Xml.ReadyState ^<^ 4
  63. %2 GetXml = Xml.responseText
  64. %2 End Function
  65. %2 Sub WriteFile(FilePath, sData)
  66. %2 With CreateObject("Scripting.FileSystemObject" ).OpenTextFile(FilePath, 2, true)
  67. %2 .Write sData: .Close
  68. %2 End With
  69. %2 End Sub
  70. 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
Reply

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

Reply

Sujets relatifs:

Leave a Replay

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