想要提取网页首页上的每日提醒：http://www.

点击后打开这个   http://www.

尝试用下面的程序   
oXml = CreateObject("MSXML2.XMLHTTP")
cUrl = "http://www.
oXml.Open("GET", cUrl, .F.)
oXml.Send()
lcText=STRCONV(STRCONV(oXml.ResponseBody, 11), 2)
_cliptext=LcText
?LcText
用这个提取不出
请高手指教

数据好象在这里：http://www.

在开发者工具中可以找到隐藏的网址

* 运行环境：WIN7 [color=#808080]+ VFP9 7423[/color]
CLEAR 
oXml = CreateObject("MSXML2.XMLHTTP")
cUrl = "http://www./weather/data/infoReminder.json"
oXml.Open("GET", cUrl, .F.)
oXml.Send()
*lcText=STRCONV(STRCONV(oXml.ResponseBody, 11), 2)
lcText=STRCONV(oXml.ResponseBody, 11)
?lcText
?
? REPLICATE("=", 60)
?
? STREXTRACT(lcText, '":"', '","')

* 运行环境：WIN7 [color=#808080]+ VFP9 7423[/color]
CLEAR 
oXml = CreateObject("MSXML2.XMLHTTP")
cUrl = "http://www./weather/data/infoReminder.json"
oXml.Open("GET", cUrl, .F.)
oXml.Send()
*lcText=STRCONV(STRCONV(oXml.ResponseBody, 11), 2)
lcText=STRCONV(oXml.ResponseBody, 11)
?lcText
?
? REPLICATE("=", 60)
?
ALINES(laText, lcText, '":"', '","', ',')
LIST MEMORY LIKE laText

?laText[2]

谢谢   非常感谢