网站POST数据 搜索内容的一个方法

Http = CreateObject("MSXML2.XMLHttp")
Http.Open("Post","https://www.,.F.)
*!*    Http.setRequestHeader("Host"," www.)
*!*    Http.setRequestHeader("Connection"," keep-alive")
*!*    Http.setRequestHeader("Content-Length"," 11")
*!*    Http.setRequestHeader("Cache-Control"," max-age=0")
*!*    Http.setRequestHeader("Upgrade-Insecure-Requests"," 1")
*!*    Http.setRequestHeader("Origin"," https://www.)
*!*    Http.setRequestHeader("User-Agent"," Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/86.0.4240.198 Safari/537.36")
*!*    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.9")
*!*    Http.setRequestHeader("Sec-Fetch-Site"," same-origin")
*!*    Http.setRequestHeader("Sec-Fetch-Mode"," navigate")
*!*    Http.setRequestHeader("Sec-Fetch-User"," ?1")
*!*    Http.setRequestHeader("Sec-Fetch-Dest"," document")
*!*    Http.setRequestHeader("Referer"," https://www.)
*!*    Http.setRequestHeader("Accept-Encoding"," gzip, deflate, br")
*!*    Http.setRequestHeader("Accept-Language"," zh-CN,zh;q=0.9")
Http.setRequestHeader("Content-Type","application/x-www-form-urlencoded")

postdata="searchkey=88"           &&替换要搜索的内容
Http.send(postdata)
_CLIPTEXT=Http.ResponseText

请求标头大都会自动配置，有些要声明或验证的主要有Content-Type、Cookie、Referer