Action Queue

  • Thread starter Thread starter FroGG
  • Start date Start date
F

FroGG

I have an access database that has information extracted from excel.

The information is used by a group of seven people.

I would like to have the excel information now in access directed to the
seven people in some sort of action queue where they are prompted to action
the item prior to moving onto the next item which should present
automatically once the initial item is completed.

If this is possible could someone please explain how or direct me to a link
that could explain how.

Regards,
 
This is easier to do than explain
Assuming table A with fields
TASKID
COMPLETEDED
REQTASKID

on the form (On Current Event):
Private Sub Form_Current()
Dim RsC As DAO.Recordset
Dim RsP As DAO.Recordset
Set RsC = Me.RecordsetClone
RsC.Bookmark = Me.Bookmark
If IsNull(RsC.Fields("REQTASKID").Value) Then Exit Sub
Set RsP = Access.CurrentDb.OpenRecordset("select TASKID FROM TASK A WHERE
REQTASKID = " & RsC.Fields("REQTASKID").Value & " AND COMPLETED = 0",
dbOpenSnapshot)
RsC.FindFirst "TASKID= " & RsP.Fields(0).Value

Me.Bookmark = RsP.Bookmark
RsP.Close: Set RsP = Nothing
RsC.Close: Set RsC = Nothing

End Sub
 
Thanks Pieter.


Pieter Wijnen said:
This is easier to do than explain
Assuming table A with fields
TASKID
COMPLETEDED
REQTASKID

on the form (On Current Event):
Private Sub Form_Current()
Dim RsC As DAO.Recordset
Dim RsP As DAO.Recordset
Set RsC = Me.RecordsetClone
RsC.Bookmark = Me.Bookmark
If IsNull(RsC.Fields("REQTASKID").Value) Then Exit Sub
Set RsP = Access.CurrentDb.OpenRecordset("select TASKID FROM TASK A WHERE
REQTASKID = " & RsC.Fields("REQTASKID").Value & " AND COMPLETED = 0",
dbOpenSnapshot)
RsC.FindFirst "TASKID= " & RsP.Fields(0).Value

Me.Bookmark = RsP.Bookmark
RsP.Close: Set RsP = Nothing
RsC.Close: Set RsC = Nothing

End Sub
 
Back
Top