主题：[求助]微信接口验证

购买了阿里云服务器ECS，在微信接口配置中填入

 

RUL：http://47.108.151.121/wefox/

Token: foxtable

 

httpserver开启代码如下

 

HttpServer.Prefixes.Add("http://*/")
HttpServer.WebPath = "d:\web" 
HttpServer.Start()

 

提交后总是提示“配置失败”。请老师指点一下。谢谢！

HttpRequet事件要写代码处理：http://www.foxtable.com/mobilehelp/topics/0175.htm

云服务器80端口也开通了

HttpRequet事件代码也写了

Httpserver也开启了，就是提示配置失败。

httpserver启动代码：

HttpServer.Prefixes.Add("http://*/")
HttpServer.WebPath = "d:\web" 

HttpServer.Start()

 

HttpRequet事件代码：

 

 

Select Case e.path
    Case "wefox"
        If e.Request.HttpMethod = "GET" Then
            Dim token = "foxtable" '必须和设置的Token相同
            Dim signature As String = e.GetValues("signature")
            Dim timestamp As String = e.GetValues("timestamp")
            Dim nonce As String = e.GetValues("nonce")
            Dim echostr As String = e.GetValues("echostr")
            Dim aryTmp() As String = {token,timestamp,nonce}
            Array.Sort(aryTmp)
            Dim strTmp As String = String.Join("", aryTmp)
            strTmp = Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(strTmp, "SHA1")
            If signature = strTmp.ToLower() Then
                e.WriteString(echostr)
            End If
        End If
End Select

 

 

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

测试HttpRequet事件代码有没有执行：
 
msgbox(e.path) ‘点击提交后，服务器这里提示框能不能弹出？
Select Case e.path

点击提交后，没有提示框弹出

在服务器运行程序开启httpserver的时候有没有提示错误？