鱼刺http 5.0 版本 WinHttpR 设置程序集变量问题

nanyang798

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
鱼刺许可	鱼刺类_临界许可
http	WinHttpR

子程序名	返回值类型	公开	备 注
功能_网页访问			本命令由【精易网页调试助手】生成，请配合 [精易模块] 与 [鱼刺类_Httpv5.0] 使用。

变量名	类 型	静态	数组	备 注
局_网址	文本型
局_方式	文本型
局_提交协议头	文本型
局_结果	字节集
局_返回	文本型

' [url]https://www.baidu.com/[/url]
局_网址 ＝ “https://www.baidu.com/”
局_方式 ＝ “GET”
http.Auto (真)
http.Open (局_方式, 局_网址, 真)
http.SetRequestHeader (“Host”, “ www.baidu.com”)
http.SetRequestHeader (“Connection”, “ keep-alive”)
http.SetRequestHeader (“Cache-Control”, “ max-age=0”)
http.SetRequestHeader (“sec-ch-ua”, #引号 ＋ “Microsoft Edge” ＋ #引号 ＋ “;v=” ＋ #引号 ＋ “147” ＋ #引号 ＋ “, ” ＋ #引号 ＋ “Not.A/Brand” ＋ #引号 ＋ “;v=” ＋ #引号 ＋ “8” ＋ #引号 ＋ “, ” ＋ #引号 ＋ “Chromium” ＋ #引号 ＋ “;v=” ＋ #引号 ＋ “147” ＋ #引号 )
http.SetRequestHeader (“sec-ch-ua-mobile”, “ ?0”)
http.SetRequestHeader (“sec-ch-ua-platform”, #引号 ＋ “Windows” ＋ #引号 )
http.SetRequestHeader (“Upgrade-Insecure-Requests”, “ 1”)
http.SetRequestHeader (“User-Agent”, “ Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/147.0.0.0 Safari/537.36 Edg/147.0.0.0”)
http.SetRequestHeader (“Accept”, “ text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.7”)
http.SetRequestHeader (“Sec-Fetch-Site”, “ none”)
http.SetRequestHeader (“Sec-Fetch-Mode”, “ navigate”)
http.SetRequestHeader (“Sec-Fetch-User”, “ ?1”)
http.SetRequestHeader (“Sec-Fetch-Dest”, “ document”)
http.SetRequestHeader (“Accept-Encoding”, “ gzip, deflate, br, zstd”)
http.SetRequestHeader (“Accept-Language”, “ zh-CN,zh;q=0.9,en;q=0.8,en-GB;q=0.7,en-US;q=0.6”)
http.Send (, )
局_结果 ＝ http.GetResponseBody ()
局_结果 ＝ 网页_GZIP解压 (局_结果)
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果, , , ))
鱼刺许可.进入 ()
调试输出 (http.GetStatus ())
鱼刺许可.退出 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击

功能_网页访问 ()
' 线程_启动 (&功能_网页访问, , )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 鱼刺许可, 鱼刺类_临界许可<br /> .程序集变量 http, WinHttpR<br /> <br /> .子程序 功能_网页访问, , , 本命令由【精易网页调试助手】生成，请配合 [精易模块] 与 [鱼刺类_Httpv5.0] 使用。<br /> .局部变量 局_网址, 文本型<br /> .局部变量 局_方式, 文本型<br /> .局部变量 局_提交协议头, 文本型<br /> .局部变量 局_结果, 字节集<br /> .局部变量 局_返回, 文本型<br /> <br /> ' <a href="https://www.baidu.com/" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://www.baidu.com/</a><br /> 局_网址 ＝ “<a href="https://www.baidu.com/" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://www.baidu.com/</a>”<br /> 局_方式 ＝ “GET”<br /> http.Auto (真)<br /> http.Open (局_方式, 局_网址, 真)<br /> http.SetRequestHeader (“Host”, “ <a href="http://www.baidu.com" rel="nofollow" rel="nofollow" target="_blank">www.baidu.com</a>”)<br /> http.SetRequestHeader (“Connection”, “ keep-alive”)<br /> http.SetRequestHeader (“Cache-Control”, “ max-age=0”)<br /> http.SetRequestHeader (“sec-ch-ua”, #引号 ＋ “Microsoft Edge” ＋ #引号 ＋ “;v=” ＋ #引号 ＋ “147” ＋ #引号 ＋ “, ” ＋ #引号 ＋ “Not.A/Brand” ＋ #引号 ＋ “;v=” ＋ #引号 ＋ “8” ＋ #引号 ＋ “, ” ＋ #引号 ＋ “Chromium” ＋ #引号 ＋ “;v=” ＋ #引号 ＋ “147” ＋ #引号)<br /> <br /> http.SetRequestHeader (“sec-ch-ua-mobile”, “ ?0”)<br /> http.SetRequestHeader (“sec-ch-ua-platform”, #引号 ＋ “Windows” ＋ #引号)<br /> http.SetRequestHeader (“Upgrade-Insecure-Requests”, “ 1”)<br /> http.SetRequestHeader (“User-Agent”, “ Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/147.0.0.0 Safari/537.36 Edg/147.0.0.0”)<br /> http.SetRequestHeader (“Accept”, “ text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.7”)<br /> http.SetRequestHeader (“Sec-Fetch-Site”, “ none”)<br /> http.SetRequestHeader (“Sec-Fetch-Mode”, “ navigate”)<br /> http.SetRequestHeader (“Sec-Fetch-User”, “ ?1”)<br /> http.SetRequestHeader (“Sec-Fetch-Dest”, “ document”)<br /> http.SetRequestHeader (“Accept-Encoding”, “ gzip, deflate, br, zstd”)<br /> http.SetRequestHeader (“Accept-Language”, “ zh-CN,zh;q=0.9,en;q=0.8,en-GB;q=0.7,en-US;q=0.6”)<br /> <br /> http.Send (, )<br /> 局_结果 ＝ http.GetResponseBody ()<br /> 局_结果 ＝ 网页_GZIP解压 (局_结果)<br /> 局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果, , , ))<br /> 鱼刺许可.进入 ()<br /> 调试输出 (http.GetStatus ())<br /> 鱼刺许可.退出 ()<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 功能_网页访问 ()<br /> <br /> ' 线程_启动 (&功能_网页访问, , )

nanyang798

WinHttpR 设置成程序集 或者全局变量时 无法正常访问 易语言版本是5.9

nanyang798

使用线程调用时无法正常访问 使用子程序指针调用才能正常访问