Страницы: 1
RSS
Формирование письма через Mozilla
 
Добрый день
Почему в данном скрипте не приаттачивается файл?
Код
Private Sub SendMailThunder_Click()
Dim file As String
file = "C:\123.xlsx"
strCommand = "C:\Program Files (x86)\Mozilla Thunderbird\Thunderbird.exe"
strCommand = strCommand & " -compose " & "mailto:" & "?"
strCommand = strCommand & "subject=" & "&"
strCommand = strCommand & "body=" & "&"
strCommand = strCommand & "attachment=file:///" & file

Call Shell(strCommand, vbNormalFocus)

End Sub
 
Добрый день. Ответ очевиден - нужно очень внимательно читать документацию.
Код
Option Explicit
Private Sub SendMailThunder_Click()
  Dim file As String, mailto As String, subject As String, strCommand As String
  file = "C:\Temp\123.xlsx"
  subject = "Формирование письма через Mozilla"
  mailto = "Jenya1980@example.com"
  strCommand = "C:\Program Files (x86)\Mozilla Thunderbird\Thunderbird.exe -compose """ & _
     "to=" & mailto & ",subject='" & subject & "',attachment='file:///" & Replace(file, "\", "/") & "'"""

  Shell strCommand
End Sub

В последних версиях Thunderbird в параметре attachment можно указывать указывать имя файла, как в операционной системе (без префикса file:/// и перекодирования слеша).
Изменено: sokol92 - 05.09.2020 19:13:51
Владимир
 
Спасибо. Все супер
Изменено: Jenya1980 - 07.09.2020 22:31:08
Страницы: 1
Читают тему (гостей: 1)
Наверх