Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Low level
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Low level
Divers
Thread ID:
00598182
Message ID:
00598182
Vues:
52
Hello All,
I'm getting some pretty weird behavior from my code and I hope someone out there will see what I'm missing.
Everything in this code I have checked from the command window and it all works fine. But within the application, it all fails

=adir(my)
For fcounter = 1 to alen(my) / 5
l_status = .t.
l_process = .f.
thisfile = my(fcounter,1)
wait wind 'Checking file ' + thisfile nowait
*the tt here returns a positve number
tt = fopen(thisfile)
If tt < 0
Repl probs.desc with 'Unable to open file for checking'
l_status = .f.
=fclose(tt)
Loop
Endif

=fseek(tt,0)
Do while not feof(tt)

**Hereis the problem
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform