發送電子郵件給多個收件人（從textbox.value收件人）

我試圖在Outlook中創建與自定義窗體一個taskmangement。發送電子郵件給多個收件人（從textbox.value收件人）

定製表格上有一個按鈕（sendtask）一個字段assignto和一個隱藏的文本框那份從assignto值添加到變量（myvalue的）中要包括。

用戶可以指定與assignto領域的任務。但通過這種方式，我無法發送電子郵件給多個收件人。

Sub sendtask_click() 

    Set objPage = Item.GetInspector.ModifiedFormPages("Assign Task") 
    Set objControl = objPage.Controls("TextBox1") 
    Set oMsg = Application.CreateItem(olMailItem) 
    Set objNS = oMsg.Session 

    MyValue= objControl.Text 

    With oMsg 
     .To(MyValue) 
     .Subject = "New Task Assign" 
     .HTMLBody = "<HTML><BODY>You have new Task assign by " & _ 
      objNS.CurrentUser.Name & "  <h1>" & Item.Subject & _ 
      "</h1><br/>" & "Description <br/>" & Item.Body & _ 
      "<br/><br/>" & "Start Date:" & Item.StartDate & _ 
      "<br/>" & "Due Date:" & Item.DueDate & "</BODY></HTML>" 
     .Send 
    End With 

End Sub

如何發送電子郵件給多個收件人？

來源

2013-11-24 ktzouv

我發現。要能接受只有一個收件人。但是如何使用它從分配到字段獲取多個收件人？ – ktzouv

你嘗試

With oMsg 
    .To = Join(Array("[email protected]", MyValue),"; ") 
    '... rest of your with block code 
End With

來源

2013-11-26 00:56:22 PatricK

它的作品。非常感謝你的答案。我是新來的VBA和VBS，我已經花了3天以上，以找到解決方案。 – ktzouv

發送電子郵件給多個收件人（從textbox.value收件人）

回答

相關問題