<%
Set HttpObj = Server.CreateObject("AspHTTP.Conn")
dim docnum
docnum = 101
do while docnum <> 111
Response.Write docnum
HTTPObj.Url = "http://www.intels.net/date.asp?songID="&docnum
HttpObj.RequestMethod = "GET"
strResult = HTTPObj.GetURL
Response.Write strResult
docnum=docnum + 1
Response.Write "<br>"
loop
%>

点赞(0) 打赏

评论列表 共有 0 条评论

暂无评论

微信公众账号

微信扫一扫加关注

发表
评论
返回
顶部