lotto_tom75
Advanced Premium Member
Codice:
Call ElencoFileInDirectory(sDir,aV,".txt")
i = ScegliOpzioneMenu(aV,,"Scegli il file txt desiderato")
ScegliFiletxt = sDir & aV(i) & ".txt"
End Function
Dim sFile1
Dim aLunghette
Dim sFiletxt
Dim contatore
sFile1 = "C:\Users\lottotom\Desktop\filestxtdemo\"
sFiletxt = ScegliFiletxt(sFile1)
LeggiRigheFileDiTesto sFiletxt,aLunghette
Io vorrei poter modificare questo pezzo di codice al fine di poter eseguire almeno una di queste due operazioni seguenti:
1) poter selezionare e analizzare i files desiderati presenti nella directory filestxtdemo che al momento lo script mi visualizza nell'elenco anzichè poterne selezionare ed elaborare uno soltanto come adesso.
2) poter elaborare tutti i files txt presenti in una determinata directory (es. filestxtdemo) se la prima opzione non è possibile implementarla.
Grazie infinite anticipate ai top scripters in ascolto che interveranno
Ultima modifica: