per scrivere basta fare una select sulla tabella e scrivere in un file i dati "normalizzandoli" alla lunghezza dei singoli campi.
per esempio, supponiamo che ogni record sia formato da 3 campi di testo ciascuno lungo max 10 caratteri, messi tutti assieme formano un unico campo testo lungo 30 caratteri.
Ti creerai una stringa di testo lunga 30 per mettere i valori di ogni singolo record e poi la scriverai sul file
ovviamente per ogni campo del recordset devi usare la funzione di padding (RPAD, non ricordo, cerca nella documentazione) per far si che ogni campo sia sempre lungo il max dei valori per rispettare il tracciato record della tabella)codice:Dim MioRec as string*30 while not Recordset.Eof MioRec = Recordset.Campo1 & recordset.Campo2 & recordset.campo3 Print NumeroFile, MioRec Recordset.Movenext wend
dopo, per rileggere dal file, ti crei una struttura che contanga 3 proprietà stringa lunga ciascuna 10 (sempre in base a questo esempio) e la associerai ad ogni riga letta dal file (che risulterà a lunghezza fissa)
e ti fai la insert nella nuova tabella.
Spero di essere stato chiaro, a volte cercando di semplificare i tecniciscmi si finisce per dire cose che sembrano senza senso
![]()


Rispondi quotando