主题：钉钉接口

编辑完请求地址，单击保存按钮时，开放平台会向你配置的网址推送一个 application/json 格式的 POST 请求, 用于验证你配置的网址的合法性。请求如下：

{
    "encrypt": "ajls384kdjx98XX" // 加密字符串，解密方法请看下方的消息加解密
}

当你收到开放平台的POST验证请求时，你需要做解密处理，并在1500ms内返回包含success的加密字符串给钉钉，否则钉钉服务器将认为url不合法。

老师这个代码该如何写啊？

Select Case e.path

    Case "web" 

        If e.Request.HttpMethod = "GET" Then

            Dim token = "liO93UqdEcOwpu4Sy9rYS9gT09Ktyqve1u" '必须和设置的Token相同

            Dim signature As String = e.GetValues("signature")

            Dim timestamp As String = e.GetValues("timestamp") 

            Dim nonce As String = e.GetValues("nonce") 

            Dim encrypt As String = e.GetValues("encrypt")

            Dim aryTmp() As String = {token,timestamp,nonce}

            Array.Sort(aryTmp)

            Dim strTmp As String = String.Join("", aryTmp)

            strTmp = Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(strTmp, "khtbRfeKOxpSK5bDF94tpQssViqhOCUV5ObavW")       '这个我写的是aes_key

            If signature = strTmp.ToLower() Then

                e.WriteString(encrypt)

            End If

        End If

End Select

老师这是在 httprequest中写的代码，保存是报错。提示：

HTTP请求结果校验返回字段值失败 HttpRequest: curl 'http://29.60.17.116:6807/web/?signature=2c7f51416e5915e217e4a2837560da0c4&msg_signature=2c7f51416915e2c7e54c7560da0c4&timestamp=1614040020384&nonce=76gxOJzi' -d '{"encrypt":"QlzyVA1wOPI3PJM/k2OwVyYL9C/thbWRDWnJIPacc6dasvGrv7mQKmrPtI10lH/M5/P7Htl57VtiukahLKoPYnJQ4wC2J/kPKg5SlOjRGNhzpwLmjajeAt5P"}' -H 'Content-Type:application/json' HttpCode:200 HttpReponse: