青海大学继续教育学院登录例子源码

.版本 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