|

9精币
win7微云笔记访问不到 步知道为什么 win10就正常
变量名 | 类 型 | 静态 | 数组 | 备 注 | 局_网址 | 文本型 | | | 局_方式 | 整数型 | | | 局_提交数据 | 文本型 | | | 局_提交cookie | 文本型 | | | ADD_协议头 | 类_POST数据类 | | | 局_提交协议头 | 文本型 | | | 局_结果 | 字节集 | | | 局_返回 | 文本型 | | | 局_key | 文本型 | | | 局_json | 类_json | | |
局_key = 取文本右边 (网址, 取文本长度 (网址 ) - 倒找文本 (网址, “/”, , 假)) 局_网址 = “https://share.weiyun.com/webapp/json/weiyunShareNoLogin/WeiyunShareView?refer=unknown_windows&g_tk=1360807055&r=0.2261637797741603”局_方式 = 1 局_提交数据 = “{” + #引号 + “req_header” + #引号 + “:” + #引号 + “{\” + #引号 + “seq\” + #引号 + “:15727443088209672,\” + #引号 + “type\” + #引号 + “:1,\” + #引号 + “cmd\” + #引号 + “:12002,\” + #引号 + “appid\” + #引号 + “:30113,\” + #引号 + “version\” + #引号 + “:3,\” + #引号 + “major_version\” + #引号 + “:3,\” + #引号 + “minor_version\” + #引号 + “:3,\” + #引号 + “fix_version\” + #引号 + “:3,\” + #引号 + “wx_openid\” + #引号 + “:\” + #引号 + “\” + #引号 + “,\” + #引号 + “user_flag\” + #引号 + “:0}” + #引号 + “,” + #引号 + “req_body” + #引号 + “:” + #引号 + “{\” + #引号 + “ReqMsg_body\” + #引号 + “:{\” + #引号 + “ext_req_head\” + #引号 + “:{\” + #引号 + “token_info\” + #引号 + “:{\” + #引号 + “token_type\” + #引号 + “:0,\” + #引号 + “login_key_type\” + #引号 + “:1,\” + #引号 + “login_key_value\” + #引号 + “:\” + #引号 + “\” + #引号 + “},\” + #引号 + “language_info\” + #引号 + “:{\” + #引号 + “language_type\” + #引号 + “:2052}},\” + #引号 + “.weiyun.WeiyunShareViewMsgReq_body\” + #引号 + “:{\” + #引号 + “share_pwd\” + #引号 + “:\” + #引号 + 密码 + “\” + #引号 + “,\” + #引号 + “share_key\” + #引号 + “:\” + #引号 + 局_key + “\” + #引号 + “}}}” + #引号 + “}”局_提交cookie = “Cookie:wyctoken=1360807055”ADD_协议头. 添加 (“Content-Type”, “application/json;charset=utf-8”, )ADD_协议头. 添加 (“Accept”, “application/x-ms-application, image/jpeg, application/xaml+xml, image/gif, image/pjpeg, application/x-ms-xbap, */*”, )ADD_协议头. 添加 (“Referer”, “https://share.weiyun.com/5eEF3SY”, )ADD_协议头. 添加 (“Accept-Language”, “zh-CN”, )ADD_协议头. 添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 10.0; WOW64; Trident/7.0; rv:11.0) like Gecko”, )ADD_协议头. 添加 (“Host”, “share.weiyun.com”, )ADD_协议头. 添加 (“Content-Length”, “459”, )ADD_协议头. 添加 (“Connection”, “Keep-Alive”, )ADD_协议头. 添加 (“Cache-Control”, “no-cache”, )局_提交协议头 = ADD_协议头. 获取协议头数据 ()局_结果 = 网页_访问_对象 (局_网址, 局_方式, 局_提交数据, 局_提交cookie, , 局_提交协议头, , , , , , , , , , , , , )局_返回 = 到文本 (编码_编码转换对象 (局_结果, , , )) 如果真 (局_json. 解析 (局_返回 ))  局_返回 = 局_json. 取通用属性 (“data['rsp_body']['RspMsg_body']['note_list'][0]['html_content']”, ) 局_返回 = 文本_取出中间文本 (局_返回, “”, “ ”, , ) 返回 (局_返回)
|
最佳答案
查看完整内容
Windows 7默认不支持较新的TLS 1.2协议,在程序启动时调用此子程序,可以试一下:
.版本 2
.DLL命令 InternetSetOptionA, 整数型, "wininet.dll", "InternetSetOptionA"
.参数 hInternet, 整数型
.参数 dwOption, 整数型
.参数 lpBuffer, 整数型
.参数 dwBufferLength, 整数型
.子程序 设置TLS协议
InternetSetOptionA (0, 84, 2048, 4) ' 启用TLS 1.2
也有可能是User-Agent兼容性问题,试试:
[e=1 ...
|