Thanks Cronk
But no I get an Invalid argument error on the line Accommodationmail = Left(Accommodationmail, Len(Accommodationmail) - 1)
I blanked that out for the time being as it is just deleting the space.
Then I get a run time error that there is no people in the .to mailings.
What I...
Good Evening Mark_
Thanks for the quick reply.
Unfortunately all that I get when I run the script is that within the email the .To recipient now reads as
SELECT mailings.Email FROM mailings WHERE mailings.reportsto = ' " & asMatch & "'"
No email address have been added from the column...
Good Evening
I am trying to find out is the below question is possible.
I have a form for mailing which lists the department which the mails go to. controlled by a tick box next to each department.
I have a table named mailings, with Columns NameID;Email;reportsto
With research I have been...
If I ' out the 3rd and 4th line for Location the date between range works so their must be problem with the Location, bu for the life of me I cannot figer it out
whereclause = ""
whereclause = whereclause & "[Incident Date] Between #" & Format(Me.Startdate, "MM/DD/YYYY") & "# And #" &...
Good Morning
I am having trouble opening a datasheet form with mulitple where clauses here the VB that I have so far
-------------------
Private Sub Command192_Click()
If IsNull(Me.Startdate) = True Or IsNull(Me.Enddate) = True Or Startdate = "" Or Enddate = "" Then
MsgBox "Start AND...