如何在VBScript发送的邮件中添加可点击mailto链接？

修改后的VBScript代码 #

mail.Subject = "Phone shipped per " & Uploader.Form("Ticket") & " for " & Uploader.Form("Rep")

Mail.HTMLBody = "Team," & Uploader.Form("Rep1st") & "'s phone is being shipped out on UPS: " & Uploader.Form("Tracking") & " and should arrive by " & Uploader.Form("Arrive") & ". This is already provisioned to our Mobile Device Management server." &_
"Your cellphone number is: " & Uploader.Form("Phone") &_

"DUO Mobile Setup:" &_
"<br><ul><li>请点击<a href=""mailto:email_address_goes_here?subject=Security%20Team%20-%20repush%20Duo%20registration%20to%20new%20phone&amp;body=Hello%20Security%20Team,%0aPlease%20repush%20Duo%20Registration%20to%20my%20new%20phone%20(Activation%20link%20only).%20Details%20below:%20%0a%0aFull%20Name:%20%0aPhone%20Number:%20%0aDevice%20Type:%20Android"">【点击此处】</a>申请激活链接推送至你的手机，填写相关信息后发送即可。<b>*</b> 激活链接将以短信形式发送，收到后点击链接；若提示打开方式，请选择「DUO」并勾选「始终使用此应用打开」。<b>*</b> 当提示命名账户时，依次点击：下一步、保存、跳过、继续、确定。</li></ul>" &_

"Mail:" &_
"<br><ul><li>请按照{Outlook Setup}PDF文档配置手机邮箱。</li></ul>"

关键修改说明 #

1. 将DUO Mobile Setup段的文本替换为中文表述，插入指定的mailto链接，把原附件申请方式改为直接点击链接发邮件
2. 补充<ul>和<li>标签，让内容以列表形式呈现，匹配目标格式
3. 保留原加粗星号提示，调整表述适配中文语境
4. 同步翻译邮件配置段文本

最终邮件对应部分显示效果 #

DUO Mobile Setup:

• 请点击【点击此处】申请激活链接推送至你的手机，填写相关信息后发送即可。* 激活链接将以短信形式发送，收到后点击链接；若提示打开方式，请选择「DUO」并勾选「始终使用此应用打开」。* 当提示命名账户时，依次点击：下一步、保存、跳过、继续、确定。

Mail:

• 请按照{Outlook Setup}PDF文档配置手机邮箱。

内容的提问来源于stack exchange，提问作者Mobility.Dave