Discussion :

[samus535]

Bonjour,
J'aimerais savoir si quelqu'un aurait un idée pour trapper un erreur lorsque nous utilisons la commande

Code :

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

Kill fileName

.

Le problème est que nous essayons de supprimer un fichier qui est encore utilisé par un autre application.

J'aimerais avoi un flag qui me dit si la suppression à bien marché ou non.

Merci beaucoup et bonne journée
--Samus535

[ProgElecT]

Code :

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

1
2
3
4
5
6
7
8
On Error Resume Next
Kill FileName
If Err Then
 Err.Clear
 MsgBox "le " & FileName & " n'a put être supprimé"
 Else
 MsgBox FileName & " a été supprimé"
End If

On peut aller plus loin en réagissant suivant le N° de l'erreur.

[DAUDET78]

Code :

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

1
2
3
4
5
6
7
8
9
On Error Resume Next
Kill FileName
If Err Then
 Err.Clear
 MsgBox "le " & FileName & " n'a put être supprimé"
 Else
 MsgBox FileName & " a été supprimé"
End If
On error goto 0   ' pour supprimer la surveillance d'une erreur future

[DarkVader]

SHFileOperationA retourne le résultat de l'opération (Delete, copy etc) sans lever d'exception.