网易云最新登录例子

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕
.局部变量 手机号, 文本型
.局部变量 密码, 文本型

手机号 ＝ “17629107896”
密码 ＝ “123456789”
调试输出 (登录 (手机号, 密码))

.子程序 登录, 文本型
.参数 账号, 文本型
.参数 密码, 文本型
.局部变量 加密结果, 文本型
.局部变量 返回文本, 文本型
.局部变量 加密参数, 文本型

加密参数 ＝ “'” ＋ 账号 ＋ “','” ＋ 密码 ＋ “'”
加密结果 ＝ JS调试 (#常量1, “jiami”, 加密参数)
返回文本 ＝ 网页_访问S (“https://music.163.com/weapi/login/cellphone?csrf_token=”, 1, 加密结果)
返回 (编码_URL解码 (返回文本, 真))

.子程序 JS调试, 文本型, 公开
.参数 JS代码, 文本型
.参数 函数名, 文本型
.参数 参数, 文本型, 可空
.局部变量 js, 对象
.局部变量 return, 文本型

' CoInitialize (0) 线程中请初始化COM  否则会出错
js.创建 (“ScriptControl”, )
js.写属性 (“Language”, “JavaScript”)
js.数值方法 (“AddCode”, JS代码)  ' 调试成功的JS代码段
return ＝ js.通用方法 (“eval”, 函数名 ＋ “(” ＋ 参数 ＋ “)”).取文本 ()
js.清除 ()
' CoUninitialize ()
返回 (return)

@御天软件