Newsgroup: it.comp.lang.visual-basic
Titolo: Cancellare cartelle

    Ciao a tutti,
 Scusate la mia ignoranza,ma vorrei sapere perche
usando questo semplice VBS per cancellare una cartella,
non sempre la cosa funziona.Alcune cartelle le cancella e altre no
dando come  errore " AUTORIZZAZIONE NEGATA".
Non sono riuscito a identificare il tipo di cartelle che non
riesce a cancellare.So che non dipende dagli attributi e
nemmeno da quanto e' contenuto nella cartella.
Ecco il VBS che  sto cercando di usare:
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFolder ("C:\Documenti\Foto")
Se qualcuno mi spiega dove sto sbagliando mi fara'
un grande piacere.
Grazie anticipate e saluti a tutti.
                    Sergio

"Sergio"
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFolder ("C:\Foto")
l'ho provato in qualsasi condizione su un win98se ed ha sempre funzionato
anche con un jpg interno aperto da Acdsee e Irfan wiew con
cartella impostata in solo lettura e nascosta ecc
Al 99% dipende dal tuo sistema operativo soprattutto se e' un XP
http://www.google.it/search?hl=it&q=unable+to+delete+folder%2Bxp&btnG=Cerca+con+Google&meta=
io ti consiglierei inoltre di tirare via la cartella foto da documenti
e metterla direttamente in c:\
--
Fosco

"Sergio"
PS:
DeleteFolder Method
See Also
MoveFolder Method
( Puoi provare col MoveFolder o [1] o [2])
Applies To: FileSystemObject Object
VBScript
Deletes a specified folder and its contents.
object.DeleteFolder ( folderspec[, force] );
[1]
FORCE
Optional. Boolean value that is true if folders with the read-only attribute set are to be deleted; false (default) if
they are not.
[2]
Thank you for replying!
So far as I know, the "setup" folder name will not cause the permission
error. There is one limitation for the MoveFolder method which is:
"This method allows moving folders between volumes only if supported by the
operating system. "
This means some moving operations with MoveFolder will not be allowed by
the operating system. Based on my experience, if some specific folders
can't be moved with MoveFolders method of FileSystemObject, we use the
CopyFolder method and DeleteFolder method as one workaround. I list one
sample codes for you.
'code begin -------------------------------------------------------
Sub MoveAFolder(Drivespec)
  Dim fso
  Set fso = CreateObject("Scripting.FileSystemObject")
  'specify the destination path in your scenario
  fso.CopyFolder Drivespec, "d:\temp\"
  fso.DeleteFolder Drivespec
End Sub
Call MoveAFolder("D:\WINSIMS\SETUP")
'code end --------------------------------------------------------
Please feel free to let me know if you have any further questions. I am
standing by to be of assistance.
Does this answer your question? Thank you for using Microsoft NewsGroup!
Wei-Dong Xu
Microsoft Product Support Services
--
Fosco

Sergio wrote:

Ciao Sergio,
hai scritto "So che non dipende dagli attributi": vuol dire che hai 
verificato che la dir "C:\Documenti\Foto" o sue sottocartelle non abbiano 
il flag 'read-only' impostato?
Se provi con:
objFSO.DeleteFolder ("C:\Documenti\Foto", True)
cosa accade?
Il file system è di tipo FAT o NTSF?
Nel secondo caso, sei sicuro di possere i permessi per cancellare la 
directory o i file ivi contenuti?
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

"Gianluca Cannalire [MVP] [
www.visual-basic.it
]"
quando ho risposto io >>> 7.23  il tuo post >>  7.12 NON
c'era ancora ... che si il mio o il tuo server che fa'
le bizze ?  :-)
--
Fosco

 le bizze ?  :-)
Ciao Fosco,
non saprei ;)
in effetti, anche a me capita di rispondere a quesiti che apparentemente 
non hanno ricevuto risposta ma che effettivamente l'hanno ricevuta diversi 
minuti prima.
Sicuramente è solo un problema di repliche tra i vari news server


 Sicuramente è solo un problema di repliche tra i vari news server
Ok  .. ne approfitto per fari gli auguri per il nuovo lieto arrivo
--
Fosco

 Ok  .. ne approfitto per fari gli auguri per il nuovo lieto arrivo
Grazie :)


 ne approfitto per fari gli auguri per il nuovo lieto arrivo
m'associo di cuore. fra trasloco e ng murati mi ero perso la cosa.
a gianlu', mo' sai come passare le notti, cose serie, mica vbeggiare :)
ciao, a.

 :)
Già... per esempio cambiare il pannolino al pollo-trota, come diceva Baricco:
http://www.oceanomare.com/ipsescripsit/miscellanea/pannolinosmemo.htm
Bye, G.

Paperino wrote:

ROTFL, quante verità :)
Sono al secondo (il primo ha quasi 4 anni) ed oramai ci ho fatto la mano 
;)
Grazie ancora per gli auguri.


 Sono al secondo (il primo ha quasi 4 anni) ed oramai ci ho fatto la mano ;)
Idem: undici la prima, due il secondo :-).
Bye, G.