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 - Come rimuovere un carattere speciale da un file di testo
Forum - Visual Basic 6 - Come rimuovere un carattere speciale da un file di testo

Avatar
symonx80 (Normal User)
Pro


Messaggi: 107
Iscritto: 30/07/2009

Segnala al moderatore
Postato alle 15:31
Mercoledì, 22/02/2012
Ciao devo lavorare un file di testo mettendo su un'unica riga tutto il suo contenuto.
Lavoro il file

Codice sorgente - presumibilmente VB.NET
  1. Open gblFileSelezionatoTemp For Input As #3
  2.     Do While Not EOF(3)
  3.         Line Input #3, rigaXml
  4.        
  5.         fileCom = fileCom & rigaXml
  6.    
  7.     Loop
  8.     Close #3


ma la prima riga termina con un carattere di ritorno a capo(presumo) che è il seguente  []
Infatti se apro il file dopo averlo lavorato trovo la prima riga e la seconda contenente tutte le restanti righe del file in successione.
Come posso risolvere questo problema?
ho provato con

Codice sorgente - presumibilmente VB.NET
  1. Open gblFileSelezionatoTemp For Input As #3
  2.     Do While Not EOF(3)
  3.         Line Input #3, rigaXml
  4.        
  5.         temp = rigaXml
  6.        
  7.         temp = Trim(Replace$(temp, vbCrLf, ""))
  8.         fileCom = fileCom & temp
  9.    
  10.     Loop
  11.     Close #3


ma il problema c'è ancora.
Spero di essere stato chiaro.
Grazie  a chiunque prova a darmi una mano.
Ciao

PM
Avatar
poeo85 (Normal User)
Pro


Messaggi: 104
Iscritto: 27/01/2010

Up
0
Down
V
Segnala al moderatore
Postato alle 11:47
Martedì, 28/02/2012
occhio alla codifica del file se unicode o ascii e a chi lo deve interpretare

PM
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Up
0
Down
V
Segnala al moderatore
Postato alle 12:39
Martedì, 28/02/2012
purtroppo visual basic 6 non mi funziona quindi non posso provare, però mi ricordo che in alcuni programmi avevo il tuo stesso problema e risolvevo mediante il replace

Teoricamente i "quadrati" [] dovrebbero essere due, uno è il carattere di ritorno e uno il carattere della nuova linea (almeno credo). Quindi devi sostituire tutti e due.. solo che non mi ricordo qual'era il loro numero corrispondente..

devi verificare tu a che numero corrisponde usando le msgbox, magari aggiungiti un command button temporaneo che prende carattere per carattere (del testo inserito nella textbox) e mostra il numero corrispondente con Asc()

Poi quando troverai i due numeri ad esempio 13 e 14 usa:
replace(testo, Chr(13), "")
replace(testo, Chr(14), "")

PM