QC（ALM）生成的电子邮件中缺少超链接

Question

我正在尝试发送来自HP ALM的电子邮件，其中包含一些超链接，但这些超链接不可见。

我尝试在互联网上搜索，但没有运气。

代码：

 emails = "someone@somewhere.com"
 spath = "C:\Screenshot\ABC.png"
 spath1 = "C:\Report\ABC.pdf"
 Set tdc = createobject("TDApiOle80.TDConnection")
 tdc.InitConnectionEx "SERVERNAME"

 tdc.Login "UNAME", "PWD"
 tdc.Connect "DOMAIN", "PRJ"

 subject_str = "Automation Execution : " & Now

  Set fsoobj= CreateObject("Scripting.FileSystemObject") 

   Body_str = "<a href=" & spath & ">Screenshot path</a>" & vbcrlf & "<a href=" & chr(34) & spath1 & chr(34) & ">Report path</a>"
Wait 5
   tdc.SendMail emails, "Automation", subject_str, Body_str, "", "HTML"

Set fsoobj= nothing
Set Read_mail= nothing
tdc.Disconnect
tdc.Logout
tdc.ReleaseConnection   

我尝试了使用" "的两种方法，但没有成功。如果我错过了这里的任何内容，请告诉我。我需要显示超链接