最新公告
  • 欢迎您光临51分享吧,本站秉承服务宗旨 履行“站长”责任,销售只是起点 服务永无止境!立即加入我们
  • 青海大学继续教育学院登录例子源码

    .版本 2
    .支持库 spec
    
    .程序集 程序集1
    .程序集变量 http, WinHttpW
    
    .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
    
    V8.InitializeV8 ()
    子程序1 ()
    V8.UninitializeV8 ()
    返回 (0)  ' 可以根据您的需要返回任意数值
    
    .子程序 子程序1
    .局部变量 res, 文本型
    .局部变量 lt, 文本型
    .局部变量 execution, 文本型
    .局部变量 publicKey, 文本型
    .局部变量 SSO_LT_JSESSIONID, 文本型
    .局部变量 url, 文本型
    .局部变量 user, 文本型
    .局部变量 pwd, 文本型
    .局部变量 JS, 类_脚本组件
    .局部变量 location, 文本型
    .局部变量 cookies, 文本型
    
    http.Auto (真)
    http.Open (“get”, “https://hwssov1.59iedu.com/login?TARGET=https://qdjj.59iedu.com/web/sso/auth&js&callback=processLogin&_=1573643822857”)
    http.SetUserAgent (“Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/75.0.3770.142 Safari/537.36”)
    http.SetAccept (“*/*”)
    http.SetReferer (“https://qdjj.59iedu.com/index”)
    http.SetAcceptLanguage (“zh-CN,zh;q=0.9”)
    http.Send ()
    res = http.GetResponseText ()
    lt = 文本_取中间 (res, “lt: ” + #引号, #引号)
    execution = 文本_取中间 (res, “execution: ” + #引号, #引号)
    publicKey = 文本_取中间 (res, “publicKey: ” + #引号, #引号)
    SSO_LT_JSESSIONID = 文本_取中间 (res, “SSO_LT_JSESSIONID=”, “',”)
    user = “632221199011100510”
    pwd = “mgj5668888”
    ' JS.执行 (#JS)
    ' user = JS.计算表达式 (“test('” + user + “','” + publicKey + “')”)
    ' pwd = JS.计算表达式 (“test('” + pwd + “','” + publicKey + “')”)
    ' JS.清除 ()
    user = V8_test (user, publicKey)
    pwd = V8_test (pwd, publicKey)
    url = “https://hwssov1.59iedu.com/login;SSO_LT_JSESSIONID=” + SSO_LT_JSESSIONID + “?ssoCb=jQuery111006287296128676239_1573643822858&lt=” + lt + “&execution=” + execution + “&_eventId=submit&accountType=1&account=” + user + “&password=” + pwd + “&credentialEncrypt=true&encryptType=RSA&extAttribute=%7B%27portalType%27%3A%27mall%27%7D&_=1573643822859”
    http.Open (“get”, url)
    http.Send ()
    res = http.GetResponseText ()
    cookies = http.GetAllResponseCookies ()
    location = 文本_取中间 (res, “location” + #引号 + “:” + #引号, #引号)
    http.Open (“get”, location)
    http.SetXMLHttpRequest ()
    http.Send ()
    res = http.GetResponseTextA ()
    调试输出 (res, cookies)
    
    .子程序 V8_test, 文本型
    .参数 data, 文本型
    .参数 pubkey, 文本型
    .局部变量 return, 文本型
    
    return = V8.ExecJavaScriptV8 (#JS, “test” + “('” + data + “','” + pubkey + “')”)  ' 请在常量_Js中放入调试成功的JS代码段
    返回 (return)

    @h643574

    文件下载

    解压密码:
    下载地址

    本站大部分下载资源收集于网络,只做学习和交流使用,版权归原作者所有,若为付费资源,请在下载后24小时之内自觉删除,若作商业用途,请到原网站购买,由于未及时购买和付费发生的侵权行为,与本站无关。本站发布的内容若侵犯到您的权益,请联系本站删除,我们将及时处理!
    51分享吧 » 青海大学继续教育学院登录例子源码
    • 195会员总数(位)
    • 2014资源总数(个)
    • 0本周发布(个)
    • 0 今日发布(个)
    • 380稳定运行(天)

    51分享吧 51DZSC.COM

    开通VIP 超级项目
    升级SVIP尊享更多特权立即升级