Discussion :

[Mymi]

Bonjour,

Suite à cette discussion, j'ai la même chose à faire, i.e. d'importer les données d'un fichier csv et mettre les données dans une table access.

J'ai adapter le code de jean-pierre96 à ma situation (je travaille avec adodb). Ça fonctionne mais c'est extrêmement long. J'ai un fichier d'un peu plus de 17 000 entrées et après 15 minutes il n'a toujours pas fini (je ne me suis jamais rendu au bout).

N'y aurtait-il pas un moyen plus efficace en temps pour faire ce transfert? J'ai essayé le "DoCmd.TransferText" dans access (XP) et c'est pratiquement instantané pour le même fichier csv. Il n'y aurait pas un équivalent dans VB6?

Merci!

[Phifi]

Ça fonctionne mais c'est extrêmement long. J'ai un fichier d'un peu plus de 17 000 entrées et après 15 minutes il n'a toujours pas fini

F1 sur BeginTrans ou CommitTrans : tu verras, c'est surprenant le temps gagné sur une écriture de masse.

La méthode est simple :
- Avant ton premier enregistrement dans la table, tu ouvres une transaction (BeginTrans).
- A chaque nouvel enregistrement, tu incrémentes un compteur (i).
- A une value de i donnée (ex : If i mod 500 = 0 Then -> tous les 500 enregistrements, mais à toi d'optimiser ce chiffre), tu valides la transaction (CommiTrans). Tu peux gagner 90% du temps de traitement !

[Mymi]

Merci Phifi!

Je gagne effectivement beaucoup de temps. À l'oeil c'est entre 1 et 2 minutes maintenant. Je trouve ça parfaitement acceptable.

Merci encore!