I want to add attachments to emails in outlook
I want to add attachments to emails in outlook,
when i run the vbs file, there is no error
but it doesn't send the message and doc.
Set OutlookApp = CreateObject("Outlook.Application")
Set Mapi = OutlookApp.GetNameSpace("Mapi")
Set List = OutlookApp.CreateItem(0)
List.Subject = "Test"
List.Body = "TwojaWiadomosc"
List.Attachments.Add ("c:\test.txt")
List.Send
Set List = Nothing
Set Mapi = Nothing
Set OutlookApp = Nothing
begin 666 sendmail1.vbs
`
end
