Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - File System Object si incarta
Forum - Visual Basic 6 - File System Object si incarta

Pagine: [ 1 2 ] Precedente | Prossimo
Avatar
alex_purple (Normal User)
Newbie


Messaggi: 5
Iscritto: 08/10/2008

Segnala al moderatore
Postato alle 12:33
Mercoledì, 08/10/2008

Ciao a tutti, il mio problema è il seguente:
Ho un file txt che devo leggere con un programma VB6, io utilizzo FSO senza nessun problema, se non fosse che all'interno di questo file ci sono degli zero esadecimali, FSO se ne legge uno non riesce più a riconoscere i caratteri del resto della riga...
Sto impazzendo...Help me, please!

PM Quote
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 14:16
Mercoledì, 08/10/2008
Testo quotato

Postato originariamente da alex_purple:


Ciao a tutti, il mio problema è il seguente:
Ho un file txt che devo leggere con un programma VB6, io utilizzo FSO senza nessun problema, se non fosse che all'interno di questo file ci sono degli zero esadecimali, FSO se ne legge uno non riesce più a riconoscere i caratteri del resto della riga...
Sto impazzendo...Help me, please!



Prova con
Codice sorgente - presumibilmente Visual Basic 6

  1. Open "percorso+estensione" input as #1
  2. Dim letto
  3. Input #1, letto
  4. MsgBox letto


non sò se è giusto :rotfl:

PM Quote
Avatar
alex_purple (Normal User)
Newbie


Messaggi: 5
Iscritto: 08/10/2008

Segnala al moderatore
Postato alle 16:40
Mercoledì, 08/10/2008
Ti ringrazio, il codice è corretto ma non riesco a fargli leggere tutta la riga, si ferma a 162 caratteri...probabilmente mi legge uno zero esadecimale come il fine pagina...
C'è un modo per forzare la lettura?

PM Quote
Avatar
alex_purple (Normal User)
Newbie


Messaggi: 5
Iscritto: 08/10/2008

Segnala al moderatore
Postato alle 16:40
Mercoledì, 08/10/2008
Ti ringrazio, il codice è corretto ma non riesco a fargli leggere tutta la riga, si ferma a 162 caratteri...probabilmente mi legge uno zero esadecimale come il fine pagina...
C'è un modo per forzare la lettura?

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 17:12
Mercoledì, 08/10/2008
Il problemaa è ke Fabio ha sbagliato alcune cose...
innanzi tutto si è dimenticato il close #1 alla fine e in quel modo legge solo la prima riga, per leggere tutto il documento devi fare:
Codice sorgente - presumibilmente VB.NET

  1. Dim testo as string
  2. open "Percorso\file.txt" for input as #1
  3. testo = input(Lof(1), #1)
  4. close #1
  5. msgbox testo



:k:

PM Quote
Avatar
alex_purple (Normal User)
Newbie


Messaggi: 5
Iscritto: 08/10/2008

Segnala al moderatore
Postato alle 17:31
Mercoledì, 08/10/2008
Input past end of file...
è il messaggio che mi compare quando ha riportare il tuo codice...sai gentilmente dirmi qualcosa in più?Thanks

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 18:41
Mercoledì, 08/10/2008
Quant'è grosso il file?
cosa c'è scritto dentro(se si può rendere pubblico)?

PM Quote
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 19:17
Mercoledì, 08/10/2008
Postato originariamente da GrG:

Il problemaa è ke Fabio ha sbagliato alcune cose...
innanzi tutto si è dimenticato il close #1 alla fine e in quel modo legge solo la prima riga, per leggere tutto il documento devi fare:


scusa :rotfl:

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 19:49
Mercoledì, 08/10/2008
@Fabio nn ti preoccupare :k:

@Alex:

Posta un progetto di esempio dove avviene il problema, vedrò di correggerlo...

Ultima modifica effettuata da GrG il 08/10/2008 alle 19:50
PM Quote
Pagine: [ 1 2 ] Precedente | Prossimo