Please post your SQL code. Terry L. Broadbent FAQ183-874 contains tips for posting questions in these forums.
NOTE: Reference to the FAQ is not directed at any individual.
When I receive the error and go to debug mode, it points me to the Case Else statement in the Case Select code below. It's in an event procedure for a cmdSend on Click button.
Select Case .Fields("FYI_RFI"
'Send message
Case True 'FYI status = bcc to supvr and OCG supvr
DoCmd.SendObject acSendNoObject, , acFormatRTF, _
To:=strTo, _
Bcc:=strCC & ";" & DLookup("OCGEmail", "tblGenlInfo", _
Subject:="Procurement Card Findings", _
MessageText:=DLookup("FYIText", "tblGenlInfo" & strMsg, _
EditMessage:=False
Case Else 'RFI status = cc to supvr & bcc to OCG supvr
DoCmd.SendObject acSendNoObject, , acFormatRTF, _
To:=strTo, _
Cc:=strCC, _
Bcc:=DLookup("OCGEmail", "tblGenlInfo", _
Subject:="Procurement Card Findings", _
MessageText:=DLookup("RFIText", "tblGenlInfo" & strMsg, _
EditMessage:=False
I wondered about the To:=, CC:=, etc. so I tried it and had no problems. I've not seen that format documented but it works. Terry L. Broadbent FAQ183-874 contains tips for posting questions in these forums.
NOTE: Reference to the FAQ is not directed at any individual.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.