Html MS Access电子邮件表超链接

Html MS Access电子邮件表超链接,html,vba,ms-access,Html,Vba,Ms Access,我创建了一个表,通过MS Access中的查询发送电子邮件,其中一个字段是指向服务器上文件的超链接。当模块运行并在outlook中创建表时,超链接只是文件在服务器上位置的文本。我对HTML不是很在行,所以我很难调试为什么我不能让那个字段创建超链接,而不仅仅是作为文本的文件位置。下面我尝试在电子邮件表中为“绘图链接”创建一个超链接: ”&_ "工作编号"及_ "股票编号"及_ “材料和规格”和_ “订单规模”和_ “处理天数”和_ "绘图连结"及_ "" i=0 做而不做 如果(i Mod 2=0

我创建了一个表,通过MS Access中的查询发送电子邮件,其中一个字段是指向服务器上文件的超链接。当模块运行并在outlook中创建表时,超链接只是文件在服务器上位置的文本。我对HTML不是很在行,所以我很难调试为什么我不能让那个字段创建超链接,而不仅仅是作为文本的文件位置。下面我尝试在电子邮件表中为“绘图链接”创建一个超链接:

”&_
"工作编号"及_
"股票编号"及_
“材料和规格”和_
“订单规模”和_
“处理天数”和_
"绘图连结"及_
""
i=0
做而不做
如果(i Mod 2=0),则
rowColor=“”
其他的
rowColor=“”
如果结束
strMsg=strMsg&“_
rowColor&rs.Fields(“作业编号”)&“&”_
rowColor&rs.Fields(“商品代码”)&“商品代码”&”_
rowColor&rs.Fields(“Spec”)&_
rowColor&rs.Fields(“Ord”)&_
rowColor&rs.Fields(“空闲”)和“&”_

rowColor&rs.Fields“访问超链接字段将超链接存储为三部分值,由#字符分隔(查看):
显示文本#文件名#文件中的任何引用

嵌入HTML标记将需要提取中间部分。使用内部函数HyperlinkPart()进行计算可以实现这一点。在查询或VBA中进行提取

字符串连接的正确语法:

rowColor & "<a href='" & HyperlinkPart(rs![Drawing Link], acAddress) & "'>Click Here</a></td>" & _
rowColor&“_

如果超链接字段在显示文本部分中有内容,可以再次使用超链接部分()用于从字段中提取并连接以代替单击此处

的函数该字段是超链接类型还是仅包含url字符串的文本类型?该字段设置为超链接类型。我不使用超链接类型。我更喜欢文本字段,然后使用代码来构造超链接。您上面的代码没有给我错误,我确实打开了超链接k转换为文本,但当电子邮件打开图纸链接列时,超链接应为空。
rowColor&““&
根据您的帮助,我获得了以下代码,将地址作为超链接放在电子邮件表中,这是一个开始。然而,它只是作为显示文本,地址并没有嵌入到链接中以将我带到相关文件。
“&
当然不会像那样嵌入rowColor。需要在链接标签中包含一些显示文本或图像-单击可见的内容。见编辑后的答案。对不起,以前忘了包括这个。这对我来说确实有用。它肯定不会和rowcolor搭配。我很喜欢这个。但是你的代码对我来说也很有用!我感谢你的帮助。
rowColor & "<a href='" & HyperlinkPart(rs![Drawing Link], acAddress) & "'>Click Here</a></td>" & _