以文本方式查看主题

-  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=127375)

--  作者:foxtablefanse
--  发布时间:2018/11/12 19:38:00
--  [求助]企业号的接入验证
下面是Foxtable端的HttpRequest事件,用于完成企业号的接入验证:

Select Case e.path
    Case "wefox"
        Dim wbiz As New WXBizCrypt("wxa31aba4cd83af57e","foxtable","ilsmyivvRPNj0qxSiSzWCnqm7cy1w1RcS6w2LBhsh7J")
        If e.Request.HttpMethod = 
"GET"
            
wbiz.CheckQYSignature(e)
        End 
If

End
 Select


这个代码是要发布到服务器上去运行吗??

--  作者:有点蓝
--  发布时间:2018/11/12 20:06:00
--  
是的,改为自己企业号的资料,然后发布到服务器上运行
--  作者:foxtablefanse
--  发布时间:2018/11/12 21:38:00
--  
写在网络监视器的HttpRequest事件里的,发布后,菜单里的网络监视器还能用??
图片点击可在新窗口打开查看此主题相关图片如下:捕获.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2018/11/12 21:39:31编辑过]

--  作者:有点蓝
--  发布时间:2018/11/12 21:54:00
--  
发布后,所有和开发有关的功能都不能使用的。把功能都设计好,再发布测试
--  作者:foxtablefanse
--  发布时间:2018/11/13 10:37:00
--  
没搞懂,如果写在某个测试button里下面的代码如何改

Select Case e.path
    Case "wefox"
        Dim wbiz As New WXBizCrypt("wxa31aba4cd83af57e","foxtable","ilsmyivvRPNj0qxSiSzWCnqm7cy1w1RcS6w2LBhsh7J")
        If e.Request.HttpMethod = 
"GET"
            
wbiz.CheckQYSignature(e)
        End 
If

End
 Select

图片点击可在新窗口打开查看此主题相关图片如下:捕获.jpg
图片点击可在新窗口打开查看





--  作者:有点甜
--  发布时间:2018/11/13 12:05:00
--  

1、照着做,先把帮助文档看完理解

 

http://www.foxtable.com/mobilehelp/scr/0211.htm

 

2、测试的时候,可以用自己的电脑搭建成服务器测试

 

http://www.sunnyos.com/article-show-67.html

 

https://www.ngrok.cc/