
坚守VFP最后的阵地
[此贴子已经被作者于2023-4-1 12:32编辑过]
CLEAR url = 'https://zst.' oHttp = NewObject('Msxml2.XMLHTTP') oHttp.open('GET', url, .F.) oHttp.send() cc = oHttp.responseText cc = STREXTRACT(cc, '<tbody id="pagedata">', ' <!-- END -->') cc = STREXTRACT(cc, "<tr id='tr29'", "<td class='z_bg_05'>") ? STREXTRACT(cc, "<td class='z_bg_05'>", "</td>", 2) ? STREXTRACT(cc, "<td class='z_bg_05'>", "</td>", 3) ? STREXTRACT(cc, "<td class='z_bg_13'>", "</td>")