Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Fill mygrid
Message
 
To
14/01/2005 18:12:39
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00977370
Message ID:
00977453
Views:
43
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.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform