D
Dale Levesque
I'm using the following code to send a word document to a recipient. It just
seems to sit in the outbox though. Any suggetstions?
Dale
If ai_Output = dyEmail Then
ActiveDocument.HasRoutingSlip = True
With ActiveDocument.RoutingSlip
.Subject = "Custom Pricing Quote " & lblQuote.Caption
.AddRecipient gas_Emails(1, gi_Email_ID)
.Delivery = wdAllAtOnce
.Message = "Please see attached."
End With
ActiveDocument.Route
Else
.ActiveDocument.PrintOut Background:=False
End If
seems to sit in the outbox though. Any suggetstions?
Dale
If ai_Output = dyEmail Then
ActiveDocument.HasRoutingSlip = True
With ActiveDocument.RoutingSlip
.Subject = "Custom Pricing Quote " & lblQuote.Caption
.AddRecipient gas_Emails(1, gi_Email_ID)
.Delivery = wdAllAtOnce
.Message = "Please see attached."
End With
ActiveDocument.Route
Else
.ActiveDocument.PrintOut Background:=False
End If