怎么取出这个文档网页的文本

huangjiahong

取出这个文本
https://docs.qq.com/doc/DSmxNV0VLSkNPTHNs

左强

这不简单 , 网页访问+正则匹配

简易生活

.版本 2
.支持库 internet

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕
    按钮_获取.标题 ＝ "获取网页文本"
    编辑框_网址.内容 ＝ "https://docs.qq.com/doc/DSmxNV0VLSkNPTHNs"
    编辑框_结果.是否允许多行 ＝ 真
    编辑框_结果.滚动条 ＝ 2  ' 纵向滚动条

.子程序 _按钮_获取_被单击
    .局部变量 网页内容, 文本型
    .局部变量 HTTP请求, 对象
    .局部变量 结果, 逻辑型
   
    ' 创建HTTP请求对象
    HTTP请求 ＝ 创建对象 ("MSXML2.XMLHTTP")
   
    ' 检查对象是否创建成功
    如果 (是否为空 (HTTP请求))
        信息框 ("创建HTTP请求对象失败！", 0, "错误")
        返回
    结束如果
   
    ' 发送同步GET请求
    结果 ＝ HTTP请求.方法 ("open", "GET", 编辑框_网址.内容, 假)
    结果 ＝ HTTP请求.方法 ("send", )
   
    ' 检查请求状态
    如果 (HTTP请求.读数值属性 ("status") ＝ 200)
        网页内容 ＝ HTTP请求.读文本属性 ("responseText")
        编辑框_结果.内容 ＝ 网页内容
        信息框 ("网页内容获取成功！", 0, "提示")
    否则
        信息框 ("获取网页内容失败，状态码：" ＋ 到文本 (HTTP请求.读数值属性 ("status")), 0, "错误")
    结束如果

邓先生

看看是不是你要的结果

邓先生

忘记上传了

huangjiahong

邓先生 发表于 2025-8-15 22:34
看看是不是你要的结果

没取全呀，而且顺序乱了