Jobcodes!

[DBAmat]

I have got a database of users for a specific software the users have
jobcodes GFI for example i need to be able to create temporary
jobcodes for a certain ammount of time and when that time is up a
msgbox appears telling me to alert the user the jobcode is up what
would be the best way of doing this?


Thanks!

 

[BruceM]

The best thing would be to post the question with standard punctuation and
capitalization. Other than that you will need to explain what is supposed
to happen with the job code (or the record in which it appears) after its
"time is up".

 

[DBAmat]

Id just like it to warn us but not do anything with the record so we
can email the user and see what he wants to do then update the databse
can you help ASAP?

Thanks mate!

 

[BruceM]

If there is an expiration date for a job code you could filter for records
with a passed expiration date. You could do this by way of a command button
on the form:

Dim strFilter As String

strFilter = "[ExpDate] > Date()"

Me.FilterOn = Not Me.FilterOn

If Me.FilterOn = True Then
DoCmd.ApplyFilter , strFilter
End If

This will let you toggle between the filtered records and all records.

If you prefer to have a message box pop up as you scroll through the records
you could do something like this in the form's Current event:

Dim strMsg as String

strMsg = "Expiration date is passed"

If Me.ExpDate > Date Then
msgbox strMsg
End If

Use your actual field name in place of ExpDate.

 

[DBAmat]

If there is an expiration date for a job code you could filter for records
with a passed expiration date. You could do this by way of a command button
on the form:

Dim strFilter As String

strFilter = "[ExpDate] > Date()"

Me.FilterOn = Not Me.FilterOn

If Me.FilterOn = True Then
DoCmd.ApplyFilter , strFilter
End If

This will let you toggle between the filtered records and all records.

If you prefer to have a message box pop up as you scroll through the records
you could do something like this in the form's Current event:

Dim strMsg as String

strMsg = "Expiration date is passed"

If Me.ExpDate > Date Then
msgbox strMsg
End If

Use your actual field name in place of ExpDate.

Id just like it to warn us but not do anything with the record so we
can email the user and see what he wants to do then update the databse
can you help ASAP?

Thanks mate!

- Show quoted text -

Is there anyway to get it to go to the record with a messege box
straight away?

Thanks

 

[BruceM]

I don't see offhand how to generate a message box such as you want for a
record other than the current one. When and where would you have this
message box appear? At some record other than the expired one? Perhaps I
misunderstand what you seek. The msgbox code in the Current event will
cause the message box to appear when you arrive at the expired record.

If there is an expiration date for a job code you could filter for
records
with a passed expiration date. You could do this by way of a command
button
on the form:

Dim strFilter As String

strFilter = "[ExpDate] > Date()"

Me.FilterOn = Not Me.FilterOn

If Me.FilterOn = True Then
DoCmd.ApplyFilter , strFilter
End If

This will let you toggle between the filtered records and all records.

If you prefer to have a message box pop up as you scroll through the
records
you could do something like this in the form's Current event:

Dim strMsg as String

strMsg = "Expiration date is passed"

If Me.ExpDate > Date Then
msgbox strMsg
End If

Use your actual field name in place of ExpDate.

Id just like it to warn us but not do anything with the record so we
can email the user and see what he wants to do then update the databse
can you help ASAP?

Thanks mate!

The best thing would be to post the question with standard punctuation
and
capitalization. Other than that you will need to explain what is
supposed
to happen with the job code (or the record in which it appears) after
its
"time is up".

I have got a database of users for a specific software the users have
jobcodes GFI for example i need to be able to create temporary
jobcodes for a certain ammount of time and when that time is up a
msgbox appears telling me to alert the user the jobcode is up what
would be the best way of doing this?

Thanks!- Hide quoted text -

- Show quoted text -- Hide quoted text -

- Show quoted text -

Is there anyway to get it to go to the record with a messege box
straight away?

Thanks