+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 10 su 10

VB6 Leggere cartella Destinazione

  1. #1
    L'avatar di Louis
    Louis non  in linea Scribacchino
    Ottengo dal controllo InputBox la seguente informazione sul percorso di un'operazione: A:\Dati\MioFile (Ove ValoreDir=A:\Dati\MioFile).
    Dato quanto sopra mi occorre conoscere il totale dei byte nella cartella Dati.
    Ho provato con: FolN = fso.GetFolder(ValoreDir).Size ma non corretto, in quanto ValoreDir = A:\Dati\MioFile (Nome della cartella e del file) e Non A:\Dati (nome della cartella).
    La domanda, in altre parole, questa:
    possibile conoscere il totale dei byte contenuti in una folder, avendo a disposizione il percorso, il nome della folder e del file?
    Grazie per le risposte.

    ℹ️ Leggi di pi su Louis ...

  2. #2
    Se in questo modo

    Path = "A:\Dati"
    FolN = fso.GetFolder(Path).Size

    funziona, qual e' il problema?
    ℹ️ Leggi di pi su AntonioG ...

  3. #3
    L'avatar di Louis
    Louis non  in linea Scribacchino
    Antonio grazie per ambedue le risposte. A volte non vedo al di l del mio naso. Ciao.
    ℹ️ Leggi di pi su Louis ...

  4. #4
    L'avatar di Louis
    Louis non  in linea Scribacchino
    Mi sembrava troppo semplice (quindi rettifico sia pure in parte quello che ho detto)!
    Non conosco a priori se si tratta dell'Unit A:\; D:\; E:\ .....; bens conosco solo dopo che stata digitato A:\Dati\MioFile - che si tratta dell'unit A:\, ma potrebbe essere D:\ ...
    Quindi conoscendo a posteriori A:\Dati\NomeFile, come faccio ad estrarre i byte inseriti inA:\Dati ?
    Scusami Antonio ma evidentemente non mi ero spiegato bene.
    ℹ️ Leggi di pi su Louis ...

  5. #5
    Cioe' tu hai in una certa variabile stringa (ad esempio, Percorso), un percorso completo di nome di file e vuoi eliminare il nome di file a destra per ottenere solamente il percorso da utilizzarsi con il GetFolder. Ovvero, potresti avere nella variabile Percorso la stringa

    E:\Cartella1\Cartella2\File

    e vuoi ottenere la stringa

    E:\Cartella1\Cartella2

    o non e' cosi'?
    ℹ️ Leggi di pi su AntonioG ...

  6. #6
    L'avatar di Louis
    Louis non  in linea Scribacchino
    No cos:
    E:\Cartella1\File
    e vorrei ottenere:
    E:\Cartella1 per leggere n byte

    N.B. solo alla fine della routine conoscer il percorso ed il nome del file (che non mi serve).
    ℹ️ Leggi di pi su Louis ...

  7. #7
    Se nella variabile Percorso c'e' E:\Cartella1\File
    allora guarda il codice che segue

    Dim ix As Long
    ix = Len(p)
    Do While ix
    If Mid$(p, ix, 1) = "\" Then Exit Do
    ix = ix - 1
    Loop
    FolN = fso.GetFolder(Left$(Percorso, ix - 1)).Size
    ℹ️ Leggi di pi su AntonioG ...

  8. #8
    L'avatar di Louis
    Louis non  in linea Scribacchino
    E' un codice sofisticato (mica male), che immediatamento non so tradurlo, ora lo provo. Comunque ti ringrazio per il tempo impiegato.
    ℹ️ Leggi di pi su Louis ...

  9. #9
    L'avatar di Louis
    Louis non  in linea Scribacchino
    Complimenti, hai determinato quante lettere ci sono dall'ultima barra e poi le hai tolte, in modo d'avere solo l'Unit e la folder.
    Funziona benissimo. Grazie ancora.
    ℹ️ Leggi di pi su Louis ...

  10. #10
    Scusa Louis se te lo dico, non e' per voler dimostrare nulla perche' non e' nel mio stile, ma il codice che ti ho mostrato (che, fra l'altro puo' essere scritto in tanti altri modi), e' molto semplice ... diciamo "di base" ...

    Sai, non vorrei "montarmi la testa" per aver scritto "software sofisticato" ...

    Ciao e buon lavoro[img]smileys/smiley2.gif[/img]
    ℹ️ Leggi di pi su AntonioG ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Risposte: 0
    Ultimo Post: 07-09-2020, 08:07
  2. Risposte: 5
    Ultimo Post: 04-03-2015, 19:57
  3. Risposte: 2
    Ultimo Post: 15-11-2007, 11:11
  4. leggere file di una cartella
    Da ketto85 nel forum Microsoft Word
    Risposte: 1
    Ultimo Post: 06-11-2005, 18:47
  5. Risposte: 4
    Ultimo Post: 29-08-2005, 18:32