<h3>ZHONG BAO KE KONG INVESTMENT CO.,LTD(600208):Company Profile</h3>
Company Profile - Xinhu Zhongbao Co., Ltd.
<p> Co_id - 600208
<p> ------------------------------------------------------------------------------
<p> Name Xinhu Zhongbao Co., Ltd.
<p> Co_industry Property
<p> List_Date 19990623
<p> Estb_Date 1993/02/01
<p> Chief Zou Li Hua <p> President Lin Jun Po
<p> Address 366 Hexing Rd. Jiaxing Zhejiang
<p> Tel No. (86)-571-87395003
<p> Fax No. (86)-571-87395052
<p> Employee 946
<p> Company History
<p> The Company ( formerly knowns as " Zhejiang Jizxing Huiken <p> Co.,Ltd.") was established as a joint stock limited company <p> in 1992. With the approval of China Securities Regulatory <p> Commission , the Company's A shares were listed on Shanghai <p> Stock Exchange on June 23, 1999. <p> Director Holding ( 2008/12 ) <p> ------------------------------------------------------------------------------ <p> 小弟在数据库建了一张表,建了十一个字段,想存放 上面HTML Name,Co_industry...Company History等关键字后面的内容,请问怎么提取?
Company Profile - Xinhu Zhongbao Co., Ltd.
<p> Co_id - 600208
<p> ------------------------------------------------------------------------------
<p> Name Xinhu Zhongbao Co., Ltd.
<p> Co_industry Property
<p> List_Date 19990623
<p> Estb_Date 1993/02/01
<p> Chief Zou Li Hua <p> President Lin Jun Po
<p> Address 366 Hexing Rd. Jiaxing Zhejiang
<p> Tel No. (86)-571-87395003
<p> Fax No. (86)-571-87395052
<p> Employee 946
<p> Company History
<p> The Company ( formerly knowns as " Zhejiang Jizxing Huiken <p> Co.,Ltd.") was established as a joint stock limited company <p> in 1992. With the approval of China Securities Regulatory <p> Commission , the Company's A shares were listed on Shanghai <p> Stock Exchange on June 23, 1999. <p> Director Holding ( 2008/12 ) <p> ------------------------------------------------------------------------------ <p> 小弟在数据库建了一张表,建了十一个字段,想存放 上面HTML Name,Co_industry...Company History等关键字后面的内容,请问怎么提取?
你看看这个帖子,会对你有帮助http://topic.csdn.net/u/20091212/01/4b1e7e04-daaf-4e9b-990a-283b751864e8.html?68564
Dim 正则 As New Regex("(\?id=(?<val>\d*))|((?i)<SPAN class=label id=caseCode>\s*(?<val>[^<]*)(?<!\s)\s*</SPAN>)")
Dim tttt As String = 文本流读取.ReadToEnd
For Each iii As Match In 正则.Matches(tttt)
Console.WriteLine(iii.Groups("val").Value)
My.Application.DoEvents()
Next
小弟可以提取到NAME,但Company History不知道怎么提取出来?那位高手帮帮?