学习网页数据抓取，天眼查https://www.这个网站有些难度（还有类似https://aiqicha.baidu.com/）

1、输入关键词“华为”，获取请求 URL: https://www.，状态代码显示200


2、代码

CLEAR 
lcWb = '华为'    &&keywords    
lcWb1 = STRCONV(STRCONV(lcWb, 9), 15)
* 转换为UTF8编码
lcUTF8 = ""
FOR ln = 1 TO LEN(lcWb1) STEP 2
    lcUTF8 = lcUTF8 + "%" + SUBSTR(lcWb1, ln, 2)
ENDFOR
myurl = 'https://www.'  &&"https://aiqicha.baidu.com/s?q=&lcUTF8"

oHTTP = CREATEOBJECT("MSXML2.ServerXMLHTTP") 
oHTTP.Open("GET", myurl, .F.)
OHTTP.SETREQUESTHEADER("Content-Type", "application/x-www-form-urlencoded")
lcSend = "erectDate=&nothing=&pjname=" + lcUTF8 + "&head=head_620.js&bottom=bottom_591.js"

oHTTP.Send(lcSend)
? oHTTP.Status
IF oHTTP.Status = 200
    lcStr = oHTTP.ResponseText                           &&网页内容存入lcstr
    STRTOFILE(lcStr,'D:\ex.txt')                               &&调试语句：将下载的网页存为D:\ex.txt
ENDIF 

3、实际状态代码返回418

4、网址搜索后自动挂上一段变化码&sessionNo=1674728807.71143526，与此有关吗？
https://www.

试试

CLEAR 
lcWb = '华为'    &&keywords    
lcWb1 = STRCONV(STRCONV(lcWb, 9), 15)
* 转换为UTF8编码
lcUTF8 = ""
FOR ln = 1 TO LEN(lcWb1) STEP 2
    lcUTF8 = lcUTF8 + "%" + SUBSTR(lcWb1, ln, 2)
ENDFOR
myurl = 'https://www.' + lcUTF8  &&"https://aiqicha.baidu.com/s?q=&lcUTF8"

oHTTP = CREATEOBJECT("MSXML2.XMLHTTP") 
oHTTP.Open("GET", myurl, .F.)
*OHTTP.SETREQUESTHEADER("Content-Type", "application/x-www-form-urlencoded")
*lcSend = "erectDate=&nothing=&pjname=" + lcUTF8 + "&head=head_620.js&bottom=bottom_591.js"

oHTTP.Send()
? oHTTP.Status
IF oHTTP.Status = 200
    lcStr = oHTTP.ResponseText                           &&网页内容存入lcstr
    STRTOFILE(lcStr,'D:\ex.txt')     &&调试语句：将下载的网页存为D:\ex.txt
    MODIFY FILE D:\ex.txt
ENDIF 

厉害厉害！果然行！！果然行！！！

有个疑问：
myurla = 'https://www.' + lcUTF8
myurlb = 'https://www.'
？myurla
？myurlb
字符串结果是一样的，但是结论却不一样，啥原因？

有可能是Cookie问题

如果查询关键字使用数字或英文（如搜索huawei），两种方式都可行，中文可能比较特殊，虽然字符串一致...

感谢！感谢！！