DOCUMENT:Q191175 11-DEC-1999 [foxpro] TITLE :HOWTO: Store Multiple Dates from the MonthView Control PRODUCT :Microsoft FoxPro PROD/VER:WINDOWS:6.0 OPER/SYS: KEYWORDS: ====================================================================== ------------------------------------------------------------------------------- The information in this article applies to: - Microsoft Visual FoxPro for Windows, version 6.0 ------------------------------------------------------------------------------- SUMMARY ======= The MonthView control, Mscomct2.ocx, allows users to select a range of dates. This article shows how to store selected dates to a table. MORE INFORMATION ================ Before starting, make sure that the MonthView control is available to you in the form designer. To do this, from the Tools menu, choose Options. Click the Controls tab and select the Microsoft MonthView Control, Version 6.0 from the list of ActiveX controls. Steps to Create Sample Form --------------------------- 1. Create a new form. 2. Select ActiveX Controls from the Form Controls toolbar, and place a Microsoft MonthView control on the form. 3. Right-click the control and select MonthView Properties. Select the MultiSelect property on the General tab. Change the MaxSelCount property to 31 and then click OK. 4. Change the Name property of the MonthView control to oMView. 5. Select Standard Controls from the Form Controls toolbar and add a Command button to the form. Place the following code in the Click event of the Command button: LOCAL dStart, dEnd, nSeldDays, nLoop CREATE CURSOR SEL_DAYS(Dates d) WITH THISFORM dStart = TTOD(.oMView.SELSTART) dEnd = TTOD(.oMView.SelEnd) nSeldDays = dEnd - dStart FOR nLoop = 0 TO nSeldDays INSERT INTO SEL_DAYS (Dates) VALUES((dStart + nLoop)) NEXT nLoop GO TOP BROWSE NORMAL USE ENDWITH 6. Save and run the form. 7. Click a date on the MonthView control. Next, hold down the SHIFT key and click a later date. Note that the range between the two is highlighted. 8. Click the Command button and note that the dates selected have been stored to the cursor. Additional query words: kbVFp600 kbActiveX ====================================================================== Keywords : Technology : kbVFPsearch kbAudDeveloper kbVFP600 Version : WINDOWS:6.0 Issue type : kbhowto ============================================================================= THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY. Copyright Microsoft Corporation 1999.