اللهم بارك لك في علمك و يرحمك و يرحم من علمك

MERCI MILLE MERCI VOUS VENEZ DE RENDRE VIE A 1 MILLIER DE REP
RIAD DE BISKRA

tu télécharge ce fichier
http://www.box.net/shared/8y1ho5k8bq5jkil22fqc
tu l'ouvre avec bloc note
tu modifier la lettre Z par la lettre qui représente la racince que vous voulez nétoyer :)

ca maaaaaaaaaaaaaaaaaaaaaaaaaarche !!!!!!!!!!!!!
Merciiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii bcp bcp bcp youssef, vrmt c géniaaal, j plutot utiliser le dernier code , et c parfaiit , un sacré Merci pour vouuus

Essaye ce code
https://sites.google.com/site/web1986/Antivir.rar

salam youssef
im me donne le message d erreur suivant
line : 14
Char : 9
Error : Permission denied
code : 800A0046
Source : microsoft VBscript runetime error

Si vous essayez le fichier que j'ai attaché dans le dernier commentaire ça va marcher :)
Bonne chance ^_^

A tout ceux qui ont obtenu le message d'erreur du genre:
Script: C:\scan.vbs
Ligne:4
Carat.:2
Erreur: Un composant Activex ne peut pas créer un objet.:’Scripting.FileSystemObjetct’
Code: 800A01AD
Source: Erreur d’exécution Microsoft VBScript

-------------------------
l'erreur provient d'un espace situé vers la fin de la ligne 4 (là où il y a la commande Scripting.FileSystemObject)

copiez le code suivant (en changeant la lettre Z par la lettre du lecteur),ça devrait marcher sans problème...et encore merçi à Youssef pour le code ;)

cDrive = "Z:\"

Set FSO = CreateObject("Scripting.FileSystemObject")
ShowSubfolders FSO.GetFolder(cDrive)
WScript.Echo "Terminé avec succès.Merçi à Youssef"

Sub ShowSubFolders(Folder)
str = ""
For Each Subfolder in Folder.SubFolders
str = str & " " & Subfolder.Path
subFolder.Attributes = 0
ShowSubFolders Subfolder
Next
End Sub

Le code est dans le fichier attaché :
https://sites.google.com/site/web1986/Antivir.rar
il faut juste changer la lettre "Z" par la lettre de votre disque .

Idem que Mehenni

Bonjour,
J’ai essayé ce que vous avez dit, voici le message d’erreur:
Script: C:\scan.vbs
Ligne:4
Carat.:2
Erreur: Un composant Activex ne peut pas créer un objet.:’Scripting.FileSystemObjetct’
Code: 800A01AD
Source: Erreur d’exécution Microsoft VBScript

Merci bcp pour ton aide.

Merci pour ce code BIENVEILLANT.
Bonne et heureuse année 2011.
Respectueusement,
LUYCX

Salam,
Malheureusement ça ne marche pas avec moi

Script G:\new.vbs
Ligne : 1
Caract : 1
Erreur : Caractère incorrect
Code : 800A0408
Source : Erreur de compilation Microsoft VBScript

Je viens de revoir mon post et je me rends compte que l'affichage n'est pas correct. Il suffit juste supprimer les espaces après le mot "FileSystemObjet" (c'est à dire avant et après le caractère ").

Bonjour,

Mehenni j'ai eu la même erreur que toi j'ai juste remplacé la ligne :

Set FSO = CreateObject("Scripting.FileSystemObject " )

par

Set FSO = CreateObject("Scripting.FileSystemObject")

Voilà.

j'ai suivi toute la procédure mais des erreurs de compilations apparait tjs !
script H:\ggg.vbs
Ligne: 1
caract: 1
Erreur : Instruction attendue
Code: 800A0400
Source: Erreur de Compilation Microsoft VBSscript

commen executer alors le code?le processus pour executer le code?

sa ne paasse toujours pa ya des erreure dxe dedan

La solution est superbe! ça a marché à merveille pour mo

Respect à Youssef

Copier cela directement:

' Remplacer G:\ par le nom de votre flash mémoire dans le système

cDrive = "G:\"

Set FSO = CreateObject("Scripting.FileSystemObject")
ShowSubfolders FSO.GetFolder(cDrive)
WScript.Echo "Terminé avec succès."

Sub ShowSubFolders(Folder)
str = ""
For Each Subfolder in Folder.SubFolders
str = str & " " & Subfolder.Path
subFolder.Attributes = 0
ShowSubFolders Subfolder
Next
End Sub

essayer de copier ce code et n'oublier pas de changer la lettre Z par la lettre de votre racine :)
https://dl-web.dropbox.com/get/Japprend.Com/Sality...

Bonjour,
J'ai essayé ce que vous avez dit, voici le message d'erreur:
Script: C:\scan.vbs
Ligne:4
Carat.:2
Erreur: Un composant Activex ne peut pas créer un objet.:'Scripting.FileSystemObjetct'
Code: 800A01AD
Source: Erreur d'exécution Microsoft VBScript

pour les personnes qui n'ont pas arrivé à faire marcher cet utilitaire , il faut juste copier la totalité du code coller le dans une bloc note ==>Fichier Enregistrer sous et donner le un nom.vbs copier ce script sur votre unité de stockage et double cliquer .
NB : il faut changer la lettre Z: par la lettre qui représente votre Clé USB

merci beaucoup Youssef. je m'éxerce tout de suite et je te rend compte

Bonjour Youssef,

J'ai le même problème signalé par les précédents utilisateurs et j'ai essayé ton code VB mais un message d'erreur apparait lorsque je l'exécute.

Est ce qu'il t'est possible de le laisser sur le site comme un fichier exe afin qu'on le télécharge ou l'envoyer directement dans une boîte mail ? Au besoin je peux te founir mon adresse mail.

Merci d'avance

Bonjour, j'ai un problème similaire avec mon disque dur externe de 1000 Go. mais je ne sais pas trops comment remplacer le Z:/!! je ne sais pas ou on clique pour le faire. comment proceder pour changer les informations système en question! merci

bsr ca va,merci lah yt9abal mna jami3an,j'ai ajouté ton gmail sur ma boite voila le tien [email protected] bon fin soirée prend soin de toi.

slt youssef je ss driss de prosystems ca va tt va bien ramadan mobarak sa3id merci pr le code a bientôt.

pour moi ca ne marche pas.
c ecrit erreur d'execution
m'aiderrrrrrrrr

Merci pour la remarque(c'était juste un petit conflit avec les fonction du theme :))

Merci Youssef, ça m'a vraiment soulagé.

Mais apparemment il manque une parenthèse ")" à la ligne 5 !

Il faut copier l'intégralité du code ?

Merci pour ce tuto c'était bien util pour moi Mr Youssef

Merci Pour votre support :D

bon site youssef
bon continuation

Je vous empris ,on deteste les virus et on n’aime pas que les gens souffre des scripts malvaillants ,des trojans,des virus en générale ,c’est pour cela qu’on a créé une catégorie destinée à la sécurité qu’on va éssayer de résourdre des problèmes concernants les virus et comment se débarasser d’eux .
Merci pour votre passage.

Bonjour,
Vous vaez raison Youssef j'avais du mal à résister à ce virus à chaque j'étais obligée de faire ces opération et j'étais vraiment contente lorsque tu m'as dit que tu va me chercher une solution.
Merci :)