[AC-2003] Exporter un état formaté en TXT

[Francois Arnaud]

"Bonjour"
J'ai un état que je souhaite exporter en .TXT. Si j'utilise la fonction Exporter d'Access 2003 il me produit un état TXT qui intercale des lignes blanches inopinément.
Par ailleurs, j'aimerais pouvoir maîtriser la largeur des colonnes de l'état TXT.
Comment faire pour paramétrer le format du doc TXT depuis Access ?

"Merci"

[marot_r]

L'export de rapport en mode texte se base sur le driver de l'imprimante (probablement générique texte) et ne génère généralement pas grand chose d'utilisable

Si tu veux exporter des données utilise l'exportation de requête ou de table. Tu n'auras pas d'entête de page et autres mais auras plus de contrôle sur le format du fichier généré.

Accessoirement pourquoi fais-tu un export texte d'un état ? il y a peut-être d'autres méthodes pour satisfaire ton besoin.

A+

[Francois Arnaud]

J'ai besoin de générer un fichier TXT car l'utilisateur final du document requiert un fichier TXT calibré au caractère près de manière impérative.
D'où mon problème, bien sûr !
Merci quoi qu'il en soit.

[marot_r]

Je m'y attendais un peu :-).

Comme je l'ai dit précédement tu peux probablement exporter une requête ou une table plutôt qu'un état.

Mais pour en être certain, peux-tu donner quelques détails de plus, même sommaire, sur la structure attendue ?

Sinon tu peux aussi écrire un petit bout de code VBA qui va te créer le fichier texte de tes rèves. C'est assez simple et tu as un contrôle total sur le format et le positionnement des données. Je préfère cette méthode car l'exportation de table ou requête a tendance à en faire un peu à sa tête.

A+

[Francois Arnaud]

Bonsoir,

En effet, l'état que je cherche à produire est destiné à une banque et la position de chaque caractère sur le fichier txt se doit d'être rigoureuse, je suis donc preneur d'un bout de code VBA mais j'avoue par ailleurs que je n'en fais pas tous les jours et que je souhaiterais avoir une méthode pour ce faire.
Si tu as, je suis preneur, merci d'avance.

[marot_r]

As-tu un seul type d'enregistrement dans ton fichier texte ou plusieurs types ?

Exemple de fichier à plusieurs types :

Entete
Detail1, Valeur1
TotalGeneral

exemple de programme créant ce fichier

Code :

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
dim numFic as integer:numFic=freefile()
dim nomFic as string:nomFic="C:\TonChemin\TonFichier.txt"
 
open nomFic as #numFic for output
 
dim db as dao.database:set db=currentdb
 
 
print #numFic,"Entete"
 
dim total as double
 
dim r as dao.recordset:set r=db.openRecordset("TaSource")
 
do while not r.eof
   print #numfic, r![Detail];" "; r![Valeur]
   total=total+r![valeur]
   r.movenext
loop
 
print #numFic,Total
r.close:set r=nothing
set db=nothing
 
close #numFic

quand tu fais le print #numFic tu peux utiliser la commande Format() pour mettre tes données au format désirer. Tu peux aussi utiliser Space$() pour ajouter des espaces. Len() est très utile aussi.

A+