网页数据处理帮顶送分!(50分)

yahoo123 · 2006-08-13

上面这个网页,打开后可以看到网页数据,和Excel有些相似,但是网页格式,我知道如何获取其源代码,可是如何分析数据,以便让它在程序的StringGrid控件里面显示呢.
主要用于统计.
http://north.500wan.com/b_trade/userhistory/index.asp?username=余超群&sellottype=1&selplaytype=1

上面这个网页,是500WAN足球彩票合买网大户余超群的历史战绩,统计其赢利多少.

yahoo123 · 2006-08-13

帮顶送分

zywcd · 2006-08-13

你只能接收这个源代码，不能变成其他格式吗？
如果复制，然后粘贴到excel ,你会发现比较好处理了。

yahoo123 · 2006-08-13

谢谢zywcd,但是这还不是最后答案,用excel的话,直接复制网页数据就可以了。也能统计数据。可是你统计一个人的还行，如果多个人呢。
程序我已经做得差不多了，现在遇到问题就是我可以取得它的源代码或是用程序取得其单独文本数据，但文本中没有分隔符号，数字和数字在一块了
如下所示：
用户类型：高级用户用户注册时间：2004-01-16 20:56
用户余超群的胜负彩历史战绩

序号期号方案类型方案标题方案金额命中场次税前奖金是否成功
1 06039 单式合买一等该来了! 22304 0 已成功
2 06039 单式合买余超群方太阳... 13698 0 已成功
3 06038 单式合买为南方水灾发... 100009 0 已成功
4 06038 单式合买易彩必中！ 2000011 0 已成功
5 06038 单式合买方太阳余超群 1000011 0 已成功
6 06037 单式合买两单合一 4239611 0 已成功
7 06037 单式合买余超群+方太... 1689011 0 已成功
8 06036 单式合买非中不可!!... 2476811 0 已成功
9 06036 单式合买余超群方太阳... 1000012 0 已成功
10 06035 单式合买直奔一等 2400013 2432 已成功
11 06035 单式合买再战北欧小联... 1000012 0 已成功
12 06034 单式合买太阳出差了.... 2253812 0 已成功
13 06033 单式合买我的私货 2002012 0 已成功
14 06033 单式合买余超群方太阳... 1200012 0 已成功
15 06032 单式合买乘胜追击 4551812 0 已成功
16 06032 单式合买给我拿下! 1200010 0 已成功
17 06031 复式合买斑马跛脚，米... 345612 0 已成功
18 06031 单式代购 150011 0 已成功
19 06031 单式合买争取当十冠王 4612812 0 已成功
20 06031 单式合买余超群方太阳... 1000012 0 已成功
21 06030 单式代购 21688 0 已成功
22 06030 单式合买我的私货 4967611 0 已成功
23 06030 单式合买 30期好发财 1000011 0 已成功
24 06029 单式代购 304011 0 已成功
25 06029 单式合买为了没有买到... 1099413 2470 已成功
26 06029 单式合买小小副食店 142613 1235 已成功
27 06029 单式合买我的私货 1258814 92027 已成功
28 06029 单式合买余超群方太阳 1000012 0 已成功
29 06029 单式代购 50810 0 已成功
30 06027 单式代购 309 0 已成功
31 06027 单式代购 8411 0 已成功
32 06027 单式合买用一等为本赛... 1200013 8624 已成功
33 06027 单式合买为了9个星星 1000012 0 已成功
34 06026 单式合买冲击本赛季最... 800011 0 已成功
35 06026 单式合买爱意浓浓 2872012 0 已成功
36 06026 单式合买我和方太阳争... 1000012 0 已成功
37 06025 复式合买 lai 11528 0 已成功
38 06025 单式合买愤怒的结果 31208 0 已成功
39 06025 单式合买我要的是一等... 1390212 0 已成功
40 06024 单式合买谁叫水满鱼多... 887610 0 已成功
41 06024 复式代购 21 0 已成功
42 06024 单式合买老余的私货 1847612 0 已成功
43 06025 单式合买余超群方太阳... 1000010 0 已成功
44 06024 单式合买余超群方太阳... 1000012 0 已成功
45 06024 复式合买感觉！ 11527 0 已成功
46 06023 单式合买复式 25109 0 已成功
47 06023 单式合买我的西甲 1081611 0 已成功
48 06022 单式合买告诉你真实的... 19807 0 已成功

zywcd · 2006-08-13

你获取的数据中间不是有一个空格？使用这个空格就可以分解了。使用pos

yahoo123 · 2006-08-13

但是你仔细看取得的数据就知道了,有空格分隔,就是象:
4 06038 单式合买易彩必中！ 2000011 0 已成功
其中的2000011没有分隔开呀,应该为20000 11才对(其中20000表示投入资金,11表示猜对的足球场数),这就是使用取文本数据的毛病,本来人家是两个字段,取网页文本时将数字给合并,再pos就无效了.

yahoo123 · 2006-08-13

其中我读源代码的代码如下
var
DoC: IHTMLDocument2;
begin
memo1.Clear;
Doc := WebBrowser1.Document as IHTMLDocument2;
Memo2.Lines.Add(Doc.body.outerhtml); //读源码
Memo1.Lines.Add(Doc.body.outerText); //Html To Text 获取文本资料
end;

yahoo123 · 2006-08-13

[

][

]
那谁有其他方法啊!

yahoo123 · 2006-08-13

[

][

]在线等待...

yahoo123 · 2006-08-13

yahoo123 · 2006-08-13

顶啊

zywcd · 2006-08-13

刚才看了源文件代码，可以使用软件分解。
你看这是一行数据，

<tr class="td13">
<td>1 </td>
<td>
06039 </td>
<td>单式合买 </td>
<td>
<div title="一等该来了!">
一等该来了!
</div>
</td>
<td>22304</td>

<td>
</td>

<td>
0
</td>
<td>
<a href=/b_trade/zc/dshm/in1.asp?id=901463 target=_blank><font color=red>已成功</font></a>
</td>
</tr>
然后是下一行，接下来就是重复。
<tr class="td12">
<td>2 </td>
<td>
06039 </td>
<td>单式合买 </td>
<td>
<div title="余超群方太阳联合发起">
余超群方太阳...
</div>
</td>
<td>13698</td>

<td>
</td>

<td>
0
</td>
<td>
<a href=/b_trade/zc/dshm/in1.asp?id=900347 target=_blank><font color=red>已成功</font></a>
</td>
</tr>

可以完全使用代码处理，但是只是正对你这个网页数据。

yahoo123 · 2006-08-14

zywcd兄弟,给一个例子,好吗,谢谢!

yahoo123 · 2006-08-14

yahoo123 · 2006-08-14

[8D]顶

yahoo123 · 2006-08-14

顶[

]

yahoo123 · 2006-08-14

yahoo123 · 2006-08-14

<TR> <TD class=td18>序号</TD> <TD class=td18>期号</TD> <TD class=td18>方案类型</TD> <TD class=td18>方案标题</TD><TD class=td18>方案金额</TD><TD class=td18>税前奖金</TD><TD class=td18>是否成功</TD></TR>
<TR class=td13><TD>1 </TD><TD>06209 </TD><TD>组选六 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>40</TD><TD>0 </TD><TD><A href=/b_trade/sd/zx6/in1.asp?id=590620 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td12><TD>2 </TD><TD>06207 </TD><TD>组选六 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>40</TD><TD>0 </TD><TD><A href=/b_trade/sd/zx6/in1.asp?id=586229 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td13><TD>3 </TD><TD>06206 </TD><TD>组选六 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>40</TD><TD>0 </TD><TD><A href=/b_trade/sd/zx6/in1.asp?id=582647 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td12><TD>4 </TD><TD>06205 </TD><TD>组选六 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>20</TD><TD>0 </TD><TD><A href=/b_trade/sd/zx6/in1.asp?id=579712 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td13><TD>5 </TD><TD>06204 </TD><TD>组选六 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>20</TD><TD>160 </TD><TD><A href=/b_trade/sd/zx6/in1.asp?id=576753 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td12><TD>6 </TD><TD>06203 </TD><TD>组选六 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>20</TD><TD>0 </TD><TD><A href=/b_trade/sd/zx6/in1.asp?id=573490 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td13><TD>7 </TD><TD>06183 </TD><TD>复式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>4</TD><TD>0 </TD><TD><A href=/b_trade/sd/fshm/in1.asp?id=521876 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td12><TD>8 </TD><TD>06183 </TD><TD>复式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>10</TD><TD>0 </TD><TD><A href=/b_trade/sd/fshm/in1.asp?id=521874 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td13><TD>9 </TD><TD>06183 </TD><TD>单式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>34</TD><TD>0 </TD><TD><A href=/b_trade/sd/dshm/in1.asp?id=519780 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td12><TD>10 </TD><TD>06182 </TD><TD>复式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>10</TD><TD>0 </TD><TD><A href=/b_trade/sd/fshm/in1.asp?id=519268 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td13><TD>11 </TD><TD>06182 </TD><TD>复式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>20</TD><TD>0 </TD><TD><A href=/b_trade/sd/fshm/in1.asp?id=519253 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td12><TD>12 </TD><TD>06182 </TD><TD>复式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>16</TD><TD>0 </TD><TD><A href=/b_trade/sd/fshm/in1.asp?id=519251 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td13><TD>13 </TD><TD>06181 </TD><TD>复式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>2</TD><TD>0 </TD><TD><A href=/b_trade/sd/fshm/in1.asp?id=516860 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td12><TD>14 </TD><TD>06181 </TD><TD>复式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>2</TD><TD>0 </TD><TD><A href=/b_trade/sd/fshm/in1.asp?id=516799 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>
<TR class=td13><TD>15 </TD><TD>06181 </TD><TD>复式合买代购 </TD><TD><DIV title=代购>代购 </DIV></TD><TD>4</TD><TD>0 </TD><TD><A href=/b_trade/sd/fshm/in1.asp?id=516782 target=_blank><FONT color=red>已成功</FONT></A> </TD></TR>

yahoo123 · 2006-08-14

以上代码是经过第一步处理后的源码

weichao9999 · 2006-08-14

可以通过indyiphttp控件获得源码，然后自己做分析

网页数据处理 帮顶送分!(50分)

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

zywcd

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

zywcd

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

zywcd

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

yahoo123

Unregistered / Unconfirmed

weichao9999

Unregistered / Unconfirmed

Similar threads

网页数据处理帮顶送分!(50分)