http://tagfacts.com/kuchin/outlooken-ushttp://tagfacts.com/kuchin
Dim olApp As Outlook.Application
Dim objMail As Outlook.MailItem

Set olApp = CreateObject("Outlook.Application")
Set objMail = olApp.CreateItem(olMailItem)

objMail.BCC = "Friends Dima"
objMail.Subject = "Subject"
objMail.HTMLBody = "<b>Body</b>"

objMail.Send

End Sub
by kuchin
Tags: mail microsoft outlook]]>Mon, 20 Feb 2006 11:58:34 GMTprograms_id_281kuchin@nosuchserver.commailmicrosoftoutlookhttp://tagfacts.com/kuchin[HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Security]
"Level1Remove"="ade;adp;asx;bas;bat;chm;cmd;com;cpl;crt;exe;hlp;hta;inf;ins;isp;
js;jse;lnk;mda;mdb;mde;mdz;msc;msi;msp;mst;pcd;pif;prf;reg;scf;scr;sct;shb;shs;
url;vb;vbe;vbs;ws c;wsf;wsh"
by kuchin
Tags: mail microsoft outlook]]>Tue, 15 Nov 2005 14:13:29 GMTprograms_id_212kuchin@nosuchserver.commailmicrosoftoutlook