How about this :-
this will use an attachment and you should be able to
supply the group email account
Set out = CreateObject("Outlook.Application")
With out.CreateItemFromTemplate("\\marge\Qstr
Template\TSO SvrSup Questionnaire.oft") 'using the
Outlook object
.UserProperties("Case ID") = rst![Case_Id]
.UserProperties("Call Description") = rst!
[Description]
.SaveAs "\\marge\Qstr Template\Customer
Satisfaction Survey.oft", olTemplate 'Save Template with
new case id
End With
With out.CreateItemFromTemplate _
("\\marge\Qstr Template\TSO Server Support Service
Questionnaire.oft")
.Recipients.Add strEmailAddress
.Attachments.Add "\\marge\CSQ\Database\Production\
Qstr Template\Customer Satisfaction Survey.oft"
.Send
End With
-----Original Message-----
Can someone please tell me how I can send a default e-
mail message to a group set up in Outlook using VBA?
