Foxtable(狐表)用户栏目专家坐堂 → 用内置的 WinForm.WebBrowser 却看不到数据, 求解??


  共有2737人关注过本帖树形打印复制链接

主题:用内置的 WinForm.WebBrowser 却看不到数据, 求解??

帅哥哟,离线,有人找我吗?
dwq547467075
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:148 积分:2075 威望:0 精华:0 注册:2013/3/3 12:34:00
用内置的 WinForm.WebBrowser 却看不到数据, 求解??  发帖心情 Post By:2016/12/10 1:11:00 [只看该作者]

http://data.eastmoney.com/zjlx/603701.html

为何用电脑浏览器能看到这组数据, 用内置的 WinForm.WebBrowser 却看不到数据, 求解??


图片点击可在新窗口打开查看此主题相关图片如下:n1644$}nra}1n~(8ga251a.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:~6ce1i47o(~b~{jc(f_qnh.png
图片点击可在新窗口打开查看


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.rar


[此贴子已经被作者于2016/12/10 1:12:23编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/12/10 9:15:00 [只看该作者]

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=646656&ID=93782&skin=1

 回到顶部
帅哥哟,离线,有人找我吗?
dwq547467075
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:148 积分:2075 威望:0 精华:0 注册:2013/3/3 12:34:00
  发帖心情 Post By:2016/12/10 10:18:00 [只看该作者]

用了那个方法,遍历所有行的时候就是类似本版提的问题,抓不到数据
[此贴子已经被作者于2016/12/10 10:18:45编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/12/10 10:32:00 [只看该作者]

那就没有办法了。可能别人的网站做了什么控制避免给别人偷取数据

 回到顶部
帅哥哟,离线,有人找我吗?
fjlclxj
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:321 积分:2468 威望:0 精华:2 注册:2013/1/16 19:33:00
  发帖心情 Post By:2016/12/10 23:36:00 [只看该作者]

url:
http://nufm.dfcfw.com/EM_Finance2014NumericApplication/JS.aspx?type=CT&cmd=6037011&sty=CTBFTA&st=z&sr=&p=&ps=&cb=&js=var tab_data=({data:[(x)]})&token=70f12f2f4f091e459a279469fe49eca5
返回值:
var tab_data=({data:["1,603701,德宏股份,65.69,-2.33%,-420.14,16,0,-1140199,-114.02,-1.90%,7617028,-10678241,-306.12,-5.09%,27033153,-30599430,-356.63,-5.93%,25355709,-17588019,776.77,12.91%,-6.98%,2016-12-09 15:00:00"]})

 回到顶部
帅哥哟,离线,有人找我吗?
fjlclxj
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:321 积分:2468 威望:0 精华:2 注册:2013/1/16 19:33:00
  发帖心情 Post By:2016/12/11 0:53:00 [只看该作者]

附件为窗体文件

 

以下内容为程序代码:

1 Dim code As String
2 code=e.Form.Controls("TextBox1").text
3 Dim u As String
4 u="http://nufm.dfcfw.com/EM_Finance2014NumericApplication/JS.aspx?type=CT&cmd=" & code & "1&sty=CTBFTA&st=z&&js=(x)&token=70f12f2f4f091e459a279469fe49eca5"
5
6 Dim web As new System.Windows.Forms.WebBrowser
7 web.Navigate(u)
8 Do Until web.ReadyState = 4
9 Application.DoEvents
10 Loop
11
12 Dim str As String
13 str=web.DocumentText
14 str=str.Trim("""")
15
16 Dim V() As String
17 V = str.split(",")
18 str=V(2) & "[" & V(1) & "]<Table><tr><td>类型</td><td>流入</td><td>流出</td></tr>"
19 str=str & "<tr><td>超大单</td><td>" & (V(7)/10000) & "万元</td><td>" & (V(8)/10000) & "万元</td></tr>"
20 str=str & "<tr><td>大单</td><td>" & (V(11)/10000) & "万元</td><td>" & (V(12)/10000) & "万元</td></tr>"
21 str=str & "<tr><td>中单</td><td>" & (V(15)/10000) & "万元</td><td>" & (V(16)/10000) & "万元</td></tr>"
22 str=str & "<tr><td>小单</td><td>" & (V(19)/10000) & "万元</td><td>" & (V(20)/10000) & "万元</td></tr>"
23 str=str & "</table>"
24 str=str & V(24)
25 e.Form.Controls("WebBrowser1").BaseControl.DocumentText=str
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:web.rar

[此贴子已经被作者于2016/12/11 0:55:32编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/11 9:03:00 [只看该作者]

 如果是取数据,用2楼,或者5楼的方法。

 

 如果,你需要在窗口里面显示网页,那就必须用嵌入ie浏览器的方式了

 

 下载信息  [文件大小:328.0 KB  下载次数:13]
图片点击可在新窗口打开查看点击浏览该文件:嵌入ie_测试.table


 回到顶部