22.03.2012, 01:00
|
|
Познающий
Регистрация: 01.12.2010
Сообщений: 42
С нами:
8129846
Репутация:
4
|
|
Есть файлы C:\windows\regedit.exe и C:\windows\NOTEPAD.EXE.
Указываешь в аттач:
C:\windows\regedit.exe
C:\windows\regedit.txt
C:\windows\NOTEPAD.EXE
C:\windows\NOTEPAD.txt
Происходит ошибка, так-как файлов regedit.txt и NOTEPAD.txt нет. Для того, чтобы пропускать ошибки, нужно после строки iMsg.TextBody=strBody написать On error resume next
code:
iMsg.TextBody=strBody
On error resume next
iMsg.AddAttachment "C:\windows\regedit.exe "
iMsg.AddAttachment "C:\windows\regedit.txt"
iMsg.AddAttachment "C:\windows\NOTEPAD.EXE"
iMsg.AddAttachment "C:\windows\NOTEPAD.txt"
iMsg.Send
End Function |
|
|