找回密码
 加入
搜索
查看: 6074|回复: 19

[网络通信] 【已解决】下载的网页内容乱码

[复制链接]
发表于 2019-6-4 09:01:38 | 显示全部楼层 |阅读模式
本帖最后由 hnfeng 于 2019-6-4 16:51 编辑

想下载网页文本内容,但是总不成功
使用 _INetGetSource 没成功
#include <Inet.au3>
#include <String.au3>

Local $hf = BinaryToString(_INetGetSource("http://kaijiang.500.com", False)) ; 加不加BinaryToString都不成功
MsgBox(0,0,$hf)
先保存为文件,仍然不成功
#include <Array.au3>
#include <Inet.au3>
#include <String.au3>

Local $HtmlFile = @ScriptDir & "\~_CPKJ_temp.txt"
Local $hf = InetGet("http://kaijiang.500.com", $HtmlFile, 1, 1)
Do
        Sleep(250)
Until InetGetInfo($hf, 2)
If InetGetInfo($hf, 3) Then
        Local $gg = FileOpen($HtmlFile)
        Local $RF = FileRead($gg)
        $RF=BinaryToString($RF)  ;  加或不加该行,都不成功
        MsgBox(0, 0, $RF)
Else
        MsgBox(0, "", "获取失败")
EndIf
InetClose($hf)

使用 InetRead 也没成功
#include <Array.au3>
#include <Inet.au3>
#include <String.au3>

$str = BinaryToString(InetRead("http://kaijiang.500.com", 1))
msgbox(0,"",$str)

请教怎么弄呢?先谢谢了


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2019-6-4 09:47:50 | 显示全部楼层
为什么要加BinaryToString这个???
 楼主| 发表于 2019-6-4 10:01:03 | 显示全部楼层
auto 发表于 2019-6-4 09:47
为什么要加BinaryToString这个???

不用就是乱码。翻看论坛上的帖子,说是需要转换一下。但是加不加都不成功
发表于 2019-6-4 10:23:26 | 显示全部楼层
本帖最后由 zghwelcome 于 2019-6-4 10:26 编辑

游客,如果您要查看本帖隐藏内容请回复


评分

参与人数 1金钱 +40 收起 理由
fybhwsx + 40 很给力!

查看全部评分

 楼主| 发表于 2019-6-4 10:33:37 | 显示全部楼层
zghwelcome 发表于 2019-6-4 10:23
**** 本内容被作者隐藏 ****

多谢多谢
完美解决
发表于 2019-6-4 13:57:26 | 显示全部楼层
**** 本内容被作者隐藏 ****??看看是什么方法?
发表于 2019-6-4 14:42:02 | 显示全部楼层
回复学习下!!!
发表于 2019-6-4 15:18:52 | 显示全部楼层
看看什么操作
发表于 2019-6-4 21:14:49 | 显示全部楼层
看看这是啥
发表于 2019-6-4 22:20:36 | 显示全部楼层
这么给力的吗。
发表于 2019-6-5 08:24:02 | 显示全部楼层
看看,学习下
发表于 2019-6-5 09:05:37 | 显示全部楼层
看看是什么问题
发表于 2019-6-5 12:19:03 | 显示全部楼层
看看回复的答案,学习一下
发表于 2019-6-7 09:28:48 | 显示全部楼层
什么方法,还隐藏着。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-1 07:05 , Processed in 0.083929 second(s), 21 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表