Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Matching Code
Message
De
30/03/2021 17:51:16
Mike Yearwood
Toronto, Ontario, Canada
 
 
À
30/03/2021 10:14:54
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
01679350
Message ID:
01679372
Vues:
50
>Greetings all,
>
>I am running a validation code that checks user name text box value to see if it matches their double-entry value. The text boxes are on Page 1 of 3 pageframe. Screen syntax goes as:
>
>Step 2. Enter your User Name , step 2a. Re-enter your user name
>
>The Validation button sits on page 3 of the pageframe. Here's the validation code:
>Do Case
> CASE ALLTRIM(This.parent.parent.Page1.txt_UserName1.Value) NOT EQUAL TO ALLTRIM(This.parent.parent.Page1.txt_UserName2.Value)
>...notify user that the entries do not match
> EndCase
>
>Testing scenario: When I enter a user name is UserName1 text box, and leave Username2 textbox empty, the validation code DOES NOT fire off. I have tried use both NOT EQUAL TO operator(s)
>
>Any ideas ?

It is slower to operate with objects than memvars.
LOCAL lcUser1, lcUser2
lcUser1=This.parent.parent.Page1.txt_UserName1.Value
lcUser2=This.parent.parent.Page1.txt_UserName2.Value
IF not ALLTRIM(m.lcUser1)==ALLTRIM(m.lcUser2)
*It's not exact.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform