'http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cdosys/html/_cdosys_sending_or_posting_using_the_network.asp

set Message = CreateObject("CDO.Message")

with Message
	.From = "office@xxx.com.ua"
	.To = "user@xxx.ru"
	.Subject = "Привет" 
	.Textbody = "Вы уволены"

with .Configuration.Fields
	.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") =  2 
	.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.xxx.loc" 
	.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =  25 
	.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") =  1 

 	.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "qqqqqqq@xxx.com.ua"
	.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "password"

	.Update
end with

	.AddAttachment "c:\pagefile.sys"
	.Send
end with
set Message = nothing