以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]收取钉钉数据问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=139081)

--  作者:81538475
--  发布时间:2019/8/5 15:20:00
--  [求助]收取钉钉数据问题
请问PC端能直接获取钉钉的打卡记录,外出记录之类的信息吗?有这样的范例吗
--  作者:有点蓝
--  发布时间:2019/8/5 15:52:00
--  
参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=136663&replyID=&skin=1
--  作者:81538475
--  发布时间:2019/8/8 8:47:00
--  
是高开版才可以是吗

提示 args 未声名
[此贴子已经被作者于2019/8/8 8:51:03编辑过]

--  作者:有点蓝
--  发布时间:2019/8/8 9:01:00
--  
如果只是调用接口,所有版本都可以。如果需要通过回调处理,需要有高级开发版
--  作者:81538475
--  发布时间:2019/8/8 9:06:00
--  
以下是引用有点蓝在2019/8/8 9:01:00的发言:
如果只是调用接口,所有版本都可以。如果需要通过回调处理,需要有高级开发版

那未申明 args 是什么原因呢
[此贴子已经被作者于2019/8/8 9:06:49编辑过]

--  作者:有点蓝
--  发布时间:2019/8/8 9:12:00
--  
调用了什么代码出现的错误?代码和完整错误提示发上来看看
--  作者:81538475
--  发布时间:2019/8/8 9:19:00
--  
是不是因为这个需要高开。所以报错了呀
Dim e As RequestEventArgs = Args(0)
Dim wb As New weui
wb.AppendHTML("<script
src=\'//g.alicdn.com/dingding/dingtalk-jsapi/2.6.41/dingtalk.open.js\'></script>",True)
wb.AppendHTML("<script src=\'./ding/getCode.js\'></script>")
wb.InsertHTML("","<div id=\'divlist\'>")
wb.InsertHTML("","</div>") \'占位的DIV标签的结束标签
wb.AddPageTitle("","ph1","系统登陆中","钉钉授权中...")
e.WriteString(wb.Build)
e.Handled = True

--  作者:有点蓝
--  发布时间:2019/8/8 9:37:00
--  
是的