Où est l?erreur ?Résolu

Question

salut, j'ai besoin de votre aide

jai lerreur suivante : fichier deja ouvert je ne comprend pas !
Open chemin1 For Output As #f
Open chemin2 For Input As #ff
          While Not EOF(ff)
        Line Input #ff, sLigne
            b = Right$(sLigne, 59)
           Print #f, "[REPORT] "
          Print #f, "[c0 : " + b "]"
          Print #f, "[END]"
          Wend
  Close #ff
 Close #f

merci d'avance

PCPT · Accepted Answer

salut,

pronostiques....

f et ff sont bien déclarées en integer mais :
soit elles ne sont pas initialisées, donc toutes les 2 à 0
soit tu fais bien f=freefile et ff=freefile, mais comme tu n'ouvres pas le premier fichier avant d'attribuer le 2e freeefile, le retour de fonction est la même valeur pour les 2

donc :
f=freefile
Open chemin1 For Output As #f
ff=freefile
Open chemin2 For Input As #ff

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

nada2008 · Answer

merciiiiiiii bcq mon probleme est reglé 

merci
merci

PCPT · Answer

Où est l?erreur ?

3 réponses

Votre réponse