🚀 go-pugleaf

Ciao, Danilo!
hai scritto 2004121806270312947@mynewsgate.net
Sat, 18 Dec 2004 06:27:03 GMT:

 > Ciao ragazzi ho un piccolissimo problema. Il seguente pezzetto di  codice crea un file di testo con un record:

 > OPEN "test.txt" FOR OUTPUT AS #1
 > PRINT #1, "1234567890"
 > CLOSE #1

 > Il problema � che siccome viene aggiunto automaticamente in ogni  record il terminatore di riga CR+LF la lunghezza di ogni
 > record non  risulta essere 10 byte ma 12 byte.
 > E' possibile in qualche modo ottenere lo stesso file di testo senza  che si aggiungano in automatico i terminatori di riga ?


 > --
 > Danilo Bartoli


Parli di record ma apri il file per accesso sequenziale
sei libero di farlo ci mancherebbe, ma leggo anche
di lunghezza del record e allora devi cambiare per forza accesso!
Hai sbagliato metodo!
Devi usare la modalit� casuale, puo' risultare restrittivo per i
dati che memorizzi, ma flessibilissimo per una gestione di un database
fatto in casa(mi verrebbe da scrivere altro che ...., ma mi astengo).

nel modulo.bas
definisci il record

public type mioRecord ' crea la definizione del record
strDati    as string * 10 'definisci il campo
'lData      as long ' si potrebbero definire piu' tipi di campi
end type

nella tua routine

open nomefile for random as numerofreefile len= len(mioRecord)

mioRecord.strDati="1234567890" 'i tuoi dati
posRecord=1 'il record che scrivi o modifichi, puo' essere omesso

put numeroFreeFile, posRecord, mioRecord

close numeroFreeFile


p.s.
Nella definizione delle stringhe all'interno dei
record va predeterminata la lunghezza
appunto con _as string * 10_, il numero di caratteri.


Cordialita', ~Incoming.