Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
LOOP IN 'FOR.. ENDFOR' problem
Message
 
 
À
27/10/2004 09:58:05
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 6
OS:
Windows XP
Database:
Visual FoxPro
Divers
Thread ID:
00954844
Message ID:
00954853
Vues:
20
I would rearange code as follows and try.
select mytable
for i=1 to 10
	DO CASE
	CASE NOT seek(i,'mytable','id')
		messagebox('ID '+allt(str(i))+' Not Found!',0+16)
	CASE mytable.status='C'
		messagebox('The operation will ignore from tube ID '+allt(str(i)))
	OTHERWISE
		insert into mycursor value(i)
	ENDCASE
endfor
>I have the following code:
>
>select mytable
>for i=1 to 10
>if seek (i,'mytable','id')=.f.
>messagebox('ID '+allt(str(i))+' Not Found!',0+16)
>return
>endif
>if mytable.status='C'
>messagebox('The operation will ignore from tube ID '+allt(str(i)))
>loop
>endif
>insert into mycursor value(i)
>
>The problem is that the code ignore from my 'Loop' (the id inserted even mytable.status='C')
>Who can help me?
--sb--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform