calendar in Access

[apartain]

Has anyone ever created a shared calendar within Access? It would be similar to MS Outlook, but clearly not as in-depth. I would need to use it for employees to enter their availability so managers can assign projects accordingly. As well, it would be nice if it actually LOOKED like a calendar.

Do you recommend the ActiveX Calendar Control?

[nico5038]

Why create this with Access ?
Personally I would look into web based solutions like the Yahoo agenda so every employee with an internet browser can have access to the calendar....

Nic;o)

[ADezii]

Has anyone ever created a shared calendar within Access? It would be similar to MS Outlook, but clearly not as in-depth. I would need to use it for employees to enter their availability so managers can assign projects accordingly. As well, it would be nice if it actually LOOKED like a calendar.

Do you recommend the ActiveX Calendar Control?

If you are interested, I have a fully functional Calendar created entirely within Access via 1 Table, 2 Forms, 1 Class, and 1 Standard Code Module. It was used as a simple Appointment Calendar for a certain Unit within the Philadelphia Fire Department. It is quite simplistic and easily adaptable. Let me know if you are interested.

[apartain]

If you are interested, I have a fully functional Calendar created entirely within Access via 1 Table, 2 Forms, 1 Class, and 1 Standard Code Module. It was used as a simple Appointment Calendar for a certain Unit within the Philadelphia Fire Department. It is quite simplistic and easily adaptable. Let me know if you are interested.

I am absolutely interested. Thank you so much.

[apartain]

Why create this with Access ?
Personally I would look into web based solutions like the Yahoo agenda so every employee with an internet browser can have access to the calendar....

Nic;o)

This is a very interesting database. The users would love to have the calendar in the same database as their projects and employee time for cross-reference. They also need to be able to input availabilty so projects can be assigned accordingly. I'm with you, why not use Outlook or something, but they asked me to try.
Thanks as always for your helpful responses. You are very appreciated.

[nico5038]

Hmm, your comment triggered for me the thought to incorporate a Webbrowser in a page and have that pointing to the Yahoo (or other) web calendar :-)

Main question is or all people that need to enter their availability do have access to your .mdb.
For most of these systems I know the users are on a distance and have no access to the .mdb.

Nic;o)

[apartain]

Hmm, your comment triggered for me the thought to incorporate a Webbrowser in a page and have that pointing to the Yahoo (or other) web calendar :-)

Main question is or all people that need to enter their availability do have access to your .mdb.
For most of these systems I know the users are on a distance and have no access to the .mdb.

Nic;o)

Yes, the are on an inter-office network so they all have access to the database. They also have a vpn, which concerns me because I'm not sure how the database will operate with all that traffic.

They use Outlook now, but want it in the database. If I can't figure it out, they'll just have to continue using Outlook. If I can, they'll think I'm really smart. hehe

Not really, I'll give credit where due.

At the very least, I can create a simple table and sort it by date and they can look at it that way.

By the way, I don't know VBA code very well, so if you were to be kind enough to help me out, could you please give specific instructions?

Thanks,
ang

[ADezii]

I am absolutely interested. Thank you so much.

Give me your E-Maill address and I'll send it as a File Attachment.

[Noob]

Hi
I would also be interested in the calender file as im looking for a way to incorporate a courtesy car booking calendar into my database for a qiuck visual reference showing availability.Your calendar sounds perfect , if possible could you send me a copy too.

Many Thanks

Email address removed per site rules!
Cheer

[nico5038]

You might use automation to access the appointments from outlook, checkout:
http://support.microsoft.com/kb/209963/en-us
Thus the users don't have to learn new tricks :-)

Nc;o)

[ADezii]

Hi
I would also be interested in the calender file as im looking for a way to incorporate a courtesy car booking calendar into my database for a qiuck visual reference showing availability.Your calendar sounds perfect , if possible could you send me a copy too.

Many Thanks

Cheer

As soon as I get the OK from the original Creator of this Database, I'll send it to you.

[apartain]

Give me your E-Maill address and I'll send it as a File Attachment.

Thank you so much for this. I am also looking at the link you sent, but am not sure if I can do it or not.

[Only give email addresses by PM]

[eriktheviking]

If you are interested, I have a fully functional Calendar created entirely within Access via 1 Table, 2 Forms, 1 Class, and 1 Standard Code Module. It was used as a simple Appointment Calendar for a certain Unit within the Philadelphia Fire Department. It is quite simplistic and easily adaptable. Let me know if you are interested.

I'd very much like this calendar file too please. I'm trying to develop a booking system for a small after school club and am struggling with the calendar system in MS Access. Thanks.

[JamieHowarth0]

Hi folks,

Just to add my tuppence' worth, I've seen a good calendar sample here (from ASP101) which various individuals have taken, altered and tweaked to end up with a generic Access DB-powered calendar (which obviously you can then tweak to your specific requirements). It includes CSS for custom styling as well.

If you are after a fully shared calendar, I would advise looking at Google Calendar, because if you really want some kudos points from your bosses, there's a way that you can set up numerous calenders on the Google system, and because it supports iCalendar format as well as XML, you can create a direct link to Outlook so people can share the calendar directly in Outlook's interface (I think, but have never tried... but then I use Exchange Server so don't need a custom calendar app).

Best regards,

medicineworker

[CrostonScottish]

Saw this thread and instantly thought how useful it would be for a database we are developing for our education department to look at what rooms are booked and what staff are free to teach. If you don't mind i would love a copy to adapt.

Email address removed per site rules!

Cheers

[glamster7]

If its possibly could I have a copy of this as well. email addy is Email address removed per site rules!

[eriktheviking]

This is a great calendar, but something strange is happening with some of the dates. I've uploaded some screen-shots to http://s238.photobucket.com/albums/ff21/eriktheviking/ so you can see what I mean.

For example, the Calendar is showing that October 1 2007 was on a Wednesday (Oct07a.jpg) when it was actually on a Monday. The Events form shows it correctly (Oct07b.jpg).

November is correct on both the Calendar and the Events form (see Nov07a.jpg and Nov07b.jpg).

December is similar to November, with the Calendar showing 1 Dec 2007 on a Friday when it will really be on a Saturday (see Dec07a.jpg and Dec07b.jpg).

I have not modified the code at all and am completely stumped about what's going on. Any help much appreciated.

ADezii: I have PM'd you, but realise you must be very busy so I decided to post here too.

[ADezii]

This is a great calendar, but something strange is happening with some of the dates. I've uploaded some screen-shots to http://s238.photobucket.com/albums/ff21/eriktheviking/ so you can see what I mean.

For example, the Calendar is showing that October 1 2007 was on a Wednesday (Oct07a.jpg) when it was actually on a Monday. The Events form shows it correctly (Oct07b.jpg).

November is correct on both the Calendar and the Events form (see Nov07a.jpg and Nov07b.jpg).

December is similar to November, with the Calendar showing 1 Dec 2007 on a Friday when it will really be on a Saturday (see Dec07a.jpg and Dec07b.jpg).

I have not modified the code at all and am completely stumped about what's going on. Any help much appreciated.

ADezii: I have PM'd you, but realise you must be very busy so I decided to post here too.

eriktheviking, I am more stumped than you are, since I show none of these anomalies such as you describe. I have no reply right now, but I'll continue to look into it.

[eriktheviking]

eriktheviking, I am more stumped than you are, since I show none of these anomalies such as you describe. I have no reply right now, but I'll continue to look into it.

Ok, thanks ADezii. I look forward to hearing from you.

[martin DH]

Give me your E-Maill address and I'll send it as a File Attachment.

ADezii,
I would also be interested in a copy of this calendar if still available!

Email address removed per site rules!

Thanks.

[missinglinq]

Come on, people! Site rules forbid the posting of email addresses and they will be removed by the moderators!

If you need communication outside of the thread you need to use PMs. But remember, information shared via PMs is not available to other members/guests!

Linq ;0)>

[eriktheviking]

I would really like to use this calendar, but at the moment it is not aligning the days and dates correctly and I cannot work out how to make it right. I've tried the raw file on two computers, both with their timezone set to GMT, and it shows 1 December 2007 falling on a Friday, instead of Saturday; 1 January 2008 on a Tuesday, which is correct; 1 February 2008 on a Wednesday, instead of a Friday; 1 March on a Thursday instead of a Saturday; 1 April on a Friday, instead of a Tuesday......and so on. Grateful for any advice.

[ADezii]

I would really like to use this calendar, but at the moment it is not aligning the days and dates correctly and I cannot work out how to make it right. I've tried the raw file on two computers, both with their timezone set to GMT, and it shows 1 December 2007 falling on a Friday, instead of Saturday; 1 January 2008 on a Tuesday, which is correct; 1 February 2008 on a Wednesday, instead of a Friday; 1 March on a Thursday instead of a Saturday; 1 April on a Friday, instead of a Tuesday......and so on. Grateful for any advice.

Sorry Erik, but I do not know what to tell you, it works perfectly on all my PCs. It must be something to do with your System (Date/Time setings). Have you checked your Date/Time settings in Control Panel?

[eriktheviking]

Yes, the date and time settings on both the pcs I tried it on are fine (GMT Standard Time). I even tried it on my work pc and got the very same error!

[BradHodge]

Looks like a future Tip of the Week, huh ADezii? :)

Brad.

[ADezii]

Looks like a future Tip of the Week, huh ADezii? :)

Brad.

Sure, as soon as I find out what the problem is, and how I can relate a Topic to it (LOL).

[eriktheviking]

Hi, any progress with this?

I've found some other calendars here http://www.accessmvp.com/JConrad/acc...calendars.html, e.g http://www.access-programmers.co.uk/...9&d=1148031828. They all display the dates and days correctly, but are not as easy to use as yours.

[mshmyob]

Not that this helps but I have the same calendar aqnd it works just fine on two of my computers.

I would really like to use this calendar, but at the moment it is not aligning the days and dates correctly and I cannot work out how to make it right. I've tried the raw file on two computers, both with their timezone set to GMT, and it shows 1 December 2007 falling on a Friday, instead of Saturday; 1 January 2008 on a Tuesday, which is correct; 1 February 2008 on a Wednesday, instead of a Friday; 1 March on a Thursday instead of a Saturday; 1 April on a Friday, instead of a Tuesday......and so on. Grateful for any advice.

[ADezii]

Not that this helps but I have the same calendar aqnd it works just fine on two of my computers.

Thanks mshmyob, this is really driving me out of my mind. I can come to no other soluyion but to state that the problem with the Calendar as far as eriktheviking goes, must be PC specific. Specific to what - I don't know! (LOL).

[eriktheviking]

Thanks mshmyob, this is really driving me out of my mind. I can come to no other soluyion but to state that the problem with the Calendar as far as eriktheviking goes, must be PC specific. Specific to what - I don't know! (LOL).

If it's specific to my computers, then it's weird that I get the same result on my 4 home computers and 3 computers I've tried at my place of work!!! So it is specific and general then. LOL.

[mshmyob]

What timezone are you using. I saw that you said GMT but which GMT. Give us the exact timezone. What OS are you using?

If it's specific to my computers, then it's weird that I get the same result on my 4 home computers and 3 computers I've tried at my place of work!!! So it is specific and general then. LOL.

[eriktheviking]

(GMT) Greenwich Mean Time: Dublin, Edinburgh, Lisbon, London.

Windows XP.

[ADezii]

(GMT) Greenwich Mean Time: Dublin, Edinburgh, Lisbon, London.

Windows XP.

The only logical assumption is that the Time Zone may be the root of the problem. Shortly, I'll have another Version of the Calendar with several enhancements. As soon as it is finished, and I get the OK from the Author, I'll post it here for you to download and we'll see what happens. Stay tuned to this station. (LOL).

[eriktheviking]

As soon as it is finished, and I get the OK from the Author, I'll post it here for you to download and we'll see what happens. Stay tuned to this station. (LOL).

Thanks, ADezii. I eagerly await the post.

[ADezii]

Thanks, ADezii. I eagerly await the post.

I'm still waiting, should have it shortly. I mentioned your dilemma to the Original Author and he does 'not' thing that your Regional Settings are the cause of the anomaly. We are still working on it, please be patient.

[eriktheviking]

OK, thank you. I appreciate your help.

[ADezii]

OK, thank you. I appreciate your help.

This may not be the 'final' Version, but I wanted to give you something to work with:

[eriktheviking]

This may not be the 'final' Version, but I wanted to give you something to work with:

Thanks, but I still get the same error, see: Feb 2008 and March 2008.

and

Feb2008 and Mar2008

[ADezii]

Thanks, but I still get the same error, see: Feb 2008 and March 2008.

and

Feb2008 and Mar2008

I'll keep on trying, but I am really running out of options here. (LOL).

[ADezii]

Thanks, but I still get the same error, see: Feb 2008 and March 2008.

and

Feb2008 and Mar2008

Please keep the Graphic Links active, I've contacted the Author and requested he have a look at them. If he cannot get to the bottom of this, I don't know who can.

[MMcCarthy]

Just a thought ADezii. Could this have anything to do with the problem using European formatted dates in Access?

[ADezii]

Just a thought ADezii. Could this have anything to do with the problem using European formatted dates in Access?

Would the actual formatting cause the Dates to be out of sync? Don't really know at this juncture. Anyone I have ever known who has used this Calendar has never had this problem. The same Calendar in everyone's PC works correctly except for erikthevikinig's, who happens to be in the Greenwich Time Zone. The logical deduction, at least in my mind, is that it must have something to do with the Regional Settings or with the European Formatting of Dates as indicated by yourself. A real dilemma to say the least. The original Author, whom I know well, has not given up on this neither, it's just that we are both stumpped at this point.

[MMcCarthy]

Would the actual formatting cause the Dates to be out of sync? Don't really know at this juncture. Anyone I have ever known who has used this Calendar has never had this problem. The same Calendar in everyone's PC works correctly except for erikthevikinig's, who happens to be in the Greenwich Time Zone. The logical deduction, at least in my mind, is that it must have something to do with the Regional Settings or with the European Formatting of Dates as indicated by yourself. A real dilemma to say the least. The original Author, whom I know well, has not given up on this neither, it's just that we are both stumpped at this point.

Unfortunately, Access is unpredictable with these date issues when regional settings are to European date format. Sometimes they work and sometimes they don't. Imposing a format helps.

Check out Ade's tutorial on the subject.

Literal DateTimes and Their Delimiters (#)

[ADezii]

Unfortunately, Access is unpredictable with these date issues when regional settings are to European date format. Sometimes they work and sometimes they don't. Imposing a format helps.

Check out Ade's tutorial on the subject.

Literal DateTimes and Their Delimiters (#)

Hello Mary, if you get a few minutes could you possibly download Calendar.zip contained in Post #37. Perhaps you can see something in the coding that may be causing this anomaly, something I missed. Thanks.

[MMcCarthy]

OK the problem is in the date format.

Looking at the following code...

Private Sub PopulateCalendar()
On Error GoTo Err_PopulateCalendar
 
Dim strFirstOfMonth As String, bytFirstWeekdayOfMonth As Byte, bytBlockCounter As Byte
Dim bytBlockDayOfMonth As Byte, lngBlockDate As Long, ctlDayBlock As Control
Dim bytDaysInMonth As Byte, bytEventDayOfMonth As Byte, lngFirstOfMonth As Long
Dim lngLastOfMonth As Long, lngFirstOfNextMonth As Long, lngLastOfPreviousMonth As Long
Dim lngEventDate As Long, bytBlankBlocksBefore As Byte, bytBlankBlocksAfter As Byte
Dim astrCalendarBlocks(1 To 42) As String, db As Database, rstEvents As Recordset
Dim strSelectEvents As String, strEvent As String, strPlatoons As String
Dim intMonth As Integer, intYear As Integer, lngSystemDate As Long  'CFB added 1-25-08
Dim ctlSystemDateBlock As Control, blnSystemDateIsShown As Boolean  'CFB added 1-25-08
 
    lngSystemDate = Date    'CFB added 1-25-08
    intMonth = objCurrentDate.Month
    intYear = objCurrentDate.Year
    lstEvents.Visible = False
    lblEventsOnDate.Visible = False
    lblMonth.Caption = MonthAndYear(intMonth, intYear)
 
    strFirstOfMonth = Str(intMonth) & "/1/" & Str(intYear)
    bytFirstWeekdayOfMonth = Weekday(strFirstOfMonth)
 
 

strFirstOfMonth value (for today) is "2/1/2008" which is fine for US dates and will return the correct Weekday. However under European dates this is being translated as Jan 2nd. Therefore the wrong Weekday number is being returned (4 instead of 6) for the start of the month.

The following would work for European standards but not for US.

strFirstOfMonth = "1/" & Str(intMonth) & "/" & Str(intYear)

I would suggest trying the following instead as I think it is consistent accross the board.

strFirstOfMonth = Str(intYear) & "/" & Str(intMonth) & "/1"

[eriktheviking]

I would suggest trying the following instead as I think it is consistent accross the board.

strFirstOfMonth = Str(intYear) & "/" & Str(intMonth) & "/1"

I think that's sorted it! Many, many thanks.

[ADezii]

OK the problem is in the date format.

Looking at the following code...

Private Sub PopulateCalendar()
On Error GoTo Err_PopulateCalendar
 
Dim strFirstOfMonth As String, bytFirstWeekdayOfMonth As Byte, bytBlockCounter As Byte
Dim bytBlockDayOfMonth As Byte, lngBlockDate As Long, ctlDayBlock As Control
Dim bytDaysInMonth As Byte, bytEventDayOfMonth As Byte, lngFirstOfMonth As Long
Dim lngLastOfMonth As Long, lngFirstOfNextMonth As Long, lngLastOfPreviousMonth As Long
Dim lngEventDate As Long, bytBlankBlocksBefore As Byte, bytBlankBlocksAfter As Byte
Dim astrCalendarBlocks(1 To 42) As String, db As Database, rstEvents As Recordset
Dim strSelectEvents As String, strEvent As String, strPlatoons As String
Dim intMonth As Integer, intYear As Integer, lngSystemDate As Long  'CFB added 1-25-08
Dim ctlSystemDateBlock As Control, blnSystemDateIsShown As Boolean  'CFB added 1-25-08
 
    lngSystemDate = Date    'CFB added 1-25-08
    intMonth = objCurrentDate.Month
    intYear = objCurrentDate.Year
    lstEvents.Visible = False
    lblEventsOnDate.Visible = False
    lblMonth.Caption = MonthAndYear(intMonth, intYear)
 
    strFirstOfMonth = Str(intMonth) & "/1/" & Str(intYear)
    bytFirstWeekdayOfMonth = Weekday(strFirstOfMonth)
 
 

strFirstOfMonth value (for today) is "2/1/2008" which is fine for US dates and will return the correct Weekday. However under European dates this is being translated as Jan 2nd. Therefore the wrong Weekday number is being returned (4 instead of 6) for the start of the month.

The following would work for European standards but not for US.

strFirstOfMonth = "1/" & Str(intMonth) & "/" & Str(intYear)

I would suggest trying the following instead as I think it is consistent accross the board.

strFirstOfMonth = Str(intYear) & "/" & Str(intMonth) & "/1"

Thanks a million Mary, you have no idea how much I appreciate your response, and subsequent solution to the problem. If you were in front of me right now, I'd kiss ya! (LOL). P.S. - I'll notify the Original Author since I'm sure that he will be interested also. Thanks again.

[ADezii]

I think that's sorted it! Many, many thanks.

That Mary's something, isn't she? For both of us, I'm happy your issue got resolved.

[eriktheviking]

That Mary's something, isn't she? For both of us, I'm happy your issue got resolved.

She sure is. Thanks for sticking with it ADezii. You're a star.

[MMcCarthy]

Happy to help!