Discussion :

[khroutchev]

Voilà, tout est dans l'intitulé du problème. Ce message apparaît lorsque je souhaite exporter la requête en fichier texte.

Le fichier fait 1240291 lignes et compte 11 colonnes.
Plusieurs opérations dessus (notamment un calcul entre deux dates)
Version d'acces : 2003.

Merci d'avance

[marot_r]

Vu le volume je pense qu'il va falloir le faire à la main.

Quel type de fichier texte produis-tu ? CSV, Fixe ?

Voici un squelette de programme qui fait cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
private sub ExporterDonnees()
    dim db as dao.database:set db=currentdb
 
    dim f as dao.field
 
    dim numFic as long:numFic=freefile()
    dim nomFic as string:nomFic="C:\Toto\Titi.txt"
    open nomFic for output as numfic    
 
    dim r as dao.recordset:set r=db.openrecordset("TaRequete")
 
    'Exporte la liste des champs
    for each f in r.fields
        print #numFic, f.name ;
    next f
 
    print #numFic 'clos la ligne en cours et passe à la suivante
 
    do while not r.eof
 
        for each f in r.fields
            print #numfic, f;
        next f
 
        print #numFic 'clos la ligne en cours et passe à la suivante
 
        r.movenext
    loop
 
    r.close:set r=nothing
    close numfic
    db.close:set db=nothing
end sub

A+

[khroutchev]

J'ai opté pour une solution "batarde", en traitant mon fichier en deux parties.
Je l'ai regroupé sous DOS avec copy fichier1.txt + fichier2.txt fichierfinal.txt.

Merci tout de même, je garde ce code de côté au cas ou !