易语言http读文件无法获取新浪微博的源代码!求指教!
用易语言的http读文件()命令,无法获取某人新浪微博网页的源代码!这是为什么?怎么解决?这是我的代码:微博源代码=到文本(编码转换(HTTP读文件(地址.内容),#编码...
用易语言的http读文件()命令,无法获取某人新浪微博网页的源代码!这是为什么?怎么解决?
这是我的代码:
微博源代码 = 到文本 (编码转换 (HTTP读文件 (地址.内容), #编码_UTF_8, #编码_GB18030, ))
可以获取某人腾讯微博的源代码,但新浪微博的就不行。为什么?怎么办? 展开
这是我的代码:
微博源代码 = 到文本 (编码转换 (HTTP读文件 (地址.内容), #编码_UTF_8, #编码_GB18030, ))
可以获取某人腾讯微博的源代码,但新浪微博的就不行。为什么?怎么办? 展开
4个回答
展开全部
.版本 2
.支持库 internet
.子程序 __启动窗口_创建完毕
.局部变量 微博源代码, 文本型
微博源代码 = 到文本 (编码_Utf8到Ansi对象 (HTTP读文件 (“http://weibo.com/tangyan?c=spr_qdhz_bd_baidusmt_weibo_s&nick=%E5%94%90%E5%AB%A3”)))
输出调试文本 (微博源代码)
.子程序 编码_Utf8到Ansi对象, 文本型, 公开, 将任意编码格式(字节集类)转换成ANSI(文本格式编码)
.参数 data, 字节集, , 要转换的数据
.参数 Cset, 文本型, 可空, 转换前的编码 例:“UTF-8”,“Unicode”。留空默认为“UTF-8”
.局部变量 对象, 对象
.局部变量 变体型, 变体型
.局部变量 temp, 文本型
.如果真 (是否为空 (Cset) = 真)
Cset = “UTF-8”
.如果真结束
加载COM (0)
对象.创建 (“adodb.stream”, )
对象.写属性 (“Type”, 1)
对象.写属性 (“Mode”, 3)
对象.方法 (“Open”, )
变体型.赋值 (data, )
对象.方法 (“Write”, 变体型)
对象.写属性 (“Position”, 0)
对象.写属性 (“Type”, 2)
对象.写属性 (“Charset”, Cset)
temp = 对象.文本方法 (“ReadText”, )
对象.方法 (“Close”, )
返回 (temp)
.版本 2
.DLL命令 加载COM, , "ole32.dll", "CoInitialize", 公开, 多线程时使用
.参数 pvReserved, 整数型, , 值为0
.支持库 internet
.子程序 __启动窗口_创建完毕
.局部变量 微博源代码, 文本型
微博源代码 = 到文本 (编码_Utf8到Ansi对象 (HTTP读文件 (“http://weibo.com/tangyan?c=spr_qdhz_bd_baidusmt_weibo_s&nick=%E5%94%90%E5%AB%A3”)))
输出调试文本 (微博源代码)
.子程序 编码_Utf8到Ansi对象, 文本型, 公开, 将任意编码格式(字节集类)转换成ANSI(文本格式编码)
.参数 data, 字节集, , 要转换的数据
.参数 Cset, 文本型, 可空, 转换前的编码 例:“UTF-8”,“Unicode”。留空默认为“UTF-8”
.局部变量 对象, 对象
.局部变量 变体型, 变体型
.局部变量 temp, 文本型
.如果真 (是否为空 (Cset) = 真)
Cset = “UTF-8”
.如果真结束
加载COM (0)
对象.创建 (“adodb.stream”, )
对象.写属性 (“Type”, 1)
对象.写属性 (“Mode”, 3)
对象.方法 (“Open”, )
变体型.赋值 (data, )
对象.方法 (“Write”, 变体型)
对象.写属性 (“Position”, 0)
对象.写属性 (“Type”, 2)
对象.写属性 (“Charset”, Cset)
temp = 对象.文本方法 (“ReadText”, )
对象.方法 (“Close”, )
返回 (temp)
.版本 2
.DLL命令 加载COM, , "ole32.dll", "CoInitialize", 公开, 多线程时使用
.参数 pvReserved, 整数型, , 值为0
展开全部
什么意思?是脚本源码还是html
更多追问追答
追问
网页源代码,浏览器中,右键菜单“查看网页源代码”里面的内容
追答
那指的就是前端html了.有可能编码不对或用的https
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2015-05-02
展开全部
地址给我,我试试。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
编码_UTF_8转
追问
什么意思?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询