На чемпионате мира по программированию, прошедшем на минувшей неделе в Ванкувере, золотые медали завоевали две российские команды студентов.
В чемпионате приняли участие 64 команды со всего мира. "Золотыми" призерами стали команда Санкт-Петербургского государственного университета и команда Санкт-Петербургского государственного института точной механики и оптики, уже третий год завоевывающая "золото".
Отправка почтовых сообщений используя MS MAPI Controls
В примере отправляется письмо по адрессу xxx@xxx.xx с вложеным файлом Text.txt. Для работы MAPI Controls требуется, что бы в системе была установлена MAPI-совместимая почтовая ситема, например, MS Exchange, MS Outlook. Для работы данного примера, добавте к вашему проекту компонент Microsoft MAPI Controls, на форму добавте три контрола:
1. MAPISession с именем MAPISession1
2. MAPIMessages с именем MAPIMessages1
3. CommandButton с именем btSend
Private Sub btSend_Click()
MapiSession1.UserName=""
MAPISession1.Password=""
MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.Compose
MAPIMessages1.RecipDisplayName = "My Name"
MAPIMessages1.RecipAddress="xxx@xxx.xx" 'eMail
MAPIMessages1.MsgSubject = "Test"
MAPIMessages1.MsgNoteText = "Test OK!"
MAPIMessages1.AttachmentPathName="C:\Text.txt"
MAPIMessages1.Send False
MAPISession1.SignOff
End Sub
UserName и Password это имя и пароль к почтовой системе, которая у вас установлена, а не к почтовому серверу. Например для входа в MS Exchange может требоваться пароль и имя на вход или в MS Outlook может стоять несколько конфигураций и на них пароли, то здесь надо будет указывать имя конфигурации и пароль на нее, в противном случае надо оставить эти параметры пустыми.
Приглашаем попробовать наш новый высокоскоростной IRC-чат, который может работать через браузер или через IRC-клиент (например, mIRC). Счастливого общения!
Выпуск подготовил Алексей Смирнов