Calendar view showing meetings

[abhiutd]

Hi All,
I am failry new to Access and building my first app. I have some meetings that i would like to show in a big calendar (like how outlook shows) and i should be able to click it and see the details of it. I am using Access 2002. I tried to do some research but couldn't find anything. Is it doable?
Will appreciate any help.

Thank You.

 

[CEH]

It's doable.... But if your new to Access... Not advisable. I've seen a couple on this forum, or links to them... So use the "Search" here...

 

[missinglinq]

I've known people with 20+ years of development experience with Access that have tyring to do this off and on for years, without much success! They always apologize when posting a copy because they're designed so poorly, and all of them are so complicated that they take very experienced developers to even try to implement them!

Trust me, this is not a project for someone developing their first application!

 

[georgedwilkinson]

Gotta agree. Microsoft spent bazillions of dollars developing Outlook and I would think it would be difficult to duplicate. Have you considered using the "Microsoft Office Outlook View Control" or some other control in your form/VBA project to manipulate Outlook from your Access app?

Never tried it but that is what I would do if I absolutely, positively must have Outlook calendar functionality integrated into my app.

 

[abhiutd]

Thank You

Thank you guys for your insight. Well now i'm gonna use some other way to implement similar kind of func. Please allow me to ask this. I am thinking of showing all my meetings in a document list layout using the design form wizard. I'm sure there should be an event for double click any row record on the list so that i can pop up some form displaying detail info. I have been unlucky to achieve that. Can you guys pls help or give some pointers.

Thanks a lot.

 

[dkinley]

Suppose the name of the control was "Meeting_Name"

Private Sub Meeting_Name_DblClick(Cancel As Integer)
Dim sDocName As String
Dim sLinkCriteria As String

sDocName1 = "FormMeeting"
sLinkCriteria1 = "[FormMeetingID]=" & Me![FormMeetingID]
DoCmd.OpenForm sDocName, , , sLinkCriteria, , , "Normal"
End Sub

You have to have the data field FormMeetingID loaded as well for this to work. All it does is open a form that is filtered to only show one record.

I posted an example of this last week, but I guess the site was overhauled and my user credentials were deleted. I tried searching for that post (under this user name) but couldn't find it.

-dK

 

[abhiutd]

Thank you but i have a question. I'm not sure what you mean by control name. I created this form called frmMeetings through the wizard and associated table called tblMeeting and use the Document List layout to show the data in a grid format. When i am trying to build an event it says Private Sub Detail_DblClick(Cancel As Integer)
Is that how it is supposed to be? What am i missing here?
My form name is frmMeetings.

Thanks.

 

[abhiutd]

Nevermind, it seems it doesn't work with Datasheet( sorry i mentioned Document list earlier) layout so i used Tabular layout and double click works just fine.

Thanks a lot again. You have been very helpful.

 

[DCrake]

Simple Software Solutions

I have mentioned this site on several occasions, and have been using the controls for nearly three years now.

here is a link to the sitehttp://http://www.dbi-tech.com/product_page_Studio_Controls.asp

Here is a pic copied from their web site about calander controls and appointment scheduling.

CodeMaster:

 

[abhiutd]

I have mentioned this site on several occasions, and have been using the controls for nearly three years now.

here is a link to the sitehttp://http://www.dbi-tech.com/product_page_Studio_Controls.asp

Here is a pic copied from their web site about calander controls and appointment scheduling.

CodeMaster:

Hi there,
Right now we really dont want funky stuff at a cost so plain and simple functionality works okay for us. But thanks for sending the link, who knows we might need in future.

cheers!

 

[dkinley]

A control by definition is -

"Controls are objects that display data, perform actions, and let you view and work with information that enhances the user interface, such as labels and images. The most commonly used control is the text box, but other controls include labels, check boxes, and subform/subreport controls."

It works in datasheet view ... that's where I make the most use of it.

Suppose the name of the control (the textbox in your datasheet) was "Meeting_Name"

Click the properties of the control.
Click on the Event tab.
Click the box that has "..." out beside the On Dbl Click
Click on Code Builder.

Another window will open up with ...

Private Sub Meeting_Name_DblClick(Cancel As Integer)
End Sub

Paste the following between the first line (Private Sub ...)
and the last line (End Sub)

Dim sDocName As String
Dim sLinkCriteria As String

sDocName = "FormMeeting"
sLinkCriteria = "[FormMeetingID]=" & Me![FormMeetingID]
DoCmd.OpenForm sDocName, , , sLinkCriteria, , , "Normal"

Change "FormMeeting" to whatever form it is you want to open.
Change [FormMeetingID] to whatever the key field is for the primary key field name of the table "FormMeeting" is based on.

-dK

 

[abhiutd]

A control by definition is -

"Controls are objects that display data, perform actions, and let you view and work with information that enhances the user interface, such as labels and images. The most commonly used control is the text box, but other controls include labels, check boxes, and subform/subreport controls."

It works in datasheet view ... that's where I make the most use of it.

Suppose the name of the control (the textbox in your datasheet) was "Meeting_Name"

Click the properties of the control.
Click on the Event tab.
Click the box that has "..." out beside the On Dbl Click
Click on Code Builder.

Another window will open up with ...

Private Sub Meeting_Name_DblClick(Cancel As Integer)
End Sub

Paste the following between the first line (Private Sub ...)
and the last line (End Sub)

Dim sDocName As String
Dim sLinkCriteria As String

sDocName = "FormMeeting"
sLinkCriteria = "[FormMeetingID]=" & Me![FormMeetingID]
DoCmd.OpenForm sDocName, , , sLinkCriteria, , , "Normal"

Change "FormMeeting" to whatever form it is you want to open.
Change [FormMeetingID] to whatever the key field is for the primary key field name of the table "FormMeeting" is based on.

-dK

Hi dkinley,
Thanks for clearing that but in my case i would want to open the details on the row dblclick not just the Meeting_Name textbox dblclick because if the user clicks on any other field by mistake (like location) it will not popup the details form. Does that make sense?

Thanks again for your detailed explanation.

 

[dkinley]

Yes it makes sense ...

What I normally do is have my datasheet as a subform on an unbound form (is not connected to a table). This allows me to decorate around the datasheet (a title for the form, a close button, etc.) I put a label just above the subform with instructions like "Please double-click the Meeting Name to open detailed information."

Once users do this twice, they pretty much have the process down.

Your only other option would be to encode the same function in every control on the datasheet so no matter where they double-clicked it would filter and open the appropriate record. This is alot of overhead on the part as a programmer/administrator which is why i just use a label.

-dK