Foxtable(狐表)用户栏目专家坐堂 → 企业微信扫码的问题


  共有7人关注过本帖树形打印复制链接

主题:企业微信扫码的问题

帅哥哟,离线,有人找我吗?
HappyFt
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1936 积分:17723 威望:0 精华:0 注册:2014/7/29 19:09:00
企业微信扫码的问题  发帖心情 Post By:2025/1/15 22:15:00 [只看该作者]

企业微信扫码录入类似下面生成签名的代码

2、新增一个自定义函数,函数名为"GetJsSignature",用于生成JS-SDK的授权签名,代码为:

Static CreateTime As Date '记录最近一次生成Ticket 的时间
Static
Ticket As String '记录最近一次生成的Ticket
Dim
tp As TimeSpan = Date.Now - CreateTime
Dim
ul As String = "https://api.weixin.qq.com/cgi-bin/ticket/getticket?access_token={0}&type=jsapi"
If
tp.TotalSeconds > 3600 Then
    Dim hc As New HttpClient(CExp(ul,Functions.Execute("GetAccessToken")))
    Dim ret As String = hc.GetData()
    If ret = "" Then
'
如果失败,再尝试一次
        hc.GetData()
    End If
    CreateTime = Date.Now()
    Dim jo As JObject = JObject.Parse(ret)
    If jo("errcode") = "0" Then
        Ticket = jo("ticket")
    Else
        MessageBox.show(
"
获取jsapi_ticket,原因:" & vbcrlf & jo.ToString)
    End
If

End
If
Dim
signature As String = CExp("jsapi_ticket={0}&noncestr={1}&timestamp={2}&url={3}",Ticket,args(0),args(1),args(2))
Return
Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(signature, "SHA1").ToLower()


当域名访问用非80端口时就会出现40093的签名错误,请问加了其他端口要怎么处理才不出错

谢谢!


 回到顶部