Calendar in Workgroup Create for Each Person

[JoanOC]

I use the reminder calendar based on table Action Item.
I either downloaded it or got it from a sample database.
I would like all those in the workgroup to have their own
reminder calendar (it pops up on the date you set the reminder).
How would I do this?
Thanks.
Joan
P.S. Also, how would I block them from getting my reminder calendar? I am
the administrator.

 

[Allen Browne]

Put everyone's reminders into one table, with a field to distinguish whose
reminder it is.

Presumably they log in, so you can use CurrentUser() to determine who the
user is. In the Open event of your reminder form, set its RecordSource
something like this:

Private Sub Form_Open(Cancel As Integer)
Dim strSQL As String
strSQL = "SELECT Action.* FROM Action WHERE [User] = """ & CurrentUser()
& """ ORDER BY ActionDateTime;"
Me.RecordSource = strSQL
End Sub

 

[JoanOC]

The users access my Access via of a desktop icon that is mapped to my Access.
We don't have a server, but rather are comprised of a pier-to-pier workgroup.
I want the users to be able to have their own reminders.
So, they don't really log in.
I would have to setup something. I wonder if each user could be id by their
computer's name.
I will study what you suggested.
Thanks for input.
Joan

Put everyone's reminders into one table, with a field to distinguish whose
reminder it is.

Presumably they log in, so you can use CurrentUser() to determine who the
user is. In the Open event of your reminder form, set its RecordSource
something like this:

Private Sub Form_Open(Cancel As Integer)
Dim strSQL As String
strSQL = "SELECT Action.* FROM Action WHERE [User] = """ & CurrentUser()
& """ ORDER BY ActionDateTime;"
Me.RecordSource = strSQL
End Sub

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

I use the reminder calendar based on table Action Item.
I either downloaded it or got it from a sample database.
I would like all those in the workgroup to have their own
reminder calendar (it pops up on the date you set the reminder).
How would I do this?
Thanks.
Joan
P.S. Also, how would I block them from getting my reminder calendar? I am
the administrator.

 

[Allen Browne]

Fair enough. There will have to be something in the table field that
contains their name. You could pop up a little form where the user enters
their name, and then hide it (Me.Visible =False) when the user clicks your
Ok button. That way it will be there to read from each time the calendar is
opened.

If you want to use the computer name, you can get it with this code:
http://www.mvps.org/access/api/api0009.htm

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

The users access my Access via of a desktop icon that is mapped to my
Access.
We don't have a server, but rather are comprised of a pier-to-pier
workgroup.
I want the users to be able to have their own reminders.
So, they don't really log in.
I would have to setup something. I wonder if each user could be id by
their
computer's name.
I will study what you suggested.
Thanks for input.
Joan

Put everyone's reminders into one table, with a field to distinguish
whose
reminder it is.

Presumably they log in, so you can use CurrentUser() to determine who the
user is. In the Open event of your reminder form, set its RecordSource
something like this:

Private Sub Form_Open(Cancel As Integer)
Dim strSQL As String
strSQL = "SELECT Action.* FROM Action WHERE [User] = """ &
CurrentUser()
& """ ORDER BY ActionDateTime;"
Me.RecordSource = strSQL
End Sub

I use the reminder calendar based on table Action Item.
I either downloaded it or got it from a sample database.
I would like all those in the workgroup to have their own
reminder calendar (it pops up on the date you set the reminder).
How would I do this?
Thanks.
Joan
P.S. Also, how would I block them from getting my reminder calendar? I
am
the administrator.