|
Re: select case does not work ... why?
Event if i write it like this it does not work. So what is wrong with
"3" doen't make any sense:
If notification_type = "1" Then
' Accepted Job applications submitted within the last 7 days (until
last midnight)
submission_date_from = DateAdd("d", -6, submission_date_to)
status = 3
range_text = "between " & submission_date_from & " and " &
submission_date_to
subject = "Accepted Job Applications Submitted " & range_text
no_applications_text = "There are no accepted job applications that
were submitted " & range_text & "."
End If
If notification_type = "2" Then
' Accepted Job applications submitted within the last 30 days (until
last midnight)
submission_date_from = DateAdd("d", -29, submission_date_to)
status = 3
range_text = "between " & submission_date_from & " and " &
submission_date_to
subject = "Accepted Job Applications Submitted " & range_text
no_applications_text = "There are no accepted job applications that
were submitted " & range_text & "."
End If
If notification_type = "3" Then
' Accepted Job applications submitted within the last 30 days (until
last midnight)
submission_date_from = DateAdd("d", -15, submission_date_to)
status = 3
range_text = "between " & submission_date_from & " and " &
submission_date_to
subject = "Accepted Job Applications Submitted " & range_text
no_applications_text = "There are no accepted job applications that
were submitted " & range_text & "."
End If
|