网页数据提取的问题 - 编程论坛

#2

吹水佬2021-03-07 20:21

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

#3

sdta2021-03-07 20:43

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

只有本站会员才能查看附件，请登录

#4

sdta2021-03-07 20:54

程序代码：

* 运行环境：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, '":"', '","')

只有本站会员才能查看附件，请登录

#5

sdta2021-03-08 10:15

程序代码：

* 运行环境：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]

只有本站会员才能查看附件，请登录

#6

nbwww2021-03-08 13:17

谢谢非常感谢