[e]
.版本 2

.子程序 _按钮1_被单击
.局部变量 str, 文本型

str ＝ 网页_访问s (“http://zhichang.renren.com/act/response?code=0d2909bcaed2909366e6a917d600444e%A1%B1”)
str ＝ 文本_取出中间文本 (str, “window._rtk = '”, “'”)
输出调试文本 (str)
[/e]

成功取出 请给最佳

Hoibben 发表于 2013-11-22 14:57
先学点基础吧，填表你连初始化都没有写。。。。。

还是木有反应   您可以帮我写一下吗？ 网址就是这个“http://zhichang.renren.com/act/response?code=0d2909bcaed2909366e6a917d600444e”  麻烦您了

[e]
.版本 2
.支持库 WebBrowser2

.程序集变量 返回的数据, 文本型

.子程序 __启动窗口_创建完毕

互联网浏览器1.浏览 (“http://zhichang.renren.com/act/response?code=0d2909bcaed2909366e6a917d600444e”, , , )

.子程序 _按钮1_被单击

子程序_初始化 ()
返回的数据 ＝ 网页填表.网页_取源码 ()
编辑框1.内容 ＝ 文本_取出中间文本 (返回的数据, “name=” ＋ #引号 ＋ “_rtk” ＋ #引号 ＋ “ value=” ＋ #引号, #引号)

.子程序 子程序_初始化

网页填表.初始化 (互联网浏览器1.取窗口句柄 (), , , 真)

[/e]

沙漠ˇ行者 发表于 2013-11-22 14:49
[e]
.版本 2
.支持库 WebBrowser2

先学点基础吧，填表你连初始化都没有写。。。。。

Hoibben 发表于 2013-11-22 13:40
用文本_取出中间文本()不就可以取到啦。。。

[e]
.版本 2
.支持库 WebBrowser2

.程序集 窗口程序集1
.程序集变量 返回的数据, 文本型

.子程序 __启动窗口_创建完毕

互联网浏览器1.浏览 (“http://zhichang.renren.com/act/response?code=0d2909bcaed2909366e6a917d600444e”, , , )


.子程序 _按钮1_被单击

返回的数据 ＝ 网页填表.网页_取源码 ()
编辑框1.内容 ＝ 文本_取出中间文本 (返回的数据, “name=” ＋ #引号 ＋ “_rtk” ＋ #引号 ＋ “ value=” ＋ #引号, #引号)

[/e]



这样？？？？貌似不行啊

楼上正解啊。。。

用文本_取出中间文本()不就可以取到啦。。。

[e]
.版本 2

.子程序 _按钮1_被单击
.局部变量 str, 文本型

str ＝ 网页_访问s (“http://zhichang.renren.com/act/response?code=0d2909bcaed2909366e6a917d600444e%A1%B1”)
str ＝ 文本_取出中间文本 (str, “window._rtk = '”, “'”)
输出调试文本 (str)
[/e]