Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Fill mygrid
Message
 
À
14/01/2005 18:12:39
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
00977370
Message ID:
00977453
Vues:
42
Mohhamed if I don't know the structure of Table1 I can't help You. May be something like this:
thisform.Grid1.RecordSource = NULL
SELECT * FROM TABLE1 WHERE mac1=thisform.text1.value .AND. Table1.nMonth == 1 ORDER BY Table1.nDay INTO CURSOR grdCursor READWRITE
mntLastDay = DATE(grdCursor.nYear, grdCursor.nMonth, 1)
mntLastDay = (GOMONTH(mntLastDay,1) - mntLastDay)
SELECT grdCursor
FOR nDay = grdCursor.nDay+1 TO mntLastDay
    INSERT INTO grdCursor (nDay) VALUES (nDay)
NEXT
thisform.Grid1.RecordSource = "grdCursor"
thisform.Grid1.Refresh()
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