Newsgroup: it.comp.aiuto
Titolo: Richiesta script

Ciao a tutti,
per accelerare una operazione sul PC avrei necessità di una script che
faccia il tutto più velocemente. :)
Da Windows XP son passato a Windows 7 home e lo script che usavo sulla
prima piattaforma per fare l'operazione
in questione non mi funziona più su W7.
Ho solo aggiornato i percorsi che sono diversi in W7 ma nulla da fare:
al lancio lo script mi segnala errore.
 
Vi spiego l'operazione che dovrei fare.
 
In un determinato percorso che per esempio indico in
C:/Utenti/Proprietario/Animali/gatto dovrei cancellare la cartella
"gatto" che
dovrebbe essere sostituita dalla cartella "gatto1" che si trova per
esempio in
C:/Utenti/Proprietario/Desktop/Animali/gatto1.
 
Spero di essere stato chiaro.
 
Qualcuno è così gentile da produrmi lo script che faccia quelle
operazioni? Grazie mille
 
--
Ciao Er_ciabatta
 

Ciao fosco,
mantenendo le stesse cartelle ad esempio ho copiato lo script su un
file di testo che poi ho salvato come "gatto.vbs".
 
Ho lanciato lo stesso ma mi segnala l'errore di cui alla seguente
immagine:
http://imageshack.us/photo/my-images/804/20120201123529.jpg/
 
 
Gli dai un'occhiata per vedere se tutto è a posto?
 
Non capisco come mai nel percorso dello script appaia Users al posto
di Utenti. Bho!!!
 
Grazie ancora!!!
 
--
Er_ciabatta

a riciao fosco,
seguendo le tue ultime indicazioni ho accertato che il percorso della
cartella gatto
è questa:
http://imageshack.us/f/802/20120201132232.jpg/
 
 
Rimane a me sconosciuto il motivo perchè la cartella "Utenti" che
figura nel percorso in alto venga letta invece come "Users". ;) :)
 
Ho cambiato i percorsi nello script ma mi segnala lo stesso errore.
Poi vedo meglio magari ho sbagliato qualcosa. :)
 
Non ho capito perchè sostituire / con \ . Che non sia questo il motivo
dell'errore?
--
Ciao Er_ciabatta
 

effettuati cambiamenti percorso come riporto qui di seguito ma...
 
Dim fso, MyFolder
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFolder = fso.GetFolder("C:/Users/Proprietario/Animali/gatto")
MyFolder.Delete ' elimina la cartella gatto
FSO.MoveFolder "C:/Users/Proprietario/Desktop/Animali/gatto1","C:/
Users/Proprietario/Animali/gatto1"
' 1) da FSO.MoveFolder  a >>>> /Animali/gatto1"  deve stare TUTTO su
una riga
' esempio semplificato
' FSO.MoveFolder "C:/Users/gatto1","C:/Users_BIS/gatto1"
 
...mi ero dimenticato di dire che la cartella gatto1 deve essere
mantenuta comunque nel suo percorso.
Sostituisco MoveFolder con CopyFolder nello script?
 
Grazie ancora!!!
 
--
Ciao Er_ciabatta

quali righe aggiungere allo script perchè mi venga segnalato a video
che l'operazione
è andata a buon fine? :)
 
--
Ciao Er_ciabatta

 Sostituisco MoveFolder con CopyFolder nello script?
 
ho fatto la modifica ma la cartella gatto1 viene spostata ma non
mantenuta nel suo percorso iniziale così come
voglio che avvenga.
E' altro da modificare o aggiungere?
Grazie ancora e spero di non disturbare oltre. ;) :)
 
--
Ciao Er_ciabatta

 
 
Perché in Windows Vista e Windows 7, la stupide localizzazioni hanno fatto 
in modo che nella shell grafica (explorer) Users diventa Utenti, così come 
Program files diventa Programmi e così via.
 
In realtà il nome vero è Users ed è quello che ti viene mostrato nel prompt 
dei comandi. 
 
-- 
Ciao, Guglielmo.

grazie mille a fosco e a Guglielmo!!!
Discussione chiusa con esito positivo. ;) :)
 
-- 
Ciao Er_Ciabatta

' da fs.CopyFolder  a  False  tutto su una riga
 
scusami ancora Fosco...
pensavo di risolvere invece qualcosa ancora non mi quadra (sicuramente per 
la poca dimestichezza
che ho con questi comandi).
Poi mi leggo con calma le tue indicazioni. :)
 
Ricapitolo.Accertato che la seguente parte....
------------------------------------------------------------------------------------------------------
Dim fso, MyFolder
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFolder = fso.GetFolder("C:/Users/Proprietario/Animali/gatto")
MyFolder.Delete ' elimina la cartella gatto
FSO.MoveFolder "C:/Users/Proprietario/Desktop/Animali/gatto1","C:/
Users/Proprietario/Animali/gatto1"
' 1) da FSO.MoveFolder  a >>>> /Animali/gatto1"  deve stare TUTTO su
una riga
' esempio semplificato
' FSO.MoveFolder "C:/Users/gatto1","C:/Users_BIS/gatto1"
 
--------------------------------------------------------------------------------------------------------
 
che ho riporto fra i trattini, svolge la funzione da me richiesta non 
mantenendo perň una copia della cartella "gatto1"
nella sua iniziale collocazione, ho aggiunto alla stessa (senza spazi) la 
parte quotata in alta ma mi da errore.
 
Quei due percorsi temporanei che mi hai indicato li debbo lasciare cosě o 
sostituirli con i due percorsi reali?
Perchč fai cenno ad una cartella "Gatto2"?
 
Come dice Guglielmo mi sto proprio incartando e spero mi scuserai se ti sto 
ancora tediando con le
mie richieste. ;) :)
 
-- 
Ciao Er_Ciabatta
 

' da fs.CopyFolder  a  False  tutto su una riga
 
scusami ancora Fosco...
pensavo di risolvere invece qualcosa ancora non mi quadra (sicuramente per 
la poca dimestichezza
che ho con questi comandi).
Poi mi leggo con calma le tue indicazioni. :)
 
Ricapitolo.Accertato che la seguente parte....
------------------------------------------------------------------------------------------------------
Dim fso, MyFolder
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFolder = fso.GetFolder("C:/Users/Proprietario/Animali/gatto")
MyFolder.Delete ' elimina la cartella gatto
FSO.MoveFolder "C:/Users/Proprietario/Desktop/Animali/gatto1","C:/
Users/Proprietario/Animali/gatto1"
' 1) da FSO.MoveFolder  a >>>> /Animali/gatto1"  deve stare TUTTO su
una riga
' esempio semplificato
' FSO.MoveFolder "C:/Users/gatto1","C:/Users_BIS/gatto1"
 


' da fs.CopyFolder  a  False  tutto su una riga
 
scusami ancora Fosco!!!
Pensavo di poter risolvere invece qualcosa ancora non quadra (sicuramente 
per
la poca dimestichezza che ho con questi comandi).
Poi mi leggo con calma le tue indicazioni. :)
 
Ricapitolo. Accertato che la seguente parte....
------------------------------------------------------------------------------------------------------
Dim fso, MyFolder
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFolder = fso.GetFolder("C:/Users/Proprietario/Animali/gatto")
MyFolder.Delete ' elimina la cartella gatto
FSO.MoveFolder "C:/Users/Proprietario/Desktop/Animali/gatto1","C:/
Users/Proprietario/Animali/gatto1"
' 1) da FSO.MoveFolder  a >>>> /Animali/gatto1"  deve stare TUTTO su
una riga
' esempio semplificato
' FSO.MoveFolder "C:/Users/gatto1","C:/Users_BIS/gatto1"
 
--------------------------------------------------------------------------------------------------------
 
che ho riporto fra i trattini, svolge la funzione da me richiesta non
mantenendo perň una copia della cartella "gatto1"
nella sua iniziale collocazione, ho aggiunto alla stessa la
parte quotata in alta ma mi da errore. Ho fatto giusto?
 
Quei due percorsi temporanei che hai indicato li debbo lasciare cosě o


scusate per il casino fatto in fase di invio. :( :(
Mi son partite due raffiche raffiche in più di lupara con quel cesso di WLM.
 
Mi sa proprio che cambio newsreader. ;) :)
 
-- 
Ciao Er_Ciabatta 
 

NO
[cut]
 
http://tinyurl.com/83mj24z
 
 
-- 
Er_Ciabatta