Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共5 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]企业微信自动回复问题

1楼
km007 发表于:2023/10/13 11:22:00
需求:我想自动回复的文字内容待URL链接的(点击文字即可跳转至 指定的URL)

问题:如下代码中,自动回复的内容不是显示“您好!请点这里百度搜索” ,而是显示 为 "您好!<a href='https://www.baidu.com/baidu?wd=刘德华是谁'>请点这里百度搜索</a>"

代码如下:

Dim wbiz As New WXBizCrypt(vars("ccccc"),vars("ttttt"),vars("eeeee"))
Dim xo As Foxtable.XObject = Foxtable.XObject.Parse(msg)
Dim d As Date = Date.Today
Dim so As New Foxtable.XObject()
so("ToUserName") = ***
so("FromUserName") = ***
so("CreateTime") = (Date.Now - st).TotalSeconds()
so("MsgType")= "text"
so("Content") = "您好!<a href='https://www.baidu.com/baidu?wd=刘德华是谁'>请点这里百度搜索</a>"
msg = wbiz .EncryptMsg(e,so.ToXML )
If  IsNumeric(msg) Then
    Dim err As String = wbiz.GetErorDesc(CInt(msg))
Else
    e.WriteString(msg)
End If
2楼
有点蓝 发表于:2023/10/13 11:33:00
这个微信自己的问题,文本模式本身就不支持链接。考虑改为图文消息
3楼
km007 发表于:2023/10/13 11:38:00
但是我是想实现多行内容,点击不同的行,跳转不同的链接

自动回复内容如下:

(1)刘德华是谁
(2)张学友在哪里开演唱会
(3)黎明现在很少出现
……
[此贴子已经被作者于2023/10/13 11:38:34编辑过]
4楼
有点蓝 发表于:2023/10/13 11:45:00
别人不支持,想再多都没有用。企业微信只有主动发送的文本消息支持链接,被动回复是不支持的
5楼
km007 发表于:2023/10/13 11:54:00
图片点击可在新窗口打开查看
共5 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03320 s, 2 queries.