12-28-2012, 06:34 PM
Macro Macro1913
str w=
;<html><head></head><body>
;<table>
;<th id='grdTCardDtl_c_0_1' columnNo='1' height='30px' class="ig_6a760250_r4 ig_6a760250_2"><nobr>Dist. Code</nobr></th>
;</table>
;<table>
;<th id='grdTCardDtl_c_0_1' columnNo='1' height='30px' class="ig_6a760250_r4 ig_6a760250_2"> </th>
;</table>
;</body></html>
str s
HtmlDoc doc
doc.InitFromText(w)
ARRAY(MSHTML.IHTMLElement) a; int i
doc.GetHtmlElements(a "th")
for i 0 a.len
,sel a[i].id
,,case "grdTCardDtl_c_0_1"
,,s=a[i].innerText
,,out s