Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Scan ... endscan not working properly
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00411108
Message ID:
00411311
Vues:
12
Hi Nick,

If the two fields are mutually exclusive, why are you using two fields?

>When I am going though the following code, my scan...endscan only seems to loop through once. I have over 200 records and my table is a free table. Anyone have a clue what is going on?
>
>
>With thisform
>local r
>use trial
>go top
>scan
> r = recno()
> if trial.min_sex = 'F'
> update trial set min_f = .t. where recno() = r
> update trial set min_m = .f. where recno() = r
> endif
> if trial.min_sex = 'M'
> update trial set min_f = .t. where recno() = r
> update trial set min_m = .f. where recno() = r
> endif
>
>endscan
>endwith
>
>
>Thanks Nick
kenweber
GCom2 Solutions
Microsoft Certified Professional

Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform