Script de recherche et d'effacement

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Script de recherche et d'effacement

bloodyspike

Bonjour, j'ai commencé un script mais il ne marque pas du tout et est loin d'etre fini et j'aimerais un petit coup de main.
Donc le script, recherche le dossier nommée "QQ" logiquement dans "C:\Program Files\Tencent". Jusque ici tout va bien mais la arrive mon problème, je dois y lister les dossier contenant que des nombres (ID de compte) et les mettre en format de liste (avec des choix dessus si possible) puis rechercher 4 sous dossier et y effacer les images.
Voice ce que j'ai fait mais je n'arrive pas a lister uniquement les dossier contenant que des chiffres, ni a effacer les images alors que les commandes me paressent bonnes.
Merci pour votre aide.

Code :

IF EXIST "C:\Program Files\Tencent\QQ" (set QQdir=c:\Program Files\Tencent\QQ)
dir "%QQdir%" /A:D
set /p num=What QQ number do you want to clean ?
echo dossier:%QQdir%
echo qq:%num%
if exist "%QQdir%\%num%\UserHead" for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%QQdir%\%num%\UserHead\%%a"
echo "Icone User cleaned"
if exist "%QQdir%\%num%\CustomFaceRecv" for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%QQdir%\%num%\CustomFaceRecv\%%a"
echo "Custom Icone User Received Cleaned"
if exist "%QQdir%\%num%\Image" for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%QQdir%\%num%\Image\%%a"
echo "Temp Emotes Received Cleaned"
if exist "%QQdir%\%num%\QQphoto" for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%QQdir%\%num%\QQphoto\%%a"
echo "Temp QQ Photos Cleaned"
if exist "%QQdir%\%num%\QQSpaceFile" for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%QQdir%\%num%\QQSpaceFile\%%a"
echo "Temp Files QQSpace Cleaned"
pause

Publicité

blastkiller

Code :

@echo off
IF EXIST "C:\Program Files\Tencent\QQ" (cd "C:\Program Files\Tencent\QQ" ) else (goto erreur)
echo Liste des dossiers :
dir /B /A:D
set /p num=What QQ number do you want to clean ?
echo dossier:%cd%
echo qq:%num%
if exist UserHead cd UserHead
for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%%a"
echo "Icone User cleaned"
cd..
if exist CustomFaceRecv CustomFaceRecv
for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%%a"
echo "Custom Icone User Received Cleaned"
cd..
if exist Image cd Image
for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%%a"
echo "Temp Emotes Received Cleaned"
cd..
if exist QQphoto cd QQphoto
for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%%a"
echo "Temp QQ Photos Cleaned"
cd..
if exist QQSpaceFile cd QQSpaceFile
for %%a in (*.jpg,*.gif,*.png,*.bmp) do del "%%a"
echo "Temp Files QQSpace Cleaned"
pause
exit
:erreur
echo Le dossier QQ n'existe pas !
pause

Message édité par blastkiller le 07-06-2008 à 01:01:48

bloodyspike

Marche pas vraiment ! lol
Mon image de test "Nouveau Image bitmap.bmp" dans "C:\Program Files\Tencent\QQ\858414119\QQPhoto" n'est pas effacée.
J'avais mis des variables pour pas avoir a retourner a l'endroit du script entre chaque lancement par ligne de commande mais cela n'est pas trop important.

Le bug viens que si le dossier existe pas il fait quand meme le "cd.. " mais cela ne doit pas etre le seul !

Message édité par bloodyspike le 07-06-2008 à 10:03:27

blastkiller

Désolé j'avais codé ça rapidement :

Code :

@echo off
IF EXIST "C:\Program Files\Tencent\QQ" (cd "C:\Program Files\Tencent\QQ" ) else (goto erreur)
echo Liste des dossiers :
dir /B /A:D
set /p num=What QQ number do you want to clean ?
echo dossier:%cd%
echo qq:%num%
cd %num%
if exist UserHead (
cd UserHead
del *.jpg *.gif *.png *.bmp
echo "Icone User cleaned"
cd..
)
if exist CustomFaceRecv (
cd CustomFaceRecv
del *.jpg *.gif *.png *.bmp
echo "Custom Icone User Received Cleaned"
cd..
)
if exist Image (
cd Image
del *.jpg *.gif *.png *.bmp
echo "Temp Emotes Received Cleaned"
cd..
)
if exist QQphoto (
cd QQphoto
del *.jpg *.gif *.png *.bmp
echo "Temp QQ Photos Cleaned"
cd..
)
if exist QQSpaceFile (
cd QQSpaceFile
del *.jpg *.gif *.png *.bmp
echo "Temp Files QQSpace Cleaned"
)
pause
exit
:erreur
echo Le dossier QQ n'existe pas !
pause

bloodyspike

Génial, sinon on peut lister juste les dossiers de conternant que des chiffre et en faire une liste qui demande un choix (1,2,3...) ?

blastkiller

Code :

for /f "delims=" %%a in ('dir /b /a:d') do call cmd "%%a"
pause
exit
:cmd
set folder=%~1
set test=%folder:~0,1%
for /l %%b in (0,1,9) do (
if %test% EQU %%b echo %folder%
)

J'te laisse l'intégrer dans ton code ...

J'ai pas compris ce que tu veux à propos de la liste ?

bloodyspike

Bon j'ai retouché en ajoutant les <deux points> devant check (nommé cmd dans ton script) car la commande ne faisait rien...
Mais deja plus apres mes modif, donc je me suis dit que tu as du te tromper.
J'ai toujours un problème, ayant mis la commande de comparaison avant le :error (nomé :erreur dans ton script)
il me lance le message d'erreur entre chaque teste de dossier.
Donc je l'ai mis avant mais la il ne me fait pas de boucle et apres un test sur le premier dossier, il lance la suite du script.
Il doit manquer de parentheses ou un goto quelque part.

De plus les dossiers contenant des chiffres et des lettres sont aussi affiché...
Voila ce que ca donne dans ma version retouchée :

Code :

if exist "%HOMEDRIVE%\Program Files\Tencent\QQ" (cd "%HOMEDRIVE%\Program Files\Tencent\QQ" ) else (goto error)
echo Directory List :
for /f "delims=" %%a in ('dir /b /a:d') do call :check "%%a"
pause
exit
:check
set folder=%~1
set test=%folder:~0,1%
for /l %%b in (0,1,9) do (if %test% EQU %%b echo %folder%)
set /p num=What QQ number do you want to clean ?
echo dossier:%cd%
echo qq:%num%
cd %num%
if exist UserHead (
cd UserHead
del *.jpg *.gif *.png *.bmp
echo "Icone User cleaned"
cd..
)
if exist CustomFaceRecv (
cd CustomFaceRecv
del *.jpg *.gif *.png *.bmp
echo "Custom Icone User Received Cleaned"
cd..
)
if exist Image (
cd Image
del *.jpg *.gif *.png *.bmp
echo "Temp Emotes Received Cleaned"
cd..
)
if exist QQphoto (
cd QQphoto
del *.jpg *.gif *.png *.bmp
echo "Temp QQ Photos Cleaned"
cd..
)
if exist QQSpaceFile (
cd QQSpaceFile
del *.jpg *.gif *.png *.bmp
echo "Temp Files QQSpace Cleaned"
)
pause
exit
:error
echo Le dossier QQ n'existe pas sur la lettre %HOMEDRIVE% !
pause
exit

Et la les logs :

Citation :

C:\Documents and Settings\Julien\Bureau\QQcleaner>if exist "C:\Program Files\Ten
cent\QQ" (cd "C:\Program Files\Tencent\QQ" ) else (goto error )

C:\Program Files\Tencent\QQ>echo Directory List :
Directory List :

C:\Program Files\Tencent\QQ>for /F "delims=" %a in ('dir /b /a:d') do call :chec
k "%a"

C:\Program Files\Tencent\QQ>call :check "3DShow"

C:\Program Files\Tencent\QQ>set folder=3DShow

C:\Program Files\Tencent\QQ>set test=3

C:\Program Files\Tencent\QQ>for /L %b in (0 1 9) do (if 3 EQU %b echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 0 echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 1 echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 2 echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 3 echo 3DShow )
3DShow

C:\Program Files\Tencent\QQ>(if 3 EQU 4 echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 5 echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 6 echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 7 echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 8 echo 3DShow )

C:\Program Files\Tencent\QQ>(if 3 EQU 9 echo 3DShow )

C:\Program Files\Tencent\QQ>set /p num=What QQ number do you want to clean ?
What QQ number do you want to clean ?

Sinon, je veux remplacer le nom a taper par un chiffre, en tapant 1 pour le 1er, 2 pour le 2eme, etc.
Autre option, il va faloir que le script cherche le dossier QQ qui peut etre sous un autre disque...
(mon test sur une personne l'avait sous "D:" ) mais je ne sais pas si il faut mieux cherche sur tous le PC
pour juste utiliser %%HOMEDRIVE%% :cry:

Mais bon on va deja faire marcher le listing des bon dossier avant ! lol
Tu va en avoir marre à la fin je crois !

Sinon voila les logs en mettant cmd,
car je pense que tu voulais ouvrir une nouvelle fenetre de commande
pour faire les test mais chez moi il n'y a rien qui se fait :

Citation :

Message édité par bloodyspike le 09-06-2008 à 11:05:52

blastkiller

"Sinon, je veux remplacer le nom a taper par un chiffre, en tapant 1 pour le 1er, 2 pour le 2eme, etc."
J'comprend pas ça, on a pas de nom à taper dans ce script...
Sinon excuse moi pour mes erreurs, j'ai perdu la patience de bien coder, sa fait longtemps... :x

On peut pas vérifier qu'un dossier est composé uniquement de chiffre, enfin si, on peut, mais c'est plus simple de vérifier que le premier et le dernier caractère du nom de dossier est un chiffre, c'est ce que fait :check

Normalement sa devrait mieux marcher là :

Code :

@echo off
set programfiles=%commonprogramfiles:~0,16%
if exist "%programfiles%\Tencent\QQ" (cd "%programfiles%\Tencent\QQ" ) else (goto error)
echo Directory List :
for /f "delims=" %%a in ('dir /b /a:d') do call :check "%%a"
echo.
set /p num=What QQ number do you want to clean ?
echo dossier:%cd%
echo qq:%num%
cd %num%
if exist UserHead (
cd UserHead
del *.jpg *.gif *.png *.bmp
echo "Icone User cleaned"
cd..
)
if exist CustomFaceRecv (
cd CustomFaceRecv
del *.jpg *.gif *.png *.bmp
echo "Custom Icone User Received Cleaned"
cd..
)
if exist Image (
cd Image
del *.jpg *.gif *.png *.bmp
echo "Temp Emotes Received Cleaned"
cd..
)
if exist QQphoto (
cd QQphoto
del *.jpg *.gif *.png *.bmp
echo "Temp QQ Photos Cleaned"
cd..
)
if exist QQSpaceFile (
cd QQSpaceFile
del *.jpg *.gif *.png *.bmp
echo "Temp Files QQSpace Cleaned"
)
pause
exit
:error
echo Le dossier QQ n'existe pas !
pause
exit
:check
set acc=0
set folder=%~1
set test=%folder:~0,1%
for /l %%b in (0,1,9) do (if %test% EQU %%b set /a acc+=1)
set test=%folder:~-1%
for /l %%b in (0,1,9) do (if %test% EQU %%b set /a acc+=1)
if %acc% EQU 2 echo %folder%
goto :eof

Message édité par blastkiller le 09-06-2008 à 13:32:48

bloodyspike

J'en etait la :

Code :

@echo off
echo.
echo -------
echo.
echo -= Welcome to the QQ temporary files cleaner =-
echo.
echo Double left click on the QQ number you want to clean to high light it.
echo Then right clic twice anywhere in the black background of the window.
echo Once to copy it and once to paste it.
echo.
echo --------
echo.
pause
if exist "%HOMEDRIVE%\Program Files\Tencent\QQ" (cd "%HOMEDRIVE%\Program Files\Tencent\QQ" ) else (goto error)
echo.
echo Directory List :
echo.
for /f "delims=" %%a in ('dir /b /a:d') do call :check "%%a"
echo.
set /p num=What QQ number do you want to clean ?
echo dossier:%cd%
echo qq:%num%
cd %num%
if exist UserHead (
cd UserHead
del *.jpg *.gif *.png *.bmp
echo "Icone User cleaned"
cd..
)
if exist CustomFaceRecv (
cd CustomFaceRecv
del *.jpg *.gif *.png *.bmp
echo "Custom Icone User Received Cleaned"
cd..
)
if exist Image (
cd Image
del *.jpg *.gif *.png *.bmp
echo "Temp Emotes Received Cleaned"
cd..
)
if exist QQphoto (
cd QQphoto
del *.jpg *.gif *.png *.bmp
echo "Temp QQ Photos Cleaned"
cd..
)
if exist QQSpaceFile (
cd QQSpaceFile
del *.jpg *.gif *.png *.bmp
echo "Temp Files QQSpace Cleaned"
cd..
)
if exist Temp (
cd Temp
del *.jpg *.gif *.png *.bmp
echo "Temp Files Cleaned"
cd..
)
if exist SCreen (
cd SCreen
del *.jpg *.gif *.png *.bmp
echo "Temp Sent Images Cleaned"
cd..
)
pause
exit
:error
echo Le dossier QQ n'existe pas sur la lettre %HOMEDRIVE% !
pause
exit
:check
set folder=%~1
set test=%folder:~0,1%
for /l %%b in (0,1,9) do (if %test% EQU %%b goto :check2)
:check2
set test1=%folder:~1,1%
for /l %%b in (0,1,9) do (if %test1% EQU %%b echo %folder%)

Je cherchais comment regrouper les 2 check avec un "et" ! :pt1cable:
Donc, j'ai mis ta facon du 1 + 1 = 2 ! Qui est pas bete du tout en fait !
Merci du coup de main.

Dernier petit truc, vu que c'est pour un public de debutant,
comme je l'ai dis avant, je voulais au lieu de recopier le numero nous meme,
remplacer le choix par un chiffre à taper et avoir un affichage de ce genre :

Citation :

Directory List :

1. 64676746746
2. 354646444
3. 54546464

Enter the number of the account you want to clean :

Et la il tape juste "1" au lieu d'ecrire "64676746746"

Message édité par bloodyspike le 09-06-2008 à 13:45:17

blastkiller

Alors le script marche là c'est bon ?

Publicité

bloodyspike

Oué tres bien ! hehe
A par que pour des personnes pas douée en informatique, ce n'est pas tres explicite ! lol

blastkiller

Code :

@echo off
set config=0
set accfol=0
for /f "delims=" %%a in ('dir /b /a:d') do call :check "%%a"
set /p num= What else ?
set accfol=0
set config=1
for /f "delims=" %%d in ('dir /b /a:d') do call :check "%%d"
pause
exit
:check
set acc=0
set folder=%~1
set test=%folder:~0,1%
for /l %%b in (0,1,9) do (if %test% EQU %%b set /a acc+=1)
set test=%folder:~-1%
for /l %%b in (0,1,9) do (if %test% EQU %%b set /a acc+=1)
if %acc% EQU 2 set /a accfol+=1
if %config% EQU 0 if %acc% EQU 2 echo %accfol% %folder%
if %config% EQU 1 if %acc% EQU 2 if %accfol% EQU %num% echo suppression de %folder%
goto :eof

Un truc dans le genre

bloodyspike

il sert a quoi le :eof vu que le :check est en fin de script ?
Sinon il garde pas la variable %folder% en sortant du :check
et me renvoie :

Citation :

Directory List :

1 631129224
2 858414119
What QQ number do you want to clean ? 1
suppression de 631129224

QQ directory : C:\Program Files\Tencent\QQ
QQ number : ?????

Message édité par bloodyspike le 09-06-2008 à 16:04:25

bloodyspike

J'ai corrigé tout ca :

Code :

@echo off
echo.
echo -------
echo.
echo -= Welcome to the QQ temporary files cleaner =-
echo.
echo Intructions :
echo.
echo Select the account you want to clean from the list
echo that will appear and validate.
echo Exemple : If you want the 1st account of the list,
echo enter key 1 then press ENTER.
echo.
echo To stop the program at anymoment before
echo having validate the QQ number, just by closing
echo the window with the cross on the top right of this window.
echo.
echo Create by Julien M. © 2008 - bloody.spike@free.fr
echo.
echo --------
echo.
pause
if exist "%HOMEDRIVE%\Program Files\Tencent\QQ" (cd "%HOMEDRIVE%\Program Files\Tencent\QQ" ) else (goto error)
echo.
echo Directory List :
echo.
set config=0
set accfol=0
for /f "delims=" %%a in ('dir /b /a:d') do call :check "%%a"
echo.
set /p num=What QQ number do you want to clean ?
set accfol=0
set config=1
for /f "delims=" %%d in ('dir /b /a:d') do call :check "%%d"
echo.
echo QQ directory : %cd%
echo QQ number : %num%
cd %num%
if exist UserHead (
cd UserHead
del *.jpg | del *.gif | del *.png | del *.bmp
echo "Icone User cleaned"
cd..
)
if exist CustomFaceRecv (
cd CustomFaceRecv
del *.jpg | del *.gif | del *.png | del *.bmp
echo "Custom Icone User Received Cleaned"
cd..
)
if exist Image (
cd Image
del *.jpg | del *.gif | del *.png | del *.bmp
echo "Temp Emotes Received Cleaned"
cd..
)
if exist QQphoto (
cd QQphoto
del *.jpg | del *.gif | del *.png | del *.bmp
echo "Temp QQ Photos Cleaned"
cd..
)
if exist QQSpaceFile (
cd QQSpaceFile
del *.jpg | del *.gif | del *.png | del *.bmp
echo "Temp Files QQSpace Cleaned"
cd..
)
if exist Temp (
cd Temp
del *.jpg | del *.gif | del *.png | del *.bmp
echo "Temp Files Cleaned"
cd..
)
if exist SCreen (
cd SCreen
del *.jpg | del *.gif | del *.png | del *.bmp
echo "Temp Sent Images Cleaned"
cd..
)
pause
exit
:error
echo Your QQ directory doesn't exist on %HOMEDRIVE% !
pause
exit
:check
set acc=0
set folder=%~1
set test=%folder:~0,1%
for /l %%b in (0,1,9) do (if %test% EQU %%b set /a acc+=1)
set test=%folder:~-1%
for /l %%b in (0,1,9) do (if %test% EQU %%b set /a acc+=1)
if %acc% EQU 2 set /a accfol+=1
if %config% EQU 0 if %acc% EQU 2 echo %accfol%. %folder%
if %config% EQU 1 if %acc% EQU 2 if %accfol% EQU %num% echo Cleanning of the QQ number : %folder%
if %config% EQU 1 if %acc% EQU 2 if %accfol% EQU %num% cd %folder%
:eof

Par contre j'ai ces erreurs :

Citation :

Impossible de trouver C:\Program Files\Tencent\QQ\858414119\image\*.jpg
Impossible de trouver C:\Program Files\Tencent\QQ\858414119\image\*.gif
Impossible de trouver C:\Program Files\Tencent\QQ\858414119\image\*.png
Impossible de trouver C:\Program Files\Tencent\QQ\858414119\image\*.bmp

Message édité par bloodyspike le 09-06-2008 à 16:19:57

blastkiller

Code :

if exist SCreen (
cd SCreen
del *.jpg & del *.gif & del *.png & del *.bmp > NUL
echo "Temp Sent Images Cleaned"
cd..
)

bloodyspike

NUL ou NULL ? lol

blastkiller

non non c'est bien NUL, et meme :
del *.jpg & del *.gif & del *.png & del *.bmp > NUL 2> NUL

Message édité par blastkiller le 10-06-2008 à 00:02:34

bloodyspike

Ok, je vais tester ca dans la matinée !
Merci pour tout en tout cas !

bloodyspike

La ligne "del *.jpg & del *.gif & del *.png & del *.bmp > NUL 2> NUL" ne marche pas j'ai toujours les erreurs.
Sinon, j'aimerais ajouter la création d'un fichier log listant tous les fichiers effacer.
Si t'as 5 minutes pour coder ca, sinon je chercherai moi meme car ce n'est pas dur je pense
du genre ajouter un "log.txt >> " enfin je sais plus trop a froid ! lol

blastkiller

if exist SCreen (
cd SCreen
del *.jpg >> c:\log.txt 2> NUL
del *.gif >> c:\log.txt 2> NUL
del *.png >> c:\log.txt 2> NUL
del *.bmp >> c:\log.txt 2> NUL
echo "Temp Sent Images Cleaned"
cd..
)

bloodyspike

j'ai un peut modifier et j'ai mis :

set log=c:\QQCleanerLog%date:~0,2%%-%date:~3,2%-date:~6,4%.txt

del *.jpg >> %log% 2>NUL
del *.gif >> %log% 2>NUL
del *.png >> %log% 2>NUL
del *.bmp >> %log% 2>NUL

Voilà tout marche bien, merci pour le coup de main...

Publicité

FORUM HardWare.fr

Programmation

Shell/Batch

Script de recherche et d'effacement

Sujets relatifs
script pour générer un xml à partir bdd mysql	moteur de recherche
mini moteur de recherche sous firefox pb	Executer un script linux sous java
les barre de recherche sous firefox	Script TCL Eggdrop ... Variable dans un fichier txt
comment creer un moteur de recherche access 2007	script en .bat concernant les UO sous Active Directory : soucis!!
Chargement fichier externe JS ?	[Flash - Action Script] variable clickTag
Plus de sujets relatifs à : Script de recherche et d'effacement

Page générée en 0.164 secondes