Salve, qualcuno sa dirmi come fare a far comparire il testo contenuto in un file.txt in caso non si trovasse (o si trovasse vuoto) un altro file txt (file_principale.txt).
Il tutto in un textBox
grazie
Usa l'istruzione Open per aprire il file.
La
Line Input #
per leggere le linee, inserendole in un ciclo controllato dal valore della funzione Eof.
L'istruzione Close per chiudere il file.
E' tutto sulla guida di VB ... compresi degli esempi.
ho usato il seguente...da te proposto
come faccio a dire al programma che,Dim inet As Object
Dim b() As Byte
Const icByteArray = 1
Set inet = CreateObject("InetCtls.Inet")
b() = inet.OpenURL("http://www.sito.it/cartella/testo.txt", icByteArray)
Label1.Caption = StrConv(b, vbUnicode)
Set inet = Nothing
se il file testo.txt non lo trovi....oppure è vuoto....
allora usa il seguente "testoalternativo.txt" file residente nel pc
Ma il codice che avevo proposto e che hai usato e' valido se il file di testo e' su internet, su un sito ...
... e questo non lo avevi detto.
Comunque ... puoi controllare la lunghezza dell'array e se non e' maggiore di zero allora leggi l'altro file (con le istruzioni che ti ho detto prima).
Permessi di invio
Rispondi quotando