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
codice:
Dim MioRec as string*30
while not Recordset.Eof
MioRec = Recordset.Campo1 & recordset.Campo2 & recordset.campo3
Print NumeroFile, MioRec
Recordset.Movenext
wend
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)
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
