Discussion :

[Safaritn]

Salut toutes et à tous,

J'ai écris le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
If Shell("del C:\Test\*.*") Then
End If

Lors de l'exécution, le programme m'affiche un message d'erreur m'indiquant que le fichier est introuvable !

De quoi est dû ce problème et comment y remédier ?

[SfJ5Rpw8]

et bien del c'est une commande dos .. pas un exécutable...
essai :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Shell("cmd /C del c:\test /Q")

j'ai rajouté /Q pour éviter ... le message "êtes-vous sur o/n ?"



enfin tu peu aussi éviter de faire appel au shell et utiliser :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Kill "c:\test\*.*"

[Safaritn]

Merci infiniment, ça marche avec la première commande
Mais, avec Kill, ça ne marche pas, toujours le même message d'erreur qui s'affiche !!!

[SfJ5Rpw8]

Merci infiniment, ça marche avec la première commande
Mais, avec Kill, ça ne marche pas, toujours le même message d'erreur qui s'affiche !!!

ben kill renvoi une erreur s'il n'y as aucun fichier à effacer ... donc si tu les as déjà effacés avec del....

[Safaritn]

Ah ok, donc la commande Kill exige la présence au moins un fichier.
Merci beaucoup pour ton aide

[SfJ5Rpw8]

oui ... utilise la gestion d'erreur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
sub EffaceTest
 On Error resume Next
  Kill "c:\test\*.*"
end sub