Suppression de fichier...

Signaler
Messages postés
13
Date d'inscription
mercredi 23 janvier 2002
Statut
Membre
Dernière intervention
16 mars 2004
-
Messages postés
13
Date d'inscription
mercredi 23 janvier 2002
Statut
Membre
Dernière intervention
16 mars 2004
-
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.

2 réponses

Messages postés
224
Date d'inscription
vendredi 14 septembre 2001
Statut
Membre
Dernière intervention
14 juillet 2006

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
Messages postés
13
Date d'inscription
mercredi 23 janvier 2002
Statut
Membre
Dernière intervention
16 mars 2004

Merci, c'était bien ca @+