M
msmuzila
I am trying to send an email and have a hyperlink in the body, which i
would think needs to be written in html. Here is the code i have so
far, can it been modified to work, or do i need a neew strategy.
Dim rst As New Recordset
rst.Open "Select * from CBS_Reviews where
CBS_Reviews.zDate=#" & DATE & "#", CurrentProject.Connection
Do While Not rst.EOF
DoCmd.SendObject _
, _
, _
, _
rst("EMAIL_1"), _
, _
, _
"Custom Brackets Review", _
"BODY HERE - NEED A HYPERLINK" '_
False
'
rst.MoveNext
Loop
rst.Close
' End If
Set rst = Nothing
Many Thanks
Matt
would think needs to be written in html. Here is the code i have so
far, can it been modified to work, or do i need a neew strategy.
Dim rst As New Recordset
rst.Open "Select * from CBS_Reviews where
CBS_Reviews.zDate=#" & DATE & "#", CurrentProject.Connection
Do While Not rst.EOF
DoCmd.SendObject _
, _
, _
, _
rst("EMAIL_1"), _
, _
, _
"Custom Brackets Review", _
"BODY HERE - NEED A HYPERLINK" '_
False
'
rst.MoveNext
Loop
rst.Close
' End If
Set rst = Nothing
Many Thanks
Matt