Помогите с написанием переходника с API на COM! - VB
Формулировка задачи:
Есть готовая болванка, представляющая из себя dll (см. код)
а так же есть описание функций MAPI и способы их вызова, но никак не получается их добавить в свой код :(
Вот присмер добавляемой функции:
После ее объявления, выдается следующая ошибка:
Only comments may apper after end sub, end function, end property
Я не силен в VB, поэтому прошу помочь всех по возможности!
Заранее спасибо!
а так же есть описание функций MAPI и способы их вызова, но никак не получается их добавить в свой код :(
Вот присмер добавляемой функции:
После ее объявления, выдается следующая ошибка:
Only comments may apper after end sub, end function, end property
Я не силен в VB, поэтому прошу помочь всех по возможности!
Заранее спасибо!
Решение задачи: «Помогите с написанием переходника с API на COM!»
textual
Листинг программы
<font color="blue">Private</font> <font color="blue">Declare</font> <font color="blue">Function</font> MAPISendMail Lib <font color="teal">"MAPI32.DLL"</font> Alias <font color="teal">"BMAPISendMail"</font> _ (<font color="blue">ByVal</font> Session&, <font color="blue">ByVal</font> UIParam&, Message <font color="blue">As</font> MAPIMessage, Recipient _ <font color="blue">As</font> MapiRecip, File <font color="blue">As</font> MapiFile, <font color="blue">ByVal</font> Flags&, <font color="blue">ByVal</font> Reserved&) <font color="blue">As</font> <font color="blue">Long</font> Собственно отправка : MAPISendMail(<font color="darkblue"><b>0</b></font>&, <font color="darkblue"><b>0</b></font>&, objMsg, objRec(<font color="darkblue"><b>0</b></font>), objFile(<font color="darkblue"><b>0</b></font>), <font color="darkblue"><b>0</b></font>, <font color="darkblue"><b>0</b></font>&)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д