Discussion :

[Invité]

Code :

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

1
2
3
4
5
6
7
Dim objFSO
Set objFSO = CreateObject ("Scripting.FileSystemObject")
strPath = Session.Property("PROPERTYNAME")
nbr = Len(strPath)-1
strPath = Left(Session.Property("PROPERTYNAME"),nbr)
 
objFSO.DeleteFolder strPath, True