VB脚本 - 添加If / Else到newMail.CC?

时间:2017-10-04 14:23:49

标签: email vbscript hta

我正在创建一个VB脚本表单,用户将填写并发送给一个人。但是,如果选择一个选项作为“高优先级”,我也需要它来CC另一个人。

我对VB有点生疏,但这是我到目前为止所做的:

If priority.Value = "High priority" Then
    newMail.CC = "email@domain.com"
Else
    newMail.CC = ""
End If

newMail.Subject = MessageSubject
newMail.Body = MessageBody & MessageText
newMail.RecipIents.Add(ToAddress)
newMail.BCC = "email@domain.com"
newMail.Send

这样的事情会起作用吗?或者我如何将变量传递给newMail.CC选项,以便复制其他人?

提前感谢您的任何帮助/建议。

1 个答案:

答案 0 :(得分:1)

感谢您的见解。我不断收到错误消息,说明需要newMail.CC。我没有将它设置为变量,并认为它只会被自动识别。我将其更改为以下内容并且有效:

Dim ccEmail
If priority.Value = "High priority" Then
    ccEmail = "email@domain.com"
Else
    ccEmail = ""
End If

newMail.Subject = MessageSubject
newMail.Body = MessageBody & MessageText
newMail.RecipIents.Add(ToAddress)
newMail.CC = ccEmail
newMail.Send

感谢您的帮助!! :)