Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Append
Message
 
À
24/08/2005 09:13:03
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Re: Append
Versions des environnements
Visual FoxPro:
VFP 8
Database:
Visual FoxPro
Divers
Thread ID:
01043264
Message ID:
01043275
Vues:
7
You can do this that way:
myNewNo = thisform.text1.valie

Select course.coursenumb, course.coursename, ;
       table2.g1, table2.g2, table2.wm1, table2.g3, table2.tot1, ;
       table2.chr1, table2.g4, table2.g5, table2.wm1, table2.g6, table2.tot2, table2.ltot, table2.chr2, ;
       myNewNo AS No;
  from Course ;
  inner join TABLE2 on table2.no = course.no ;
  into cursor csrCourseStats

Thisform.Grid1.RecordSource = "csrCourseStats"

LOCAL lbFlUsed
IF NOT USED("Stud")
   USE Stud IN 0
   lbFlUsed = .t.
ENDIF
SELECT Stud
APPEND FROM (DBF("csrCourseStats"))
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform