TC官方合作论坛

标题: 网页控件有办法透过链接提取本文吗? [打印本页]
作者: fdk3r6b    时间: 2012-8-20 22:40
标题: 网页控件有办法透过链接提取本文吗?
字符型 订单连接=网页.获取元素信息("浏览器0","text","href:www.xxxx.com) // 寻找连接
辅助.消息框(订单连接)

这样子没办法显示
作者: 梦里只影向你    时间: 2012-8-20 22:45


[attach]4855[/attach]
你试下看吧
作者: 落落。    时间: 2012-8-20 22:49
  1. 中文命名空间: 网络

  3. 中文命名空间: net



  7. 函数功能: 读取页面的内容



  11. 中文函数原型: 字符型 url读内容(字符型 subpath,整型 codingtype=0)

  13. 英文函数原型: string urlgetnetrequest (string subpath,int codingtype=0)



  17. 参数:

  19. subpath: 要读取的web地址

  21. codingtype: 网页编码类型,如读取内容内容出现乱码,可尝试更换编码再次读取.暂时支持下列几种编码

  23. 0: 使用UTF-8转换

  25. 1: 使用UTF-7转换

  27. 2: 符号字符集

  29. 3: 当前线程ANSI代码页

  31. 4: Macintosh代码页

  33. 5: OEM代码页

  35. 6: ANSI字符集



  39. 返回值: 函数执行成功返回读到的页面内容,否则返回空字符



  43. 举例:

  45. 字符型 内容=网络.url读内容("http://192.168.12.203/Group.aspx?group=1")

  47. 辅助.消息框(内容)



  51. Example:

  53. string values=net.urlgetnetrequest("http://192.168.12.203/Group.aspx?group=1")

  55. help.messagebox(values)



  59. 执行结果: 输出从页面获取的页面内容
复制代码

获取到网页文本后,用字符串分割功能就能得到你想要的任何文本信息
作者: fdk3r6b    时间: 2012-8-20 23:24
分析源码我有试过哩 但是分析出来的链接跟本文 都不一样..苦闷了.
作者: fdk3r6b    时间: 2012-8-20 23:27
回复 2楼梦里只影向你的帖子

能否QQ私底下请教你 求您了><
作者: 陌上青衣。    时间: 2012-8-20 23:27
楼主方便把网页 发出来吗, 具体问题具体分析
作者: fdk3r6b    时间: 2012-8-20 23:30
http://pr.buy.yahoo.com.tw/help/helper.asp?p=sitemap

这个，我想把上面列表都提取出来 想尽办法都无法我只要提取链接包含 ?sub= 的链接&本文 到列表框

附上我的源码

功能 逻辑型 获得列表()
函数.网页转到("浏览器0","http://pr.buy.yahoo.com.tw/help/helper.asp?p=sitemap")
列表框.清空("标题")
列表框.清空("连接")
字符型 索引端,索引号转换,元素,订单标题,订单连接,筛选连接转换,连接处理
整型 索引号,订单循环判断,筛选连接
//【定义变数结束】

//【初始订单变数】
索引端 = "tag:a&index:"
索引号 =0
订单循环判断=0
//【初始订单变数结束】

//【定单循环开始】
循环 (订单循环判断<转换.字符型转整型(编辑框.获得文本("更新次数")))
索引端 = "tag:a&index:"
索引号转换=转换.整型转字符型(索引号)
元素 = 字符串.连接(索引端,索引号转换)
订单循环判断=订单循环判断+1
索引号=索引号+1

订单连接=网页.获取元素信息("浏览器0","href",元素) // 寻找连接
筛选连接=字符串.查找字符串(订单连接,"?sub=")
如果 (筛选连接 >= 0 ) //筛选出订单网址
订单连接=网页.获取元素信息("浏览器0","href",元素) // 寻找连接
列表框.增加文本("连接",订单连接)
如果结束
循环结束

//【初始订单变数】
索引端 = "tag:Li&index:"
索引号 =24
订单循环判断=0
//【初始订单变数结束】

//【定单循环开始】
循环 (订单循环判断<转换.字符型转整型(编辑框.获得文本("更新次数")))
索引端 = "tag:a&index:"
索引号转换=转换.整型转字符型(索引号)
元素 = 字符串.连接(索引端,索引号转换)
订单循环判断=订单循环判断+1
索引号=索引号+1

订单连接=网页.获取元素信息("浏览器0","href",元素) // 寻找连接
筛选连接=字符串.查找字符串(订单连接,"?sub=")
如果 (筛选连接 >= 0 ) //筛选出订单网址
订单连接=网页.获取元素信息("浏览器0","text",元素) // 寻找连接
列表框.增加文本("标题",订单连接)
如果结束
循环结束
字符型 程式路径=系统.获取程序路径()
字符型 配置文件=程式路径+"\\list.ini"
文件.删除(配置文件)
函数.储存列表到配置("yahoo","yahoolist：","标题","\\list.ini")
函数.储存列表到配置("yahoo","yahoourl：","连接","\\list.ini")
返回 真
功能结束
作者: 梦里只影向你    时间: 2012-8-20 23:30
回复 5楼fdk3r6b的帖子

签名里有
今天我得下了
作者: fdk3r6b    时间: 2012-8-21 00:24
搞定了!!! 感谢前辈们的提点!!
作者: qq5111059    时间: 2012-8-30 12:47
看不懂
作者: huanghuanl    时间: 2012-8-31 18:31
("浏览器0","text","href:http://www.xxxx.com) // 寻找连接
作者: fdk3r6b    时间: 2012-8-31 18:58
樓上複製貼上不是件好事~



欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1