专家坐堂-[求助]这样定义为什么会报错Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]这样定义为什么会报错  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=132386)

--  作者：智友软件工作室
--  发布时间：2019/3/20 22:30:00
--  [求助]这样定义为什么会报错

此主题相关图片如下：微信截图_20190320222733.png

--  作者：有点甜
--  发布时间：2019/3/20 22:48:00
--
Dim wechatServ As WeChat.WeChatPublicNo = WeChat.WeChatServer.Server("wx506f113977c3a8a3" )
Dim a = wechatserv.sendmsgcontroller
a.SendTemplateMessage("")

--  作者：智友软件工作室
--  发布时间：2019/3/21 0:37:00
--
返回码按通用方法提示错误
If s.Success Then
    msgbox("已发送消息")
Else
    msgbox("发送失败:" & s.ErrorMessage)
End If

--  作者：有点蓝
--  发布时间：2019/3/21 8:50:00
--
什么意思？

--  作者：智友软件工作室
--  发布时间：2019/3/21 9:19:00
--

MmsgResult这应该是他的返回值，我用通用返回值(MmsgResult)看返回结果会出错

此主题相关图片如下：微信截图_20190321091618.png

[此贴子已经被作者于2019/3/21 9:25:13编辑过]

--  作者：有点蓝
--  发布时间：2019/3/21 10:21:00
--
Dim wechatServ As WeChat.WeChatPublicNo = WeChat.WeChatServer.Server("wx506f113977c3a8a3" )
Dim a = wechatserv.sendmsgcontroller
dim s = a.SendTemplateMessage("")
If s.Success Then
    msgbox("已发送消息")
Else
    msgbox("发送失败:" & s.ErrorMessage)
End If