Страница: 1 |
Вопрос: Ошибка при вызове LogonEx из Mapi32 | Добавлено: 11.12.06 07:59 |
Автор вопроса: ![]() |
Vb.net
'Ответ на вызов процедуры: не выбран почтовый клиент по 'умолчанию. Imports System Imports System.Runtime.InteropServices Module Module1 Public Const MAPI_AB_NOMODIFY = &H400 Public Const MAPI_BCC = 3 Public Const MAPI_BODY_AS_FILE = &H200 Public Const MAPI_CC = 2 Public Const MAPI_DIALOG = &H8 Public Const MAPI_E_AMBIGUOUS_RECIPIENT = 21 Public Const MAPI_E_AMBIG_RECIP = MAPI_E_AMBIGUOUS_RECIPIENT Public Const MAPI_E_ATTACHMENT_NOT_FOUND = 11 Public Const MAPI_E_ATTACHMENT_OPEN_FAILURE = 12 Public Const MAPI_E_ATTACHMENT_WRITE_FAILURE = 13 Public Const MAPI_E_BAD_RECIPTYPE = 15 Public Const MAPI_E_BLK_TOO_SMALL = 6 Public Const MAPI_E_DISK_FULL = 4 Public Const MAPI_E_FAILURE = 2 Public Const MAPI_E_INSUFFICIENT_MEMORY = 5 Public Const MAPI_E_INVALID_EDITFIELDS = 24 Public Const MAPI_E_INVALID_MESSAGE = 17 Public Const MAPI_E_INVALID_RECIPS = 25 Public Const MAPI_E_INVALID_SESSION = 19 Public Const MAPI_E_LOGIN_FAILURE = 3 Public Const MAPI_E_LOGON_FAILURE = MAPI_E_LOGIN_FAILURE Public Const MAPI_E_MESSAGE_IN_USE = 22 Public Const MAPI_E_NETWORK_FAILURE = 23 Public Const MAPI_E_NO_MESSAGES = 16 Public Const MAPI_E_NOT_SUPPORTED = 26 Public Const MAPI_E_TEXT_TOO_LARGE = 18 Public Const MAPI_E_TOO_MANY_FILES = 9 Public Const MAPI_E_TOO_MANY_RECIPIENTS = 10 Public Const MAPI_E_TOO_MANY_SESSIONS = 8 Public Const MAPI_E_TYPE_NOT_SUPPORTED = 20 Public Const MAPI_E_UNKNOWN_RECIPIENT = 14 Public Const MAPI_ENVELOPE_ONLY = &H40 Public Const MAPI_FORCE_DOWNLOAD = &H1000 Public Const MAPI_GUARANTEE_FIFO = &H100 Public Const MAPI_LOGOFF_SHARED = &H1 Public Const MAPI_LOGOFF_UI = &H2 Public Const MAPI_LOGON_UI = &H1 Public Const MAPI_NEW_SESSION = &H2 Public Const MAPI_OLE = &H1 Public Const MAPI_OLE_STATIC = &H2 Public Const MAPI_ORIG = 0 Public Const MAPI_PEEK = &H80 Public Const MAPI_RECEIPT_REQUESTED = &H2 Public Const MAPI_SENT = &H4 Public Const MAPI_SUPPRESS_ATTACH = &H800 Public Const MAPI_TO = 1 Public Const MAPI_UNREAD = &H1 Public Const MAPI_UNREAD_ONLY = &H20 Public Const MAPI_USER_ABORT = 1 Public Const MAPI_E_USER_ABORT = MAPI_USER_ABORT Public Const SUCCESS_SUCCESS = 0 <DllImport("MAPI32.DLL", entryPoint:="MAPILogonEx", setLastError:=True, CharSet:=CharSet.Ansi)> Public Function MAPILogon(ByVal UIParam As Integer, ByVal User$, ByVal Password$, _ ByVal Flags&, ByVal Reserved&, ByVal Session&) As Integer End Module 'Уже в форме вызываю: Dim rtn As Integer rtn = MAPILogon(0, "", "", MAPI_LOGON_UI, 0,Session1) MsgBox("Session:" & Session1 & " RTN: " & rtn) 'Сообщение ' Session1 = 0, rtn = -2147467259 'Ответ на вызов процедуры: не выбран почтовый клиент по 'умолчанию. |
Ответы | Всего ответов: 1 |
Номер ответа: 1 Автор ответа: ![]() ![]() ICQ: 302310067 Вопросов: 1 Ответов: 1 |
Профиль | Цитата | #1 | Добавлено: 11.12.06 08:21 |
Почтовый клиент выбран: варъировал между батом и аутлуком, учетные записи выбраны. |
Страница: 1 |
|