Réecriture batch en .vbs

Bonjour à tout le monde,

Je suis actuellement entrain de réecrire un script présentement en batch, en .vbs
N'étant pas dutout développeur, j'ai quelques problémes pour "traduire" certaines lignes...

Voici la 1ère: forfiles /p z:\scripts\logs /m log_%1.log /c "cmd /c if @fsize GTR 300000 del @path"

Cette ligne test les fichiers log_%1.log, ou %1 est une variable determinée lors de l'exécution du script, et le supprime si sa taille est superieur à 300 Mo...

Comment pourrais je faire ces actions en vbs svp ?

liste files

Code:

---

1 2 3 4 5 6 7 8 9 10

Set objFSO = CreateObject("Scripting.FileSystemObject") objStartFolder = "C:\Scripts"   Set objFolder = objFSO.GetFolder(objStartFolder)   Set colFiles = objFolder.Files For Each objFile in colFiles Wscript.Echo "Nom de fichier : " & objFile.Name Wscript.Echo "Taille : " & objFile.FileSize Next

---

affiche le nom des fichiers et leur taille.

pour les arguments :

Code:

---

1 2 3 4 5

Set objArgs = WScript.Arguments argument1 = objArgs(0) argument2 = objArgs(1) argument3 = objArgs(2) 'etc...

---

Merci beaucoup pour cette réponse. Si je comprend bien:

objStartFolder = "C:\Scripts" --> déclaration du dossier où se trouvent les fichiers
Pour le reste, je ne comprend pas bien l'utilité... un affichage d'un nom de fichier, ainsi que sa taille...
Et puis aucune suppression par la suite ?

Je suis un peu perdu, si tu pouvais m'éclairer stp ?

Je t'ai indiqué où trouver les informations, je n'ai pas dit que je ferai le script :)


il faudra probablement dans ta boucle for ajouter un

Code:

---

1 2 3

If objFile.FileSize > 300000 then 'suis pas certain de la taille mais avec l'echo de dessus tu peux le vérifier objFSO.DeleteFile(objFile.Name) End If

---