adalton11 Posted April 21, 2004 Posted April 21, 2004 I have a program that is pulling names of Reports, that users print out on a daily bases from an access database. Basically, I have the Report Names in a combo box, what i want to happen is: when the user selects the report they want, the program searches through all the reports in a certain directory and retrieves the dates of all reports (which i have working) but i want the dates that are found to be Bolded in the default monthcalendar. Is there an easy way to do this? Thanks, Anthony Quote
adalton11 Posted April 21, 2004 Author Posted April 21, 2004 Ok I guess my real question is this, How do i turn 4/1/2004 into calCal.BoldedDates = New Date() {New Date(2004, 4, 1, 0, 0, 0, 0)} Quote
*Experts* Bucky Posted April 21, 2004 *Experts* Posted April 21, 2004 [mshelp=ms-help://MS.MSDNQTR.2003FEB.1033/cpref/html/frlrfSystemDateTimeClassParseTopic.htm]DateTime.Parse()[/mshelp] calCal.BoldedDates = New Date() {Date.Parse("4/1/2004")} Quote "Being grown up isn't half as fun as growing up These are the best days of our lives" -The Ataris, In This Diary
adalton11 Posted April 21, 2004 Author Posted April 21, 2004 (edited) Multiple dates from file?? I was thinking about something else now...I have the dates for every file, but how do i have calCal.BoldedDates = New Date() {Date.Parse("4/2/2004")} that, reflect 40 dates? The bold has to happen all in one New Date Call correct? Would it be foolish to read all the dates in like so? dim alldates as string For Each File In Directory.GetFiles("\\hercules\IDSSPFLR\DayEnd\" & Report & "\") FI = New FileInfo(File) alldates += "New Date() {Date.Parse(" alldates += fi.CreationTime alldates += ")" Next and then calCal.BoldedDates = alldates I know it'll probably not work but i am desperate. Thanks I tried to follow your links but they didn't work. Edited April 21, 2004 by adalton11 Quote
*Experts* Bucky Posted April 22, 2004 *Experts* Posted April 22, 2004 How about the calCalAddBoldedDate() (and RemoveBoldedDate) method? :) Stick that in your loop and you're good to go. It looks like the MSDN help links aren't working properly... sorry about that. Quote "Being grown up isn't half as fun as growing up These are the best days of our lives" -The Ataris, In This Diary
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.