A
AJOLSON
I am trying to apply a hyperlink to an email that is generated out of Access
and sent to Outlook
The message body needs to say something like this:
The Report is now posted on the server:
LINK: \\Server\Test
I need the \\Server\Test to be hyperlinked above
Below is what I have so far
On Error GoTo Err_cmdEmail_Click
Dim StrTemp As String
StrTemp = Format("\\bhihnbwfa01\Groups\HRR_WFA\300_General Employee
Data\Org_View", HTML)
Can this be done?
Dim strDocName As String
Dim strEmail As String
Dim strMailSubject As String
Dim strMsg As String
strDocName = "TEST" 'Me.lstRpt.Value
strEmail = "(e-mail address removed)" & vbNullString
strMailSubject = "HR Verification Org View" & vbNullString
strMsg = "The Report is now posted on the server:." & vbNullString &
vbCrLf & vbCrLf & "FROM: SOmeone" & _
vbCrLf & "Link: " & Format(StrTemp, HTML)
DoCmd.SendObject acSendNoObject, , _
acFormatHTML, To:=strEmail, Cc:="", Subject:=strMailSubject,
MessageText:=strMsg
Can This be done?
Thanks any help would be greatly appreciated
and sent to Outlook
The message body needs to say something like this:
The Report is now posted on the server:
LINK: \\Server\Test
I need the \\Server\Test to be hyperlinked above
Below is what I have so far
On Error GoTo Err_cmdEmail_Click
Dim StrTemp As String
StrTemp = Format("\\bhihnbwfa01\Groups\HRR_WFA\300_General Employee
Data\Org_View", HTML)
Can this be done?
Dim strDocName As String
Dim strEmail As String
Dim strMailSubject As String
Dim strMsg As String
strDocName = "TEST" 'Me.lstRpt.Value
strEmail = "(e-mail address removed)" & vbNullString
strMailSubject = "HR Verification Org View" & vbNullString
strMsg = "The Report is now posted on the server:." & vbNullString &
vbCrLf & vbCrLf & "FROM: SOmeone" & _
vbCrLf & "Link: " & Format(StrTemp, HTML)
DoCmd.SendObject acSendNoObject, , _
acFormatHTML, To:=strEmail, Cc:="", Subject:=strMailSubject,
MessageText:=strMsg
Can This be done?
Thanks any help would be greatly appreciated