Newsgroup: it.comp.appl.access
Titolo: [Forse OT] Creazione Txt da tabella

Come da oggetto, creo da tabella un file *.txt con la procedura
sottostante :
Open "C:\FILECOOP.txt" For Output As #1
Dim rs As Recordset, X As Integer, Y As Integer
Set rs = CurrentDb.OpenRecordset("FileTXT")
Y = 0
    rs.MoveFirst
Do Until rs.EOF
    For X = 0 To rs.Fields.Count - 1
    Print #1, rs.Fields(X) & IIf(X = rs.Fields.Count - 1, "", ";");
    Next
    rs.MoveNext
    Print #1, Chr(13)
    Y = Y + 1
Loop
    Print #1, "TOTALE=" & Y
Close #1
Set rs = Nothing
La tabella è composta da 3 campi (CF;INIZIO;FINE)
Praticamente il file txt viene creato correttamente rispettando il
tracciato record impostomi con un record per riga e i separatori ";" dopo
ogni contenuto di campo tranne l'ultimo.
Es.
XXXYYY07X56X888Y;01/01/2005;05/05/2005
AAAYYY07X56X999B;02/01/2005
XXXYYY07X56X888Y;18/01/2005;30/03/2005
Il problema è questo :
Finchè mi limito a creare il file e a visualizzarlo con il NOTEPAD, tutto
Ok. Ma se solo faccio File/Salva o lo modifico a mano e poi salvo le
modifiche, la formattazione data va a farsi friggere, affiancando tutte le
righe l'una accanto all'altra creando un testo unico.
Secondo voi è questione di codice, di notepad o di cos'altro?
PS Ovviamente me lo fa su tutti i PC.
-- 
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Pablitomf ha scritto:








Penso che il problema sia il Print #1 al posto del Write #1...
il Write a differenza del Print però, usa virgolettare i contenuti di
campo e mettere la "," come separatore... 
quindi il Write #1, rs.Fields(X) & IIf(X = rs.Fields.Count - 1, "", ";");
mi darebbe un risultato del genere (utilizzando Write #1, Chr(13) +
Chr(10)per andare a capo con la riga):
"BBTLSE84P47L219X;","08/11/2004;","22/01/2005","
"
"BJRLHM74B26Z227O;","08/11/2004;","03/02/2005","
"
Non ho mai approfondito l'argomento... un aiuto per ottenere il risultato
giusto non modificabile in visualizzazione con un semplice salva, tranne
che con un intervento forzato manuale?


 ha scritto nel messaggio news:d3lad9$bk7$1...@news.newsland.it...

Prova ad utilizzare l'istruzione Write che come recita l'help:
'----------
A differenza dell'istruzione Print #, l'istruzione Write # inserisce virgole tra gli elementi e racchiude le stringhe tra virgolette 
mentre vengono scritte nel file. Non è necessario inserire nell'elenco delimitatori espliciti. Write # inserisce un carattere di 
nuova riga, ovvero una sequenza ritorno a capo-avanzamento riga (Chr(13) + Chr(10)), dopo aver scritto nel file l'ultimo carattere 
dell'argomento elencooutput.
'----------
Ciao.
-- 
Sergio MAZZA 


E, utilizzando Print, aggiungendo alla fine della riga i Chr(13) + Chr(10)?
Ciao.
-- 
Sergio MAZZA 

 Ciao.
Mi fa il doppio a-capo... ho provato a visualizzare da dos (ok), ma
editandolo sempre da dos, ho notato che al posto dell'a-capo (enter), il
dos interpreta il Chr(13) con un simbolo (nota musicale)... mai visto.


 dos interpreta il Chr(13) con un simbolo (nota musicale)... mai visto.
Risolto cosě per l'a-capo (che fa poi mantenere la formattazione anche
salvando e editando da dos) : Print #1, ""
Non vuole alcun chr(xx)
-- 
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno



Uč cosa fai... ti fai le domande e poi ti rispondi da solo?
Ciao
MArio 

 Uè cosa fai... ti fai le domande e poi ti rispondi da solo?
Se ci riesco si, sempre. Faccio come Marzullo... l'importante è risolvere.
-- 
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno


 ha scritto nel messaggio 
news:d3lad9$bk7$1...@news.newsland.it...

E' sicuramente la codifica del carattere di a capo.
Ho dei problemi analoghi quando apro e salvo con notepad file php o bat.
Ho risolto il problema utilizzando l'editor di dreamweaver, ma ricercando 
sul web esistono editor specifici freeware che al salvataggio non danno 
questri problemi. Uno è il vecchio editor del dos.
vtt 

Pablitomf ha scritto:





Ti basta sostituire il Chr(13) con un vbcrlf. Non tutti gli editor (sotto
windows) gestiscono correttamente il Chr(13) da solo.
Namor
-- 
namor at inwind punto it
