求助各位老大，怎样获取这个网页的数据http://live.aicai.com/league/index.htm?leagueId=31&tab=1，谢 - 编程论坛

#2

吹水佬2021-09-21 21:16

页面有不少东西，选项也有好几处，还能说具体点吗?

#3

sdta2021-09-21 22:09

程序代码：

lcUrl = "http://live./sportdata/f"
FOR ln1 = 1 TO 38
    lcText = GETURL(lcUrl, TRANSFORM(ln1)) && 返回表格内容
ENDFOR

FUNCTION GETURL(UrlName, lcPage)
    lcStr = ""
    oHTTP = CREATEOBJECT("MSXML2.ServerXMLHTTP") &&MSXML2.XMLHTTP/WinHttp.WinHttpRequest.5.1/MSXML2.ServerXMLHTTP/Microsoft.xmlhttp
    oHTTP.Open("POST", UrlName, .F.)
    lcRequest = '{"leagueId":31,"pageNo":1,"pageSize":100,"round":' + lcPage + ',"seasonFlag":0,"seasonName":"2021-2022","apiName":"getLeagueMatchList"}'
    oHTTP.Send(lcRequest)
    IF oHTTP.Status = 200
        lcStr = oHTTP.ResponseText
    ENDIF
    RELEASE oHTTP
    RETURN lcStr
ENDFUNC

页面内容不规范，自己想办法解析吧！

#4

schtg2021-09-22 05:40

学习啦，谢谢！

#5

nbwww2021-09-24 19:47

以下是引用sdta在2021-9-21 22:09:46的发言：

lcUrl = "http://live.
FOR ln1 = 1 TO 38
    lcText = GETURL(lcUrl, TRANSFORM(ln1)) && 返回表格内容
ENDFOR

FUNCTION GETURL(UrlName, lcPage)
    lcStr = ""
    oHTTP = CREATEOBJECT("MSXML2.ServerXMLHTTP") &&MSXML2.XMLHTTP/WinHttp.WinHttpRequest.5.1/MSXML2.ServerXMLHTTP/Microsoft.xmlhttp
    oHTTP.Open("POST", UrlName, .F.)
    lcRequest = '{"leagueId":31,"pageNo":1,"pageSize":100,"round":' + lcPage + ',"seasonFlag":0,"seasonName":"2021-2022","apiName":"getLeagueMatchList"}'
    oHTTP.Send(lcRequest)
    IF oHTTP.Status = 200
        lcStr = oHTTP.ResponseText
    ENDIF
    RELEASE oHTTP
    RETURN lcStr
ENDFUNC
页面内容不规范，自己想办法解析吧！

#6

mscb24012021-09-24 22:20

回复 3楼 sdta

太厉害了，佩服佩服，

把返回的数据处理下就好了