老师,我在调用js文件后,发布项目后,钉钉上的应用就一直一直闪,闪几次后就直接报网络有问题了,麻烦您帮忙看下 谢谢!!
HttpRequest 代码:
Dim wb As New WeUI
Dim cmd As new SQLCommand
cmd.C
Dim code As String
Dim us As String
Dim sb As New StringBuilder
wb.AppendHTML("<script src='https://g.alicdn.com/dingding/dingtalk-jsapi/2.10.3/dingtalk.open.js'></script>") '引入脚本文件
wb.AppendHTML("<script src='./lib/getCode.js'></script>") '''免密登录
Select Case e.Path
Case "wsjc.htm"
wb.AppendHTML("<div>" & e.PlainText & "</div>")
us = Functions.Execute("get_dingding_userId",e.PlainText)
If e.Cookies.ContainsKey ("us") = False Then
wb.AppendCookie("us",e.PlainText)
End If
Functions.Execute("wsjc",e,wb)
js:
getCode(function() {
dd.runtime.permission.requestAuthCode({
corpId: "xxxxx", // 企业id
onSuccess: function (info) {
var code = info.code ; // 通过该免登授权码可以获取用户身份
// alert(info.code);
//window.location.href="wsjc.htm?dcode=" + code ;
sendAjaxText(code,"wsjc.htm","",false);
}});
});