Suppression de fichier...

J'ai un soucis avec mon code pour supprimer un fichier :

'---------------------------------------------
Function delete_fic (name,root)
On Error Resume Next

Dim fso
Set fso = Server.CreateObject("Scripting.FileSystemObject")

'----- Si le fichier existe
'printend server.mapPath(root&"\"&name)
If fso.FileExists(Server.mapPath(root&"\"&name)) Then
fso.deleteFile(Server.mapPath(root&"\"&name))
End If

Set fso=nothing

If Err.Number > 0 Then delete_fic = -1 Else delete_fic = 0
End Function
'---------------------------------------------

Ce code marche trés bien en ligne mais sur mon poste en loca ca ne focntionne pas : Si j'affiche le chemin il correspond bien à mon fichier alors... il réfléchit réfléchit (en fait le serveur plante).
Est-ce qu'il faut faire quelque chose de particulier sur le serveur pour que ca fonctionne....

Merci d'avance Julien.

Bon, je suppose que tu as Norton antivirus qui interdit l'execution de scripts.
Alors tu décoches l'option et tu reboote ton serveur.

Attention, le fait de fermer Norton parrait-il ne suffit pas

Merci, c'était bien ca @+