从命令行发送电子邮件

Question

我使用excel VBA通​​过命令行参数在Thunderbird中创建电子邮件，请在此处找到：http://kb.mozillazine.org/Command_line_arguments_%28Thunderbird%29

撰写邮件效果很好，但是如何真正自动发送邮件？我看不到这样的命令。

或者，Thunderbird中是否有一个按钮可以立即发送所有已撰写的电子邮件？找不到该竖升。

非常感谢！

如果有某种意义的话，VBA代码看起来像这样：

Option Explicit

Sub thunderbird()

Dim strTh As String
Dim strCommand As String

strTh = "C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe "

strCommand = strCommand & " -compose " & "to=" & Chr(34) & "[email protected]" & Chr(34)
strCommand = strCommand & ",preselectid=id2"
strCommand = strCommand & ",subject=" & Chr(34) & "wow so email" & Chr(34)
strCommand = strCommand & ",body=" & Chr(34) & "anything" & Chr(10) & "more" & Chr(34)

Call Shell(strTh & strCommand, vbNormalFocus)

End Sub

Answer 1

不幸的是，这是不可能的。但是，https://support.mozilla.org/questions/1144493列出了替代方案，以防它们对您有用。

从UI，文件->发送未发送的消息应该可以工作（您可能需要激活菜单栏）来发送所有已编写的消息。