- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 客户消息转发给企业微信成员无法接收！ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100536)
-- 发布时间：2017/5/13 11:35:00
-- 客户消息转发给企业微信成员无法接收！
调试一个简单的客户系统实例
企业会话：sc.Secret = Vars("企业会话") \'企业会话的开发者密钥,这行语句没有设置，其它都设置好见BuildWeChatServer
没有设置原因：服务中心里没有找到企业会话服务，其它设置好。
调试：微信企业成员发送消息，能发送到企业号客服人员中，Functions.Execute("Msg_SendToQyKf",msg)能正常运行。
但客户消息回复消息时,无法触发HttpRequest，同样也无法执行以下语句
Dim msg = Args(0)
If msg.MsgType = "QYKF" Then \'本例子只处理客服消息,其它类型消息不要在这里测试,请参考完整案例
Functions.Execute("Msg_QyReplyToUser",msg)
end if
难道我接口回调服务有问题？求助
-- 发布时间：2017/5/13 11:48:00
--
你要设置的是企业客服，而不是企业会话：http://wechat.foxtable.com:9009/WebHelp/scr/we0110.htm
-- 发布时间：2017/5/13 18:48:00
-- 问题还在？
1、企业客服：已设置好：如附件1
此主题相关图片如下：企业客服设置.jpg
2、启动企业客服的接口：如下
pinfo = New WeChat.WeChatPublicNoInfo()
pinfo.DeveloperID = Vars("qycorpid") \'自己企业号的开发者ID
pinfo.DeveloperSecret = Vars("qysecret") \'自己企业号的开发者密钥
pinfo.Token = Vars("_qytoken") \'消息令牌
pinfo.EncodingAESKey = Vars("_qyencodingAESKey") \'消息加密密钥
pinfo.PublicNoType = 2 \'企业号
\'企业客服
Dim se As New WeChat.WeChatPublicNoSecret
se.SecretName = "企业客服" \'名称必须为企业客服
se.SecretType = WeChat.SecretType.KF \'类型为WeChat.SecretType.KF =2
se.SecretID = "wx5aa6847dfc131f80"
se.Secret = "uBXgBN-rVR7LaF-LYmBzqpfyggsGWpl8fgwFgzqj_pF_GlI1pef4V8CKOn7LvqHX" \'企业客服的开发者密钥
pinfo.QySecrets.Add(se)
\'企业客服的回调设置
Dim callInfo As new WeChat.WeChatPublicNoCallbackInfo
callInfo = new WeChat.WeChatPublicNoCallbackInfo
callInfo.CallbackKey = "internal" \'内部客服
callInfo.Token = "foxtable"
callInfo.EncodingAESKey = "CHIMyAkax7ojzoDzg71TB4PuDmlh1CnZM5HSqCRRiTP"
callInfo.CallbackType = "2" \'内部客服类型
pinfo.Tokens.Add(callInfo.CallbackKey,callInfo)
callInfo = new WeChat.WeChatPublicNoCallbackInfo
callInfo.CallbackKey = "external" \'外部客服
callInfo.Token = "foxtable"
callInfo.EncodingAESKey = "vnuTiiRprYnyisBc3gdoNWiMokJUQMjDTd74jecHguv"
callInfo.CallbackType = "2" \'客服类型
pinfo.Tokens.Add(callInfo.CallbackKey,callInfo)
WeChat.WeChatServer.Add(pinfo) \'添加企业号到服务
此主题相关图片如下：111.jpg
4、在浏览器中输入企业客服回调接口，都能触发HttpRequest, 如下图：
此主题相关图片如下：222.jpg
-- 发布时间：2017/5/15 8:26:00
--
注意ProcessMessage的用法，CallbackKey内容必须作为第三个参数传入
-- 发布时间：2017/5/15 20:22:00
-- 还无法排错
此主题相关图片如下：设置了第三个参数.jpg
客服消息：回复的时候还无法触发HttpRequest
-- 发布时间：2017/5/15 20:38:00
--
3楼图片中的客服回调服务url地址是怎样设置的？
HttpRequest的第一行代码放上msgbox(1)能不能弹出来？
-- 发布时间：2017/5/16 8:58:00
-- 客服回复Url
客服回复Url:设置如下
此主题相关图片如下：客服回复.jpg
回复时：无法触发msgbox(1)
-- 发布时间：2017/5/16 9:03:00
--
Dim callInfo As new WeChat.WeChatPublicNoCallbackInfo
callInfo = new WeChat.WeChatPublicNoCallbackInfo
callInfo.CallbackKey = "qefoxkf1" \'内部客服
callInfo.Token = "foxtable"
callInfo.EncodingAESKey = "CHIMyAkax7ojzoDzg71TB4PuDmlh1CnZM5HSqCRRiTP"
callInfo.CallbackType = "2" \'内部客服类型
pinfo.Tokens.Add(callInfo.CallbackKey,callInfo)
[此贴子已经被作者于2017/5/16 9:03:07编辑过]
-- 发布时间：2017/5/16 9:31:00
-- 成功了
谢谢老师！