以下是引用智友软件工作室在2019/3/10 22:45:00的发言:
这个sql数据库中的表,需要我添加数据吗?现在是空表,怎么感觉要加入数据呢?如果需要加,怎么添加
不需要添加数据。
1、设置 WeChat.WeChatServer.SetAccessTokenGetMode("数据源名称","上面数据表的名称")
2、设置
Dim pinfo As New WeChat.WeChatPublicNoInfo()
pinfo.DeveloperID = "wx506f113977c3a8a3" '公众号开发者ID
pinfo.DeveloperSecret = "pb8EKo2zFA1nin7ShaLZDSockQ5vFOrl5iEBgj2qaKV" '公众号的开发者密钥
pinfo .PublicNoType =3 ' 服务号 3=订阅号
pinfo.CryptMsgType =1 '明文消息 2=加密消息
WeChat .WeChatServer.Add(pinfo)'添加服务号到服务'
3、测试
Dim ips = WeChat.WeChatServer.Server("wx506f113977c3a8a3").GetCallbackIP() '获取微信服务器IP
Output.Show(ips .Count)