.版本 2 .支持库 spec .程序集 ehvip网盘, , , 恩华云储存 .程序集变量 cookie, 文本型 .程序集变量 cookies, 文本型 .子程序 ehviplogin, , 公开 .参数 user, 文本型 .参数 pwd, 文本型 .局部变量 url, 文本型 .局部变量 res, 文本型 .局部变量 data, 文本型 .局部变量 fhxyt, 文本型 .局部变量 datas, 字节集 .局部变量 json, 类_json .局部变量 i, 整数型 .局部变量 name, 文本型 .局部变量 size, 文本型 .局部变量 time, 文本型 .局部变量 id, 文本型 .局部变量 已用容量, 文本型 .局部变量 总容量, 文本型 url ＝ “https://www.ehvip.cn/Member/Login” data ＝ “userMail=” ＋ 编码_URL编码 (user, 真) ＋ “&userPass=” ＋ 编码_URL编码 (pwd, 真) res ＝ 编码_Utf8到Ansi (网页_访问 (url, 1, data, cookie, cookies, #ehvipxyt, fhxyt)) ' 调试输出 (cookie, cookies, fhxyt) .判断开始 (寻找文本 (res, “登陆成功”, , 假) ≠ -1) url ＝ “https://www.ehvip.cn/File/ListFile” datas ＝ 到字节集 (#listfile) res ＝ 编码_Utf8到Ansi (网页_访问 (url, 1, , cookies, , #listfilexyt, , , datas, )) ' 调试输出 (res) json.解析 (res) .计次循环首 (json.成员数 (“result”), i) name ＝ json.取通用属性 (“result[” ＋ 到文本 (i － 1) ＋ “].name”) size ＝ json.取属性 (“result[” ＋ 到文本 (i － 1) ＋ “].size”).取数据文本 () time ＝ json.取通用属性 (“result[” ＋ 到文本 (i － 1) ＋ “].date”) id ＝ json.取属性 (“result[” ＋ 到文本 (i － 1) ＋ “].id”).取数据文本 () 调试输出 (name, size, time, id) .计次循环尾 () url ＝ “https://www.ehvip.cn/Member/Memory” res ＝ 编码_Utf8到Ansi (网页_访问 (url, , , cookies, , #listfilexyt, , , , )) ' 调试输出 (res) json.解析 (res) 已用容量 ＝ json.取通用属性 (“used”) 总容量 ＝ json.取通用属性 (“total”) 调试输出 (已用容量, 总容量) .默认 调试输出 (“失败.........”) .判断结束 .子程序 downfile, , 公开 .参数 filename, 文本型 .局部变量 url, 文本型 url ＝ “https://www.ehvip.cn/File/Download?action=download&path=%2F” ＋ filename 写到文件 (取运行目录 () ＋ “\” ＋ filename, 网页_访问 (url, , , cookies, , #downxyt, ))