Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Many operations at one textbox
Message
De
24/02/2006 23:07:54
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Many operations at one textbox
Versions des environnements
Visual FoxPro:
VFP 9
Database:
Visual FoxPro
Divers
Thread ID:
01099140
Message ID:
01099140
Vues:
47
hi all,
any idea, help

as wizard but not via wizard.

i need to make addnew record,edit record,delete record,query and report

at one form via 5 commands,

is there away to put all code at thisform.text1.value ,

this code under for add new via command1 button
m.storeid=thisform.text1.Value
m.description=thisform.text2.Value
LOCATE FOR m.storeid=store.storeid

IF FOUND() OR m.storeid=SPACE(10)
         =MESSAGEBOX("FOUND/ YOU MUST FILL ")
thisform.text1.setfocus
ELSE

APPEND BLANK 
GATHER memvar 

 for each oCtl in THISForm.Controls
      if lower(oCtl.BaseClass) = "textbox"
                    oCtl.Value = ''
      endif
endfor
ENDIF
thisform.refresh
thanks.
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform