|
.子程序 GET_网页请求, , 公开, 本命令由【城南Post助手】生成!
.局部变量 Http, RS_Libcurl, , "",
.局部变量 Url, 文本型, , "",
.局部变量 Header, 文本型, , "",
.局部变量 Return, 文本型, , "",
' 请自行调用Rs支持库!
Http.SetOption (#CT_CURLOPT_HTTP_VERSION, #CT_CURL_HTTP_VERSION_1_0)
Http.SetRedirect ()
Url = "https://www.weather.com.cn/pubm/video_lianbo_2021.htm"
http.Open ("GET", Url)
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("Accept-Language","zh-CN,zh;q=0.9")
Http.SetRequestHeader("Cache-Control","max-age=0")
Http.SetRequestHeader("Connection","keep-alive")
Http.SetRequestHeader("Host","www.weather.com.cn")
Http.SetRequestHeader("Referer","https://bbs.125.la/thread-14845861-1-1.html")
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/122.0.6261.95 Safari/537.36")
Http.SetRequestHeader("sec-ch-ua",""+#引号+"Chromium"+#引号+";v="+#引号+"122"+#引号+", "+#引号+"Not(A:Brand"+#引号+";v="+#引号+"24"+#引号+", "+#引号+"Google Chrome"+#引号+";v="+#引号+"122"+#引号)
Http.SetRequestHeader("sec-ch-ua-mobile","?0")
Http.SetRequestHeader("sec-ch-ua-platform",""+#引号+"Windows"+#引号)
Http.Send ()
Return= Http.GetResponseText ()
Return= rsUtf8ToAnsi(Return)
|
-
|