Ecriture dans un fichier ascii plus de 32767 lignes

Résolu
pasbrun Messages postés 11 Date d'inscription dimanche 1 août 2004 Statut Membre Dernière intervention 10 mars 2006 - 1 févr. 2006 à 10:50
jrivet Messages postés 7393 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 - 1 févr. 2006 à 11:05
Bonjour,

Je suis entrain de faire du traitement de bdd en OLEDB, j'aimerais exporter mes données en fichier ascii avec délimiteur.
Pas de probleme pour l'exportation en fichier ascii, mais à partir de la 32767 lignes j'ai une erreur overflow[javascript:Insert_Emoticon('/imgs2/smile_shock.gif'); ] impossible d'ecrire plus de 32767 lignes.
Comment faire pour depasser cette limite ?[javascript:Insert_Emoticon('/imgs2/smile_question.gif'); ]

Même en fermant le fichier puis je l'ouvre en append l'erreur arrive egalement.
L'ouverture du fichier se fait par la commande open for output, j'ecris dedans avec print #.

Merci pour votre aide.

pasbrun

3 réponses

cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 18
1 févr. 2006 à 11:04
Salut,

L'erreur ne vient pas d'une limitation de la taille du fichier texte, pour t'en convaincre, essaie ça :

Dim i As Long
Open "c:\temp\toto.txt" For Append As #1
For i = 1 To 100000
Print #1, "toto"
Next
Close #1

Tu dois avoir une variable déclarée en Integer au lieu de Long (si c'est du vb6).

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
3
jrivet Messages postés 7393 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
1 févr. 2006 à 11:04
Salut,

N aurais tu pas une variable de type INTEGER, variable qui ne peut pas prendre de valeurs superieure a 32767...

Si c est le cas passe cette variable de INTEGER a LONG

@+
Julien
3
jrivet Messages postés 7393 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
1 févr. 2006 à 11:05
ZUT!!!!!!

Encore une fois : PAS ASSEZ RAPIDE PETIT SCARABEE :)
0