如何提取代码中需要的东西？急！！！

Question

如下代码：
<li class="r">1.</li><a href="/Details.asp?Domain=chinaz.com"><li class="n">中国站长站</li><li class="dp">246</li><li class="dc"><font color="#329A02">↑6</font></li><li class="wp">251</li><li class="wc"><font color="#329A02">↑2</font></li><li class="mp">263</li><li class="mc"><font color="#329A02">↑1</font></li><li class="qp">261</li><li class="qc"><font color="#FF0000">↓42</font></li><li class="b">383,000</li><li class="p">6</li><li class="s"><font color="#ffffff">chinaz</font></li></a><li class="d">
如何获取
246
↑6
251这样的数据呢？？？

Answer 1

发现每个class都不相同，笨的方法，substring取吧

Answer 2

首先找特殊标记，比如：</li>就很特殊，然后使用split（）函数把字符串分割成几块，然后存入数组中。
然后再从数组的各个项里面使用字符串函数不断的分析、删除、提取。最后就会得到你想要的值了。

Answer 3

ASP代码，只举了一个例子。
<%
Dim str
str="<li class=""r"">1.</li><a href=""/Details.asp?Domain=chinaz.com""><li class=""n"">中国站长站</li><li class=""dp"">246</li><li class=""dc""><font color=""#329A02"">↑6</font></li><li class=""wp"">251</li><li class=""wc""><font color=""#329A02"">↑2</font></li><li class=""mp"">263</li><li class=""mc""><font color=""#329A02"">↑1</font></li><li class=""qp"">261</li><li class=""qc""><font color=""#FF0000"">↓42</font></li><li class=""b"">383,000</li><li class=""p"">6</li><li class=""s""><font color=""#ffffff"">chinaz</font></li></a><li class=""d"">"
Function getPoint(str,strClassName)
Dim iBegin,iEnd,subStr1,subStr2
subStr1="<li class=""" & strClassName & """>"
subStr2="</li>"
iBegin=Newstring(str,subStr1)
iEnd=Newstring(str,subStr2)
str=Mid(str,iBegin,iEnd+1)
str=Replace(str,subStr1,"")
getPoint=str
End Function 

'函数：Newstring()，得到字符串string在Html中的位置
'参数：Html得到的页面内容，string特殊字符串
Function Newstring(Html,strng)  
Newstring=Instr(lcase(Html),lcase(strng)) 
if Newstring<=0 then Newstring=Len(Html)  
End Function  

Response.Write(getPoint(str,"dp"))
%>

Answer 4

asp看不懂!
能不能用ASP.NET
谢~!