Предполагая, что все остальное в коде работает должным образом. Затем вам нужно добавить следующую строку перед методом olMail.Send
. Пример:
olMail.attachments.Add Sheets("Sheet1").Range("E2").Value, olByValue, , "sampleFile"
Более подробную информацию о методе attachments.add можно найти здесь Вложения Добавить
Функция отправки почты будет выглядеть следующим образом:
[ 111]
Правка 1: Полагаю, ваш вопрос был в том, как включить несколько вложений в электронное письмо. Тогда вы можете попробовать это:
Sub SendEmail(what_address As String, subject_line As String, mail_body As String)
Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")
Dim olMail As Outlook.MailItem
Dim lastRow As Integer
Set olMail = olApp.CreateItem(olMailItem)
'Provide the Column where the attachment links are stored. I guess its E in your case
lastRow = Sheets("Sheet1").Range("E" & Rows.Count).End(xlUp).Row
olMail.To = what_address
olMail.Subject = subject_line
olMail.Body = mail_body
'Loop through the column and add the attachments to the Email
For i = 2 To lastRow
.attachments.Add Sheets("Sheet1").Range("E" & i).Value, olByValue
Next i
olMail.Send
End Sub
Возможно, что Ваш файл символов (.pdb) вне синхронизации с Вашим исходным кодом. Общий симптом этого:
При отладке Вы никогда не должны видеть, что указатель отладки останавливается на пустой строке, и это указало бы, что у Вас есть несоответствие символа/источника где-нибудь.
Этот вид несоответствия мог также заставить точки останова быть пропущенными как Вы, видят, но убирают, решение обычно фиксирует его (и это уже кажется на попытку этого).
Другая опция (как предложили другие) состоит в том, что Вы не создаете Настройку отладочного процесса. В то время как возможно отладить Сборку конечных версий, код значительно оптимизирован, который может заставить отладчик действовать странно, например.
Еще одна важная вещь отметить состоит в том, что точки останова не могут быть установлены на каждой строке кода. Например, если Ваш код только имеет переменную инициализацию:
long numObjects;
точка останова не будет обычно устанавливаться правильно (хотя она будет обычно перемещаться в следующую строку "реального" кода). Однако, если Ваша строка кода инициализирует переменную:
long numObjects = 5;
точка останова может быть установлена.
Попытайтесь удалить свой.SUO файл для того проекта и затем восстановите.
Удостоверьтесь, что Вы создаете свое приложение с настройкой отладочного процесса.
Принятие загрузки символа не является проблемой, можно поместить BP в сам метод и проверить, что это действительно становится названным дважды (путем исследования стека вызовов).
Если точка останова не обнаруживается как чисто красный пузырь, но красный круг затем, она отключена. Если это - красный круг с маленьким желтым предупредительным знаком затем процесс (процессы), Вы привязаны, не загрузил символы для того режима. Удостоверьтесь, что Вы пытаетесь отладить корректный тип кода (Управляемый Собственный T-SQL / / / Сценарий).
У меня была эта проблема, и мне пришлось установить исправление. См. http://social.msdn.microsoft.com/Forums/en-US/vsdebug/thread/f3fcb4fb-8a08-4fa0-8d58-9ed6f3eb1193 для получения дополнительной информации