[VBA] Eliminazione di file

[damj]

ciao a tutti!!!
ho un programma che legge dei codici a barre (non scritto da me), e senza entrare nel dettaglio prende dei file da una cartellaA, li copia in un altra cartellaB ridenominandoli(in automatico) e poi li lavora. c'è la possibilità di usare un suo editor per gestire certe cose allo scatenarsi di un evento (pressione di un tasto, etc), ed io vorrei cancellare i file della cartellaA iniziale, senza rimuovere la cartella che è condivisa.Il problema è che non conosco i nomi dei file,nè quanti essi siano, quindi non posso fare un ciclo per cancellarli.
ora, c'è un comando basic (sax basic precisamente, ma è quasi uguale) per svuotare una cartella??oppure, c'è un oggetto tipo FileListBox1 di delphi, al quale assegnare una direcory e con i metodi arrivare ai nomi dei file e cancellarli???help meeeeeeeeeeeeee!!!!
grazie andre

[oregon]

Non conosco il "sax basic" ma hai controllato se il

Kill

esiste e funziona?

[damj]

ma come dovrei usarlo?

[oregon]

Per cancellare un solo file potresti usare

Kill "file.ext"

Per tutta la cartella, ci vorrebbe una funzione (come la Dir$ del VB) per elencare tutti i file ...

Oppure potresti usare un oggetto come FSO (FileSystemObject) ma non so se e' possibile istanziarlo da questo "sax basic" ...

Ma non hai la documentazione del linguaggio?

[damj]

nessuna documantazione purtroppo....ho provato con

set fso=createobject(scripting.filesystemobject)
For Each foundFile In fso.GetFiles ("C:\indirizzoCartella)
array(i)=foudfile
i=i+1
Next

solo che mi dice automazine activex:nessuna proprietà simile trovata

credo che manchi qualche dll...però non saprei..
per il kill devi saper il nome del file vero?

[damj]

ah scusa come funziona la dir$?

[oregon]

Intanto nella CreateObiect il nome della classe va tra " " ...

La Dir$ restituisce in maniera ciclica i nomi dei file contenuti in una cartella ...

Scrivi

Print Dir$("*.*")

e poi, ripetutamente

Print Dir$

finche' restituisce nomi (trovi tutto nell'help)

[damj]

ok ci ho provato e qualcosa ho ottenuto...grazie per l'aiuto.Andre