Non trovo più il classico Open ma un FileOpen.
Vediamo...
Module Module1
Sub main()
FileOpen(1, "C:\users\io\documenti\cicciobello", OpenMode.Random, , , )
End Sub
End Module
Ecco! Il file è stato creato!
17/08/2011 09.59 2.316.288 camioncino polizia.doc
28/12/2011 11.26 1.282.048 casetta.doc
31/12/2011 11.47 0 cicciobello
17/12/2011 23.22 131.983 codice vb.jpg
31/08/2011 09.09 171.008 coltelli.doc
16/08/2011 09.12 108.544 cucchiai.doc
Andiamo bene!
Questo esercizio mi serve per crearmi nuovamente un "convertitore di tags", ossia un programmino che prenda un file sorgente HTML o XML e converta le parentesi angolari dei tags nel carattere di escape < o >, in modo da poter pubblicare su internet il sorgente senza che le parentesi angolari vengano scambiate per tags.
