Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Run time error 2766

Status
Not open for further replies.

KerryL

Technical User
May 7, 2001
545
US
I've been receiving this error message out of my SQL code but I don't understand what it means.

Run-time error 2766:
The object doesn't contain the Automation object 'none'.


Can someone explain this one to me?

Thank you
 

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

End Select
 

Ginger,

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.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top