Nov 10, 2003 #1 kitnba MIS Jul 31, 2000 132 HK myRecipient =myItem.Recipients.Add(alltrim(a_sender[n])+'@xxx.com.hk')) How do I change this command in the CC field? I want add our address to CC field. Thanks
myRecipient =myItem.Recipients.Add(alltrim(a_sender[n])+'@xxx.com.hk')) How do I change this command in the CC field? I want add our address to CC field. Thanks
Nov 10, 2003 1 #2 Mike Gagnon Programmer Apr 6, 2002 8,067 CA kitnba oOutLookObject = CreateObject("Outlook.Application" oEmailItem = oOutLookObject.CreateItem(0) WITH oEmailItem .Recipients.Add("moe@3stooges.com" .CC = "you@yourcompany.com" .Subject = "Automation sample" .Importance = IMPORTANCENORMAL .Body = "This is easy!" .Send ENDWITH RELEASE oEmailItem RELEASE oOutLookObject Mike Gagnon If you want to get the best response to a question, please check out FAQ184-2483 first. Upvote 0 Downvote
kitnba oOutLookObject = CreateObject("Outlook.Application" oEmailItem = oOutLookObject.CreateItem(0) WITH oEmailItem .Recipients.Add("moe@3stooges.com" .CC = "you@yourcompany.com" .Subject = "Automation sample" .Importance = IMPORTANCENORMAL .Body = "This is easy!" .Send ENDWITH RELEASE oEmailItem RELEASE oOutLookObject Mike Gagnon If you want to get the best response to a question, please check out FAQ184-2483 first.
Nov 10, 2003 Thread starter #3 kitnba MIS Jul 31, 2000 132 HK if I want to cc 4 email address, what can I do? can I use myRecipient =myItem.cc.Add(alltrim(a_sender[n])+'@xxxx.hk')) this same code? Upvote 0 Downvote
if I want to cc 4 email address, what can I do? can I use myRecipient =myItem.cc.Add(alltrim(a_sender[n])+'@xxxx.hk')) this same code?
Nov 10, 2003 #4 Mike Gagnon Programmer Apr 6, 2002 8,067 CA No exactly Var1 = "you@yourcompany.com" Var2 = "us@ourcompany.com" myItem.cc = Var1+";"+var2 Note CC does not require the ADD function Mike Gagnon If you want to get the best response to a question, please check out FAQ184-2483 first. Upvote 0 Downvote
No exactly Var1 = "you@yourcompany.com" Var2 = "us@ourcompany.com" myItem.cc = Var1+";"+var2 Note CC does not require the ADD function Mike Gagnon If you want to get the best response to a question, please check out FAQ184-2483 first.
Nov 11, 2003 #5 puruawade Programmer Oct 13, 2003 17 IN I am doing it exactly the way Mike has suggested. (var1+";"+var2 and so on) But kitnba has not specified whether he (or she ? Difficult to make out. Pardon me pl.) is creating the object as Mike has put it. i.e. oOutLookObject = CreateObject("Outlook.Application" oEmailItem = oOutLookObject.CreateItem(0) But if one is using MAPI and default email system is set to Outlook, this can be achived by setting RecipType property of MAPIMessage control to 2. Puru Upvote 0 Downvote
I am doing it exactly the way Mike has suggested. (var1+";"+var2 and so on) But kitnba has not specified whether he (or she ? Difficult to make out. Pardon me pl.) is creating the object as Mike has put it. i.e. oOutLookObject = CreateObject("Outlook.Application" oEmailItem = oOutLookObject.CreateItem(0) But if one is using MAPI and default email system is set to Outlook, this can be achived by setting RecipType property of MAPIMessage control to 2. Puru
Nov 11, 2003 #6 Mike Lewis Programmer Jan 10, 2003 17,505 Scotland Kitnba, Try this: myRecipient =myItem.Recipients.Add(alltrim(a_sender[n])+'@xxx.com.hk')) myRecipient.Type = 2 Mike Mike Lewis Edinburgh, Scotland http://www.ml-consult.demon.co.uk Upvote 0 Downvote
Kitnba, Try this: myRecipient =myItem.Recipients.Add(alltrim(a_sender[n])+'@xxx.com.hk')) myRecipient.Type = 2 Mike Mike Lewis Edinburgh, Scotland http://www.ml-consult.demon.co.uk