Newsgroup: it.comp.lang.visual-basic
Titolo: Muovere dei files

Ciao a tutti.
Col visual basic 6  ho la necessitą  di muovere dei files 
*AB*.PDF    
*NM*.PDF 
.....
.....
da una cartella a  una opportuna sottocartella a seconda di quale č 
il tipo di PDF.
Le mie  ipotesi sono il metodo  MOVEFILE,   la shell....
Non riesco comunque a farli funzionare.   C'č qualcuno fornito di idee?
Ciao
Grazie
Indriano
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Indriano
name "c:\pippo\pippo.mdb" as "d:\pluto\questo-era-pippo.mdb"
pero' neanch'io ho premuto F1 per controllare. fallo tu, dai :)
ciao, a.

Se vuoi chiuarirmi la tua risposta
non mi funziona.
 
     If Pdf_AB_Esistente = True Then
                    spostatorepdf = "copy " & fullpath & "\" & "*AB*.pDf  "
                    spostatopdf = fullpath & "\" & (testodirectory) & "\"
& "AB" & "\" & "PDF\"
                    Name spostatorepdf As spostatopdf
     End If
 
 
 
Oppure se qualcuno ha delle risposte............


     End If
E ma quella stringa "spostatorepdf" contiene anche la parolina copy che 
sicuramente non fa parte del percorso :(
greg 

 Indriano
Preciso la mia richiesta:
Ho una  lunga serie di files  che sotto descrivo in vecchia notazione dos:
*WE*.PDF    
*DE*.PDF
.........
*WE*.PDF  devono  finire in   465456\pdf e sparire dalla directory corrente
*DE*.PDF  devono  finire in   465456\pdf e sparire dalla directory corrente


 greg
Hai ragione Greg. Hoooo sbagliato !!!!
Poi, usando quella modalità ce n'è un altro di errore:
Temo che vada fatto file per file  scrivendoli in appoggio(sigh).
Traffichiamo un pò.  Strano che però il potente Bill non abbia  pensato a
un move di massa.
Grazie a tutti


 Indriano
s=dir$(percorso-con-slash & "*we*.pdf")
while s<>""
    debug.print s
    s=dir
wend
guarda la finestra di debug e agisci di conseguenza.
e usa name, non copy...
ciao, a.

 wend
Ciao Andrea,  
Ha funzionato perfetto come un orologio svizzero.  Ho superato quello
scoglio non indifferente nel progetto (scoglio alto metri 2 ).
Adesso sono dietro ad un altro scoglio  che in gran parte so come
affrontare  in cui l'ingrediente fondamentale è la pazienza (scoglio di
140 centimetri). Speriamo di non cadere in acqua....
Scherzi a parte  mentre l'istruzione funziona non mi è chiaro chiaro il
motivo....( meglio comunque così che il contrario )
Dubbio:
1 ) perchè dir$ e non dir nella 1° riga ?
Cumunque   ultra-grazie
Ciao


1 ) perchè dir$ e non dir nella 1° riga ?
Dir$  Chr$ Ltrim$ Left$, ecc sono retaggi dei primi basic come QB e stanno a
sottointendere che in risultato dell'operazione è in una stringa.
Difatti se tu fai
Dim MyStr$
è equivalente a scrivere;
Dim MyStr as String
cioè il carattere $ identifica una stringa, come il % un intero, & un long ecc.
--
ciao
  Stefano

Grazie mille Stefano


 1 ) perchè dir$ e non dir nella 1° riga ?
come ti ha detto stefano, e' un modo conciso di dire che la funzione 
restituisce una stringa.
in vb.classic se fai (cosa che io non faccio *mai*)
dim ciccio%, s$
s e' una stringa, ciccio un integer.
nel caso specifico, mi sembra si dicesse qui tempo fa che usando il dollaro 
la funzione era piu' veloce.
non avendo liste con milioni di file, non mi sono mai accorto della 
differenza. ma con chr$() e dir$() mi sono abituato a usare la notazione 
soprattutto per vederle prima quando riguardo il codice.
cmq se usi dir() e' praticamente lo stesso.
ciao, a.


Più o meno.
Le funzioni stringa esistono di 2 tipi:  quelle con il $ finale e quelle 
senza.
Quelle "moderne" senza il $ restituiscono un Variant contenente stringa, le 
altre lavorano e restituiscono stringhe.
Quindi, come prestazioni sono migliori quelle con $, le altre possono essere 
usate in casi particolari, ad es. con i DB, il che non è una differenza da 
poco.
Es, se il valore passato è un Null:
? mid(null, 1, 2)
? mid$(null, 1, 2)
Ciao